10 lines
132 B
ObjectPascal
10 lines
132 B
ObjectPascal
type TClass = class
|
|
FProp : integer;
|
|
property Prop : integer read FProp write FProp;
|
|
end;
|
|
|
|
var a : TClass;
|
|
|
|
begin
|
|
Inc(a.Prop);
|
|
end. |