Ich würde die Forms (wie DeddyH sagt) wenn möglich erst zur Laufzeit erzeugen:

zusammenfalten · markieren

Delphi-Quellcode:

type
  TFormIrgendwas = class(TForm)
    //...
  public
    class function Execute: Boolean;
  end;

...
...

class function TFormIrgendwas.Execute: Boolean;
begin
  with TFormIrgendwas.Create(nil) do
  begin
    Result := ShowModal = mrOK;
    Free;
  end;
end;

...

procedure TForm1.Button1Click(Sender: TObject);
begin
  if TFormirgendwas.Execute then
    ShowMessage('Fenster mit "OK" geschlossen')
  else
    ShowMessage('Fenster mit "Abbrechen" geschlossen');
end;

class function wird Delphi 7 wohl nicht nehmen wollen IIRC, aber das geht ja auch ganz konservativ.

markieren

Delphi-Quellcode:

if not Assigned(FormBla) then
  FormBla := TFormBla.Create(Application);
FormBla.Show;

Zitat von DeddyH:

class function wird Delphi 7 wohl nicht nehmen wollen IIRC

Klassenmethoden sind auch in D7 möglich, nur Klassenattribute gibt's da noch nicht.

Ah, so war das, ich hatte es nicht mehr genau in Erinnerung. Danke

btw.:
Ich glaube ich habe mal irgendwo aufgeschnappt, dass man dieses automatische Erstellen der Formulare deaktivieren kann, finde die Option aber nirgends.
Gibt es so eine Option doch nicht, oder bin ich nur blind?

In den Projektoptionen unter Formulare. Links sind die automatisch erstellten, rechts die verfügbaren.

Zitat von Morphie:

btw.:
Ich glaube ich habe mal irgendwo aufgeschnappt, dass man dieses automatische Erstellen der Formulare deaktivieren kann, finde die Option aber nirgends.
Gibt es so eine Option doch nicht, oder bin ich nur blind?

Delphi 7: Tools - Umgebungsoptionen - Designer - Autom. Formulare und Datenmodule
Delphi XE: Tools - Optionen - Umgebungsoptionen - VCL-Designer - Autom. Formulare und Datenmodule

Die anderen starte ich jetzt nicht extra.

Ach das war gemeint. Ich geh mich mal 'ne Runde schämen.

Zitat von DeddyH:

class function wird Delphi 7 wohl nicht nehmen wollen

doch!

Das haben wir doch bereits geklärt (#10 und #11).