14 lines
151 B
ObjectPascal
14 lines
151 B
ObjectPascal
var
|
|
i: Integer;
|
|
s: string;
|
|
o: TObject;
|
|
begin
|
|
i := 123;
|
|
s := 'abc';
|
|
o := TObject.Create;
|
|
try
|
|
// ...
|
|
finally
|
|
o.Free;
|
|
end;
|
|
end;
|