Квадратный компонент
Здравствуйте я пишу компонент на основе TGraphicControl. TGraphicControl наследовал от TControl свойства Width и Height. Я бы хотел сделать так что бы мой компонент всегда был квадратным. Могу ли я переписать методы SetWidth и SetHeight у TControl'а или есть какой нибуть другой способ. Ну и разумеется нужно убрать Height моего компоненты из обжект инспектора т к он там не нужен, компонент же квадратный.
|