Prüfen, ob ShowModal läuft?

[KodeZwerg]

Vorschlag:
Ein neues Hauptformular erstellen was im End-Effekt nur ein Wrapper für die anderen Formulare wird.
Vielleicht ein mini-Fenster (ohne Titelleiste) mit ein paar Knöpfen drauf um die Formulare sichtbar zu machen?
(oder die Knöpfe als multi-funktions-anzeige nutzen, beispiel geöffnete Formulare = der Knopf hat ein anderes Bild)
Die Original Formulare selbst aus der .dpr rausnehmen und dynamisch einbinden, jetzt nur noch eine Fenster-Kontrolle einbauen damit nichts doppelt geöffnet wird.
Nachtrag: das Wrapper Fenster kann ja in den SysTray abgelegt werden sowie ein Formular offen ist, oder ein miniaturisiertes Formular, oder transparent oder dies oder das.
Dreh- und Angelpunkt ist dann der Wrapper dem Du alles beibringen musst was Du benötigst, könnte auch dienen um Daten zwischen Formularen auszutauschen (senden/empfangen). Je nach Bedürfnis.
Achja, und generell auf ShowModal in diesem Zusammenhang verzichten da ja verschiedene Fenster aktiv sein könnten oder ShowModal konsequenter einsetzen ohne das im ShowModal weitere Fenster erstellt werden.
Ich nutze ShowModal nur bei Fenstern wo ich unbedingt eine User-Eingabe erwarte. Beispiel: Datei überschreiben Dialog.
Ps: Ich habe auch bei ShowModal oft das Problem das falls ein Fehler Auftritt, der Windows-Fehler-Dialog "unter" dem ShowModal erstellt wird, sprich: ich komm nicht ran um "Ok" zu klicken. Alt-Tab und Eingabetaste mag zwar eine Notlösung sein, aber ein nicht-OnTopModal-Fenster ist unkomplizierter in solchen Fällen.

[hoika]

Hallo,

Zitat:

Die Original Formulare selbst aus der .dpr rausnehmen und dynamisch einbinden,

OK, das geht einfach

Zitat:

jetzt nur noch eine Fenster-Kontrolle einbauen damit nichts doppelt geöffnet wird.

Aber
Form2 öffnet Form3, Form3 öffnet Form2, Form2 öffnet Form3

Wie soll das gehen?
Dazu müsste man sich den jeweiligen Status merken.

[Jasocul]

Einige Vorschläge gruseln mich wirklich.

1. Die Formen (in dieser Konstellation) immer dynamisch erzeugen.
2. Kein direkter Zugriff von einer Form auf die andere und umgekehrt. Parameter sind da hilfreich beim Erzeugen.

Ich mache das üblicherweise so:

Delphi-Quellcode:

class function TForm3.ShowFormModal(Sender: TComponent; <Parameterliste>): TModalResult;
var
  frm : TForm3;
begin
  frm := TForm3.Create(Sender);
  try
    Result := frm.ShowModal;
  finally
    frm.Free;
  end;
end;

Bitte beachten, dass es sich um eine CLASS FUNCTION handelt.
Wenn man das analog für Form2 macht, kollidiert auch nichts.
Ein eventueller Informationsaustausch erfolgt über die angedeutete Parameterliste. Mit Var-Parametern kann man sich dann auch Informationen zurück geben lassen.

Die entsprechenden globalen Variablen Form2 und Form3 zur Sicherheit gleich löschen. Dann kann man die auch nicht mehr versehentlich benutzen.

[himitsu]

Und soll diese Form nur einmal existieren, dann kommt frm in eine CLASS VAR. (Free > FreeAndNil)
So kann man vor dem Create mit Assign prüfen und dann entweder einen Fehler werfen oder die bestehende Form wiederverwenden, also z.B. mit neuem Inhalt füllen.

[KodeZwerg]

Genau @himitsu, in manchen Projekten verwende ich es so.
Nur das bei mir der Wrapper ein unsichtbares 1x1px Fenster ist, Form1 wird automatisch geöffnet.
Die Formulare haben keinen Zugriff untereinander, das regelt alles der Wrapper.
Wenn Form1 nun Form2 sichtbar haben will, wird eine Anfrage an Wrapper gestellt,
der weiß zu jedem Zeitpunkt was in welchen Modus offen ist.
Wenn Form1 was an Form2 schicken will, geschieht dies, na ratet mal, genau, über den Wrapper.
Auf diese Weise kann man alles ohne komplikationen Regeln, jedenfalls traten bei mir (noch) keine auf.
Ob Form2 beim klick auf [X] nun Zerstört oder versteckt wird oder lediglich Form1 Fokus bekommt, muss jeder selbst Entscheiden.

[günni0]

Kann man statt einem Fenster-Wrapper nicht eine Unit ohne sichtbares Fenster nehmen?

[KodeZwerg]

Bei mir hat es den Hintergrund, mein 1x1 Fenster dient mir gleichzeitig als Log was auch dargestellt werden kann.
Wenn kein Wrapper Fenster, dann ist soweit ich weiß, wenn Du das erste Fenster [X]'st = Programm ist geschlossen.
Also wenn Form1 als Standard genommen wird und Form1 [X] dann ist alles zu.
Wenn ein Wrapper Fenster, ob sichtbar oder nicht, existiert, kann auch das Programm überleben.
Bei mir wird das 1x1 Fenster normalisiert sowie kein Formular angezeigt wird.

Man kann natürlich auf einen Wrapper verzichten und alles in der Form1 Regeln lassen bei in etwa gleichem Prinzip.