Скачать: CL | DM;

Не переписывается метод SetWidth   Найти похожие ветки 

← →
Mishenka   (2007-08-01 10:47) [0]

Пишу компонент потомок 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) [1]

> почему тогда ничего не работает?


Потому что метод TControl.SetWidth

1. Приватный
2. Статический

Перекрывать следует не SetWidth, а SetBounds, который:

1. Публичный
2. Виртуальный

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.44 MB
Время: 0.016 c