8 lines
107 B
ObjectPascal
8 lines
107 B
ObjectPascal
type
|
|
t1=class
|
|
property p1:byte write writeln(value{parameter value: byte;});
|
|
end;
|
|
|
|
begin
|
|
|
|
end. |