14 lines
141 B
ObjectPascal
14 lines
141 B
ObjectPascal
|
type A = class
|
||
|
|
constructor;
|
||
|
|
begin
|
||
|
|
|
||
|
|
end;
|
||
|
|
function Clone(): A;
|
||
|
|
begin
|
||
|
|
Result := self.Create;
|
||
|
|
end;
|
||
|
|
end;
|
||
|
|
|
||
|
|
begin
|
||
|
|
|
||
|
|
end.
|