![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как переопределить метод OnResize [D6, Win2k]
Alexandr_ © (2002-02-18 14:18:00)Как переопределить метод OnResize
Юрий Зотов (2002-02-18 15:00:00) [1]Это событие есть уже у класса TControl, но оно protected. Стало быть, используем общий прием:
type
TFriendShape = class(TShape);
TForm1 = class(TForm)
...
public
procedure MyHandler(Sender: TObject);
...
end;
procedure TForm1.FormCreate(Sender: TObject);
begin
...
TFriendShape(Shape1).OnResize := MyHandler;
end;
procedure TForm1.MyHandler(Sender: TObject);
begin
...
end;
Alexandr_ (2002-02-18 14:45:00) [2]Класса TShape мне нужно выполнить кое какие действия когда меняется размер. Сообщениями уже пробовал ни чего не вышло
Digitman (2002-02-18 14:31:00) [3]метод какого конкретно класса ? или, все же, речь идет о событии ?
и - "переопределить" или "назначить свою процедуру обработки события" ?