ООП, Обьекты и Классы

[v-t-l]

Или путаница в терминологии?

[v-t-l]

TObject вообщето класс а не объект. я имел ввиду ключевое слово OBJECT

То есть ключевое слово OBJECT создает экземпляр объекта?
По-моему это вы что=то путаете.

[zub]

Код: Выделить всё

type
TObj=object
                    ..........
           end;
TClass=class
                      ..........
             end;
var
     v1:TObj;
     v2:TClass;

после создания переменных
v1-экземпляр типа TObj
v2-указатель на экземпляр типа TClass
собственно в этом и разница между объектами и классами. плюс в классы еще сразу встроенно некоторое количество фич благодаря наследованию от TObject

[shade]

v-t-l
RTFM

Код: Выделить всё

type
  TMyObject = object
    public
      x: Integer;
  end;

var obj1, obj2: TMyObject;
begin
  obj1.x := 10;
  obj2 := obj1;
  obj2.x := 20;
  writeln(obj1.x);
  writeln(obj2.x);
end.

[v-t-l]

То есть, объявление переменной объекта неявно создает экземпляр, а переменной класса - не создает.

З.Ы. С объектами никогда плотно не общался, поэтому и ошибся.

[v-t-l]

Тогда вопрос.
Для того чтобы манипулировать экземпляром объекта внутри какой-нибудь процедуры (не данного объекта), нужно ли передавать его через указатель или var-параметр?

[Sergei I. Gorelkin]

Нужно. Объект ведет себя точно так же, как и запись. Если передавать по значению, то в вызываемой процедуре будет создана локальная копия, и все изменения произойдут в ней, а не в исходном объекте.

И еще - объявление переменной типа object создает не экземпляр, а область памяти нужного размера, забитую мусором. Чтобы там создать объект, нужно вызвать его конструктор. Автоматически он, в отличие от Си, не вызывается...

[v-t-l]

Sergei I. Gorelkin
Спасибо.

[compiler]

Мне тоже надо сказать всем БОЛЬШОЕ спасибо.

[VirtUX]

Имеется объект:

Код: Выделить всё

AnyObj = object
  f1: Byte;
  ...
end;
var 
  ao: AnyObj;
  b: Byte;

begin
  b := ao.f1;
end;

Как установить значение 5 в f1, чтобы b получила значение 5, если над объектом AnyObj еще никто не работал? Т.е. задать значение по умолчанию в поле f1.

[Дож]

если над объектом AnyObj еще никто не работал? Т.е. задать значение по умолчанию в поле f1.

Никак.

[svk12]

Написать конструктор и в нём присвоить полю нужное значение.
Кстати, без создания экземпляра объекта приведенный код
вызовет AV (SIGSEGV)

[bw]

> вызовет AV (SIGSEGV)
С какой стати? Мы ведь не путаем классы и объекты?!

..bw

[and]

А как Object vs Class по накладным расходам? В частности, времени создания/разрушения и (менее критично) расходуемой памяти.
Точнее, интересует ^record vs ^Object vs Class.
С ^record всё ясно, с Class - тоже более-менее. А вот с ^Object пробел: не пользовался ими со времён TP7 - Borland, кажется, настоятельно рекомендовала не использовать одновременно Object и Class (абсолютно не помню, из каких соображений).

[Sergei I. Gorelkin]

В первом приближении их можно считать одинаковыми.