8 lines
73 B
ObjectPascal
8 lines
73 B
ObjectPascal
|
type TFunc = procedure;
|
||
|
|
|
||
|
|
type TClass = class(TFunc)
|
||
|
|
end;
|
||
|
|
|
||
|
|
begin
|
||
|
|
|
||
|
|
end.
|