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

Down

Modal forms Find similar branches


kostushock   (2002-01-17 12:15) [0]

У меня такой вопрос - Есть модальная форма, например Form2. По нажатию кнопки на этой форме мне необходимо открыть в модальном режиме другую форму, например Form3, а исходную форму - Form2 - закрыть. Я пишу:
void __fastcall TForm2 :: Button1Click (TObject * Sender)
{
Close ();
Form3-> ShowModal ();
}

Открывается Form3 как модальная, но Form2 всё равно остаётся открытой до тех пор, пока не закроется Form3. Так как её всё-таки закрыть, а?



yaJohn   (2002-01-17 12:18) [1]

SendMessage(Form2.Handle,WM_CLOSE,0,0);

pisano navskidku.... I na Delphi :)



panov   (2002-01-17 12:19) [2]

TForm1.Button1.Click(...)

.
if Form2.Showmodal=mrOk then
begin
Form3.ShowModal;
end;



Владислав   (2002-01-17 12:24) [3]

Модальную форму Form3 необходимо вызывать из того места кода, откуда вызываетя Form2.

For example:

void __fastcall TForm2::Button1Click(TObject *Sender)
{
ShowForm3:=1 //Свойство Form2. Если установлено, значит отобразить Form2.
Close();
}

...

Form2->ShowModal();
if (Form2->ShowForm3) {then Form3->ShowModal()};



kostushock   (2002-01-17 12:25) [4]

yaJohn, твой вариант почему-то не проходит, написал
void __fastcall TForm2 :: Button1Click (TObject * Sender)
{
Close ();
SendMessage(Handle,WM_CLOSE,0,0);
Form3-> ShowModal ();
}
Ты это имел ввиду???

panov, а при чём тут Form1???? Объясни ещё раз поподробнее, а? А то я, дурачок, ничего не понял:)))




yaJohn   (2002-01-17 13:01) [5]

>Ты это имел ввиду???
Da
>твой вариант почему-то не проходиT
A konkretnee? Ne zakrivaetsia Form2? Voobsheto doljno rabotat".
Ili otkritie modalnoy formi prerivaet cikl obrabotki soobsheniy vo vseh ostalnih oknah prilojenia????



panov   (2002-01-17 13:35) [6]

>kostushock (17.01.02 12:25)
А где ж ты, сердечный, Form2.ShowModal вызываешь?

Из какой формы?

Если не хочешь формы последовательно вызывать, то делай так:

Form2.Visible: = False;
Form3.ShowModal;
Form2.Close;



Pages: 1 whole branch

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

Top





Memory: 0.56 MB
Time: 0.025 c
1-8822
Arkady
2002-01-20 00:27
2002.02.04
Physical and logical drives


1-8848
Vlad @ Delphi
2002-01-18 21:37
2002.02.04
Work with archives


3-8802
RoadRunner
2002-01-08 21:29
2002.02.04
Access to Paradox with password


3-8781
Alexm
2002-01-07 16:06
2002.02.04
Question!


1-8916
Lana Rozanova
2002-01-17 15:39
2002.02.04
Memorandum





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