Code: Select all
type
TTest = class
procedure Test;
end;
begin
end.
Code: Select all
type
TTest = class
procedure Test;
end;
begin
end.
А как правильно сделать?Vizit0r wrote:потому что нельзя в ПС на лету объявлять классы, и это порой очень печально.