ShowModal verschachteln?

[Hansa]

Muß mal kurz nachhaken. Habe sowas :

Delphi-Quellcode:

    frm1 := Tfrm1.Create(Self);
    ModalResult := frm1.ShowModal;
    case ModalResult of
      mrOk     : begin
                   frm2 := Tfrm2.Create(Self);
                   case frm2.ShowModal of
                     mrOk : CanClose := true;
                     mrAbort,
                     mrCancel : CanClose := false;
                   end;
                 end;
      mrAbort  : CanClose := false;
      mrCancel : CanClose := true;  
    end;

Also erstmal eine Form. Je nach Anforderung wird noch eine angezeigt. Und dann bei bestimmten Aktionen noch eine. Im geposteten Code sehe ich jetzt viel finally, free und solche Sachen. Ich habe in allen FormClose allerdings Action := caFree; drin stehen. Ist es dann überhaupt notwendig Free usw. explizit zu benutzen ?

[marabu]

Hallo Hansa,

Zitat von Hansa:

... Im geposteten Code sehe ich jetzt viel finally, free und solche Sachen. ...

Flocke will das so, also mache dich nicht unbeliebt.

Es gibt aber noch ein paar Gründe. Ich arbeite im pull mode, d.h. im modalen Fenster erzeugte Ergebnisse hole ich im aufrufenden Block direkt nach dem ShowModal() - bei OnClose(Action = caFree) würde ich ins Leere greifen. Außerdem erhöht es die Wartbarkeit deines Codes, wenn du Create und Free im selben Kontext und möglichst nahe beieinander stehen hast.

Grüße vom marabu

[oki]

Hi Marco,

das StayOnTop dient ja nur dazu, dass bei einem Klick in das "Hauptfenster" das aktuelle nicht im Hintergrund verschwindet. Du kannst natürlich dein Fenster / Anwendung in die TNA poppen. Hierzu kann man für die Zeit der Bearbeitung das aufpoppen auch blocken.

Nun gut, ich will nicht mit Macht das StayOnTop verteidigen. Das mit der versteckten Application im TNA war so nicht zu erkennen. Für einige Fälle, bei denen der "Hauptbildschirm" am leben bleiben soll während man z.B. ein Eingabefenster bearbeitet war das bei mir immer eine gute Lösung. Es verhindert an der stelle auch sehr gut kleinere vergessene Eingabefenster die dann gerne mal im Hintergrund der Anwendung ihr Leben fristen.

Gruß oki

[Hansa]

Zitat von marabu:

...Außerdem erhöht es die Wartbarkeit deines Codes, wenn du Create und Free im selben Kontext und möglichst nahe beieinander stehen hast...

Das ist schon richtig. Aber nur, wenn es denn überhaupt nötig ist. Nur das wollte ich wissen. Falls das NICHT nötig ist, dann baut man womöglich unnötige potentielle Fehlerquellen ein.

Zitat von marabu:

Flocke will das so...

Von dem ist hier nichts zu sehen. Aber die Zwischenfrage hat sich sowieso erledigt. caFree reicht tatsächlich aus. Delphi macht alles selber.