4 lines
75 B
ObjectPascal
4 lines
75 B
ObjectPascal
type A = class
|
|
n: integer;
|
|
property pn: integer write n := value;
|
|
end;
|