parent schliessen

[khh]

Hallo zusammen, ich möchte beim Start eines Programms das Hauptfenster im HG anzeigen.
Im Vordergrund soll ein modales Fenster zu einer Eingabe zwingen.
Erst nach dieser Eingabe darf das Hauptform benutzt werden.
Beim Abbruch ohne Eingabe soll das Hauptfenster mit geschlossen werden.

Ich hab mir gedacht im OnActivate des mainForm das Eingabefenster modal anzuzeigen.
Soweit so gut.
Aber wie sage ich dem Parent dass es beim Abbruch des modalen Fensters ebenfalls geschlossen wird?

Ist sicher ganz einfach, oder ?

EDIT: habs mit application.terminate versucht, funkt aber leider nicht

Gruss KHH

[shmia]

Entweder ruftst du Application.Terminate (Holzhammermethode) auf oder du fragst das ModalResult (eleganter) ab:

Delphi-Quellcode:

procedure TMainForm.FormActivate(...);
var
  frm : TPasswortForm;
  ende : Boolean;
begin
  frm := TPasswortForm.Create(nil);
  try
    // Fomular modal anzeigen - wenn nicht OK-Button gedrückt wurde
    // ist ende = True
    ende := frm.ShowModal <> mrOK;
  finally
    frm.Free;
  end;
  if ende then
    Close;
end;

[khh]

Zitat von shmia:

Entweder ruftst du Application.Terminate (Holzhammermethode) auf oder du fragst das ModalResult (eleganter) ab:

Delphi-Quellcode:

procedure TMainForm.FormActivate(...);
var
  frm : TPasswortForm;
  ende : Boolean;
begin
  frm := TPasswortForm.Create(nil);
  try
    // Fomular modal anzeigen - wenn nicht OK-Button gedrückt wurde
    // ist ende = True
    ende := frm.ShowModal <> mrOK;
  finally
    frm.Free;
  end;
  if ende then
    Close;
end;

logisch, jetzt wo du es sagst

ich danke dir

[khh]

funktioniert dochnicht ganz sauber

egal ob über terminate oder modalresult
beim beenden flackert das Fenster sekundenlang , bis es mit
"Failed to create win32 control, error 0 " beendet wird.

ich vermute dass es daran liegt dass das im formactivate gehandelt wird, oder?

EDIT: ich habs ins OnShow gepackt, dort funktionierts, allerdings ohne dass das Hauptform in HG angezeigt wird

[DeddyH]

Das kann ich nicht nachvollziehen, bei mir funzt das im OnActivate ohne Probleme.

[edit] Hast Du das Passwort-Formular auch aus der automatischen Formularerstellung herausgenommen? Und wie schließt Du es? Weist Du ModalResult zu? [/edit]

[shmia]

Das Formular schliesen im Event OnActivate oder OnShow ist ein bisschen so wie wenn man jemandem den Stuhl unterm Hintern wegzieht.
Versuche mal anstelle von Close: PostMessage(self.Handle, WM_CLOSE, 0,0);

[DeddyH]

Oder quick & dirty im OnShow/OnActivate einen Timer starten, der das Passwortformular aufruft und sich dann dünne macht.

[khh]

Zitat von shmia:

Das Formular schliesen im Event OnActivate oder OnShow ist ein bisschen so wie wenn man jemandem den Stuhl unterm Hintern wegzieht.
Versuche mal anstelle von Close: PostMessage(self.Handle, WM_CLOSE, 0,0);

auch das verursacht im OnActivate das Flackern und
"Failed to create win32 control, error 0 "

das Modale Form hab ich auch aus der Autoerstellung rausgenommen.

was kann sonst noch die Ursache sein?

[DeddyH]

Kannst Du das in einem kleinen Demo-Projekt reproduzieren? Falls ja, häng das doch mal an, dann kann man sich das in Ruhe anschauen.

[khh]

Zitat von DeddyH:

Kannst Du das in einem kleinen Demo-Projekt reproduzieren? Falls ja, häng das doch mal an, dann kann man sich das in Ruhe anschauen.

ich versuch morgen mal eine entsprechendes Demo zu erstellen.
Ich danke für eure Hilfe.

Gruss KHH