| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Отменить и востановить OnResise формы. [D7, XP]
Alex_C © (2008-06-23 14:12:00)Понимаю, что туплю, но от жары в голову ничего не лезет
В ф-ции нужно отменить дейчтвие 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:24:00) [1]property OnResize: TNotifyEvent;
Поросенок Винни-Пух (2008-06-23 14:23:00) [2]тип не тот
Alex_C (2008-06-23 14:22:00) [3]Нет. Тоже ошибка.
Поросенок Винни-Пух (2008-06-23 14:17:00) [4]без крышки
| |
