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

Вниз

При создании формы вызвать событие закрытия формы   Найти похожие ветки 

 
explorer   (2002-09-18 09:31) [0]

Здравствуйте!
Вот и весь сабж.


 
Song   (2002-09-18 09:40) [1]

:-) А зачем? Может её вообще тогда не создавать или создавать но не показывать?


 
Alexey Kim   (2002-09-18 09:40) [2]

onCreate Form1.Close;?


 
Separator   (2002-09-18 09:47) [3]

Close пиши в событиях OnShow, OnPaint, OnActivate


 
Song   (2002-09-18 09:49) [4]

2Alexey Kim © (18.09.02 09:40)
Нельзя, да и не подействует.


 
Explorer   (2002-09-18 09:59) [5]

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


 
Alexey Kim   (2002-09-18 10:03) [6]

2Song>project options>autocreate forms?
2Explorer>procedures?


 
PKT   (2002-09-18 10:12) [7]

Можно и при создании

procedure TForm1.FormCreate(Sender: TObject);
begin
PostMessage(Handle, WM_CLOSE, 0, 0);
end;


 
Explorer   (2002-09-18 10:13) [8]

>> Alexey Kim
да

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


Form1.OnClose({а что здесь писать?});


 
Alexey Kim   (2002-09-18 10:15) [9]

2Explorer v "object view"(ne znau nazvanie tochno)
sdelay "events" tam najmi 2 raza na onClose


 
REA   (2002-09-18 10:45) [10]

Не сработают Close разные - я как то возился и победил вариант типа PostMessage(), хотя уже не помню точно.



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

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

Наверх




Память: 0.46 MB
Время: 0.007 c
1-98198
som
2002-09-18 14:21
2002.09.30
Excel и Word


1-98060
maxim2
2002-09-19 12:39
2002.09.30
Есть ли такой компонент, или как сделать...


14-98301
Николай Быков
2002-09-04 16:44
2002.09.30
Давайте издеваться над DiamondSoft Group здесь!!!


14-98327
NeyroSpace
2002-09-05 13:35
2002.09.30
---|Ветка была без названия|---


1-98029
Borys
2002-09-16 14:32
2002.09.30
Общая память





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский