Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2004.02.29;
Скачать: [xml.tar.bz2];

Вниз

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

 
Бушин Сергей   (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 вся ветка

Форум: "Основная";
Текущий архив: 2004.02.29;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.009 c
7-94222
Sam Stone
2003-12-11 21:03
2004.02.29
Файлы из кэша IE


14-94192
Ihor Osov'yak
2004-02-05 17:29
2004.02.29
Тема курсового по ОПП..


1-94003
Альф
2004-02-16 16:25
2004.02.29
Про подсветку синтаксиса в Memo...


1-94008
Настенька
2004-02-17 08:45
2004.02.29
последний символ в label


6-94074
SergP
2003-12-22 03:20
2004.02.29
У кого-нить удавалось делать POST при помощи NMHTTP или IdHTTP?





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский