Home
Top.Mail.Ru Yandeks.Metrika
Forum: "Main";
Current archive: 2002.01.08;
Download: [xml.tar.bz2];

Down

How to start the program immediately show another one over the main form? Find similar branches


Alexander   (2001-12-19 01:45) [0]

Типа пароль спросить!



Someone   (2001-12-19 01:55) [1]

А какие проблемы? Кстати пароль логичнее запросить ДО показа главной формы. А по сути вопроса - хоть в OnCreate, хоть в OnShow главной формы напиши:
if PasswordForm.ShowModal = mrOK then... else ...



Alexander   (2001-12-19 02:11) [2]

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



Someone   (2001-12-19 02:24) [3]

Тогда по другому. Вы пытаетесь найти соединение, например, по таймеру. Первоначально параметры неизвестны, именно тогда и запрашивайте их. Повторно, Вы используете сохранённые где-либо параметры, и если они не действительны на данный момент, опять же вызывайте диалог с запросом.



paul_shmakov   (2001-12-19 19:28) [4]

2 Alexander:
возпользуйтесь советом Someone, только перед показом формы вызывайте Update

procedure Form1.Form1OnShow(Sender: TObject);
begin
Update;
if PasswordForm.ShowModal = mrOK then... else ...
end;



Pages: 1 whole branch

Forum: "Main";
Current archive: 2002.01.08;
Download: [xml.tar.bz2];

Top









Memory: 0.82 MB
Time: 0.033 c
1-22138
Serg5
2001-12-20 09:22
2002.01.08
People, tell me, and how to clear Image1, Clear did not find the function ...


7-22432
Voldemar
2001-09-25 04:12
2002.01.08
Priority assignment on startup ...


6-22272
Shadow
2001-10-06 18:26
2002.01.08
Вопрос с заковыркой!


1-22118
vlv
2001-12-19 21:59
2002.01.08
Components


6-22269
SERGX
2001-10-05 16:31
2002.01.08
Please give the source !!





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 Español 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
English French German Italian Portuguese Russian Spanish