Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2008.07.20;
Скачать: CL | DM;

Вниз

Отменить и востановить OnResise формы.   Найти похожие ветки 

 
Alex_C   (2008-06-23 14:12) [0]

Понимаю, что туплю, но от жары в голову ничего не лезет
В ф-ции нужно отменить дейчтвие OnResize для формы.
Делаю так

procedure FormResize(Form: TForm);
type
 TOnResizeProc = procedure(Sender: TObject);
var
 OnResizeProc: TOnResizeProc;
begin
 OnResizeProc := @Form.OnResize;
 Form.OnResize := nil;
..... чего-то делаем
теперь надо восстанвить:
Form.OnResize := OnResizeProc^ - ошибка. А как правильно?


 
Поросенок Винни-Пух ©   (2008-06-23 14:17) [1]

без крышки


 
Alex_C   (2008-06-23 14:22) [2]

Нет. Тоже ошибка.


 
Поросенок Винни-Пух ©   (2008-06-23 14:23) [3]

тип не тот


 
Поросенок Винни-Пух ©   (2008-06-23 14:24) [4]

property OnResize: TNotifyEvent;



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

Текущий архив: 2008.07.20;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.019 c
2-1213793347
Dmitry1987
2008-06-18 16:49
2008.07.20
Извлечь значение


1-1195656625
GIo
2007-11-21 17:50
2008.07.20
Помогите разобраться


3-1202313830
harisma
2008-02-06 19:03
2008.07.20
Параметры для xp_sqlmaint


1-1195232021
wipr
2007-11-16 19:53
2008.07.20
Окно программы становится недоступным (программа не отвечает)


15-1211963636
non1ka
2008-05-28 12:33
2008.07.20
Преобразования Pascal в Delphi