11 lines
91 B
ObjectPascal
11 lines
91 B
ObjectPascal
|
type TClass = class
|
||
|
|
a : integer;
|
||
|
|
end;
|
||
|
|
|
||
|
|
begin
|
||
|
|
with TClass.Create do
|
||
|
|
begin
|
||
|
|
a := 3;
|
||
|
|
end;
|
||
|
|
|
||
|
|
end.
|