Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Как переопределить метод 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]

метод какого конкретно класса ? или, все же, речь идет о событии ?
и - "переопределить" или "назначить свою процедуру обработки события" ?


Наверх

Титульная страница Поиск, карта сайта Написать письмо