Frams in Delphi

[fredi]

ich bin jetzt von
AForm := TEingabeForm.Create(NIL); auf
AForm := TEingabeForm.Create(self); gewechselt.

und jetzt gibts auch bei

procedure TEingabeForm.FormClose(Sender: TObject;
var Action: TCloseAction);
begin
Action := caFree
end;

keine Fehlermeldung mehr.

jetzt würde mich noch interessieren ob die Form aus dem Speicher draussen ist oder nicht.

hat da jemand eine Prüfroutine?

fredi

[Union]

Schau mal unter MemProof

[fredi]

gibt es eine Möglichkeit alle vorhandenen Forms eines Projektes in einem memo aufzulisten?

[Hansa]

Zitat:

Zitat von fredi

procedure TEingabeForm.FormClose(Sender: TObject;
var Action: TCloseAction);
begin
Action := caFree
end;
jetzt würde mich noch interessieren ob die Form aus dem Speicher draussen ist oder nicht.

Die ist raus ! Hat mich selbst gewundert, daß ein Wort dafür reicht. Zum Hauptthema : wieder Fall für Objektablage/Repository. Hierarchie der Forms aufbauen und immer erweitern. Ich habe das so gemacht :

1. Form : handelt nur Tastatur ab. Esc Form schließen, Return zum nächsten Feld, Zahlen rechtsbündig usw. Das Ding schiebe ich ins Repository.

2. Form : Die soll noch ein paar Edits besitzen und ich nehme sie aus dem Repository. Neu -> andere -> 1. Form aber inherited (unten die Radiogroup) !!

Lege ich jetzt meine Edits auf diese Form, sonst nichts, dann haben die genau die Eigenschaften wie in der 1. Form eingeführt, z.B. mit Return ins nächste Feld. Tja und das mit dem caFree ? Das wurde gleich miteingebaut. Und zwar in die 1. Form. Bereits da steht im FormClose : Action := caFree;

In der zweiten steht lediglich eventuell inherited, sofern ich da noch was anderes im FormClose tun muß. Ansonsten wird das FormClose der 1. Form ausgeführt und somit auf jeden Fall das caFree. Man darf nur das eventuell automatisch eingefügte Wort "inherited" nicht löschen. 8)

[fredi]

hat jemand eine Idee wie ich auf dynamisch erstellte Formen von außen zugreifen kann,
ich möchte Formes mit einem Button am Bildschirm anordnen bzw. ablegen.
Der Zugriff mit Screen.Forms[I] führt leider in eine Sackgasse, weil nach dem Ablegen die Formen nicht mehr in der Reihenfolge sind wie vorher. Es ist nicht möglich mit Screen.Forms[I] gezielt auf eine spezielle Form zuzugreiffen. Welche Möglichkeiten gibt es da?

fredi