[][enk]

Пример нагугленный:

type

TMyClass = class
FIntField: Integer;
FStrField: String; end;

var

aObject: TMyClass;

begin

aObject.FIntField := 0;
aObject.FStrField := 'Строка символов';
end;

Без aObject:=TMyClass.Create; Не правильный получается?