Не переписывается метод SetWidth [D6, 2000, XP]
Mishenka © (2007-08-01 10:47:00)
Пишу компонент потомок TButton. Хочу переписать метод SetWidth
Пишу:
TComponentName = class(TButton)
private
procedure SetWidth(Value: Integer); override;
...
При выполнении программы выводится ошибка "Method SetWidth
not found in base class"
Однако метод SetWidth унаследован от класса TControl? который
является одним из предков TButton. А почему тогда ничего не
работает?
Сергей М. (2007-08-01 10:51:00) [1]
> почему тогда ничего не работает?
Потому что метод TControl.SetWidth
1. Приватный
2. Статический
Перекрывать следует не SetWidth, а SetBounds, который:
1. Публичный
2. Виртуальный
Наверх 
ЧАТ |
Орешник |
|
