Problem mit verschiedenen Forms

[himitsu]

Auch Modale Forms kann man mehrmals erzeugen.

Nimm z.B. eine TForm1, da drauf ein Button und darin dann

Delphi-Quellcode:

F := TForm1.Create(Self);
F.ShowModal;

Aber gerade dann, wenn Forms mehrfach erzeugt werden, darf man die globalen Form-Variablen vom Delphi nicht mehr benutzen.

Und bei Freigabe der Forms werden diese globalen Variablen nicht automatisch auf NIL gesetzt. Ein Publisched-Field im Owner der neuen Form würde automatisch NIL, wenn es genau so heißt, wie die neue Form (aber in diesem Owner darf/kann es dann auch nur je eine einzige Instanz geben)

[hoika]

Hallo,
das ja zwei Fragen.

Zitat:

Ausserdem werden bei Button1Click bzw. Button2Click immer neue Fenster göffnet.

Du erzeugst ja auch jedes Mal mit TFormx.Create ein neues Fenster.

Delphi-Quellcode:

Form3 := TForm3.Create( Self );
Form3.Show;

Delphi-Quellcode:

if Form3=nil then
begin
  Form3 := TForm3.Create( Self );
end;
Form3.Show;

Zitat:

Bei Form3.Close bzw. Form4.Close erhalte ich 'AccessViolation'.

Wo genau?

Nimm besser
FreeAndNil(Form3);


Die Frage wäre hier auch noch, wer schließt Form3 und Form 4, in meinem Fall hier ist es das Hauptformular (Form1).
Sollte Form3 sich selber schließen wollen, rufst du Close in Form3 auf (Form3.Close wäre das gleiche, muss aber nicht, macht man auch nicht).
Dann musst du dem Hauptform irgendwie beibringen, das die globale Variable Form3 auf nil gesetzt werden muss.

[günni0]

Zitat:

Dann musst du dem Hauptform irgendwie beibringen, das die globale Variable Form3 auf nil gesetzt werden muss.

Ich habe irgendwo mal gelesen, dass sich für solche Fälle (Fenster öffnen, erstellen, schließen, bekannt-machen und so) jemand eine Art Wrapper-Unit geschrieben hat, die für all das zuständig ist und auch über alles bescheid weiß.
Also im Prinzip eine einfache Unit die alles macht, tut, weiß und super-schlau ist.

Vielleicht hilft sowas ja.

[hoika]

Hallo,
das wäre eine gute Entkopplung von Hauptformular.