Вниз
Скачать: CL | DM;

Форма в компоненте - передача в компонент наступившего событя   Найти похожие ветки 

 
Бушин Сергей ©   (2004-02-18 14:44) [0]

Уважаемые гуру!

Что посоветуете. Имеем компонент, который вызывает немодально форму. пользователь по работал с формой и нажимает кнопочку, чтобы закрыть данное окно (кнопарь мой, см. далее). А окно не простое, а BorderStyle=bsNone.
Так вот вопрос! Как мне передать в компонент, что пользователь нажал на выход - в обработчик события компонента OnCloseMyForm?

Данный обработчик служит для той цели, что компонент может вызываться из многих мест в программе и соответственно нужно принимать решение что делать в том или другом случае.


 
Radionov Alexey ©   (2004-02-18 14:58) [1]

Метод Notification посмотри. Может быть через него будет лучше.


 
Бушин Сергей ©   (2004-02-18 16:11) [2]

По моему нет. Короче проблемма такая:


TMyComponent=class(TComponent)
...
function Execute:Boolean;
published
property OncloseMyForm:TNotifyEvent ...;
...

function TMyComponent.Execute:boolean;
begin
if not Assigned(MyForm) then
MyForm:=TMyForm.Create(nil);
MyForm.Show;
end;


Поработав с формой пользователь жмет на кнопочку CloseButton. (На всякий случай Свойства ModalResult нет).

Так как же передать в теле CloseButtonClick чтобы сработало OnCloseMyForm?


 
Плохиш   (2004-02-18 16:21) [3]

>Бушин Сергей © (18.02.04 16:11) [2]

Делаешь в TMyForm property OncloseMyForm: TNotifyEvent ...
и в Execute присваиваешь ему OncloseMyForm из TMyComponent, при закрытии формы вызываешь OncloseMyForm.


 
Бушин Сергей ©   (2004-02-18 16:34) [4]

Работает!!!



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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.015 c
4-94252
Игорь В.
2003-12-23 23:07
2004.02.29
API функции для принтера


14-94178
Alex Konshin
2004-02-07 01:06
2004.02.29
Настоящий капитан


1-93855
Grinder
2004-02-16 16:46
2004.02.29
Resize в ListView


1-93906
SergP
2004-02-15 20:38
2004.02.29
Нужно ли уничтожать созданые объекты при закрытии приложения


14-94134
Валерыч
2004-02-09 07:33
2004.02.29
Ищу алгоритм решения




   Наверх