Form2->Close(); funktioniert nicht

[AlexDozer]

Ich hab das ganze jetzt mal bei OnPaint reingeworfen. Jetzt ist es zumindest schon mal so das wenn ich die MessageBox schliesse das Fenster auch zugeht. Das war bei OnActivate nicht so.

Zumindest schon mal eine Verbesserung

[AlexDozer]

Rostfrei[] schrieb:

Kommentier mal alles vor der letzten If-Abfrage aus. Dann sollte es eigentlich funktionieren. Will heißen, das Problem liegt vorher. Du schließt die Datenbank z.B. nicht mit Close...

Dann funktioniert es auch nicht Hab alles bis zum if auskommentiert.

[Rostfrei**]

Also bei meinem BCB 6 Enterpr wird das Fenster in OnActivate geschlossen.

void __fastcall TForm1::FormActivate(TObject *Sender)
{
     Application->MessageBox("Keine neuen Dateien gefunden!", "Nothing found",  MB_RETRYCANCEL);
     Form1->Close();
}

[AlexDozer]

Ich hab jetzt alles was zu Form2 gehört auskommentiert bis auf:

Application->MessageBox("Keine neuen Dateien gefunden!", "Nothing found",  MB_RETRYCANCEL);
Form2->Close();

Aber es funktioniert einfach nicht. Benutze BCB 6 Professional.

Werd mal morgen meinen Lehrer fragen. Vielleicht weis der was

[Rostfrei**]

Vielleicht könnten das mal Andere mit anderen BCB-Versionen testen.

[OldMan00]

Rostfrei[] schrieb:

Also bei meinem BCB 6 Enterpr wird das Fenster in OnActivate geschlossen.

Du benutzt Form1 ! da funktioniert es bei mir auch. Versuchmal in Form2.
bei mir funktioniert es nicht in 'TForm2::FormActivate' bcb6 enterprise.
wohlgemerkt Form2 ! In Form1 schon.

[Braunstein]

Mach nach dem Close() einfach mal ein return;

[AlexDozer]

Funktioniert leider auch nicht

[_gast_]

Versuche es damit hier:

PostMessage(Form2->Handle,WM_CLOSE,0,0);

[OldMan00]

das funktioniert bei mir.

[AlexDozer]

Bei mir auch! Vielen Dank!