myclass = class(TRect)
end;
дает ошибку
Ни как, нельзя наследовать record
Обсуждают сегодня