Обработка сообщений VCL компонента

← →
Alex Shulg (2003-03-12 11:06) [0]

Народ, подскажите:
Есть VCL компонент на форме, имеет обработчики событий. Во время выполнения делаю дестрой, а потом снова создаю этот VCL компонент. Как у вновь созданного восстановить обработчики событий, которые я создал в режиме проектирования?
Зарание благодарю.

← →
Roma (2003-03-12 11:12) [1]

Его свойствам OnXXX присвоить значения:
NewRuntimeButton.OnClick := DesigntimeButtonOnClick;

Обработчики событий - это методы твоего класса (в данном случае - формы), при удалении компонента методы (методы формы) не удаляются, можешь спокойно их присваивать (назначать) кому угодно (только чтоб тип совпадал)...

← →
KA_ (2003-03-12 11:20) [2]

У компонента обработчик события - это свойство. Посмотри сырцы VCL, например TWinControl
TWinControl = class(TControl) private ... FOnKeyDown: TKeyEvent; ... protected ... property OnKeyUp: TKeyEvent read FOnKeyUp write FOnKeyUp; ... end;
Значит что? После создания компонента присвой значение свойству.
Например:
TMyForm = class(TForm) ... private ... procedure ClickMyshyuNaKnopke(Sender: TObject); ... end; var my_form: TMyForm; ... implementation ... var btn: TButton; ... begin btn := TButton.Create(My_Form); btn.Caption := "Ето кнопка"; btn.OnClick := my_form.ClickMyshyuNaKnopke; end;

← →
Alex Shulg (2003-03-12 11:41) [3]

Спасибо, все получилось!

← →
REA (2003-03-12 12:35) [4]

А зачем делать Destroy, если потом опять создавать?
Логичнее сделать visible false.
Если нужно сохранить все published свойства, то можно записать в поток и потом считать из потока.

← →
Alex Shulg (2003-03-12 16:27) [5]

Этот компонент обрабатывает некоторые данные в цикле, а когда возникает исключительная ошибка при одном из прохождений, остальные прохождения тоже проходят с ошибкой. Удаляя, а потом создавая компонент, я добиваюсь того, что последующие прохождения цикла выполняются корректно. (Какой-то глюк остается в компоненте после искл.ситуации)

← →
Sheriff (2003-03-12 16:32) [6]

беготня от исключений устойчивости программе не добавит. :)

← →
REA (2003-03-12 17:32) [7]

Как одна моя знакомая делала - у нее на выходе функции результат получался на 1 больше. Не долго думая после функции был вставлен оператор Dec(i). Чего разбираться то?

← →
KA_ (2003-03-13 10:49) [8]

2 Alex Shulg:
Поднимите мне глюки :) В смысле - код в студию !

Обработка сообщений VCL компонента Найти похожие ветки