Zur Laufzeit erzeugtes Form schließen

[buyden]

Hi,

ich habe ein Form zur Laufzeit erstellt und mit nem Frame bestückt. Jetzt brauch ich aber auch einen Schließen-Button. Ich hab das so versucht:

Delphi-Quellcode:

procedure Tframemessage.btcloseClick(Sender: TObject);
begin
  application.FindComponent(lbformname.Caption).Destroy;
end;

bekomm aber immer ne Zugriffsverletzung. Mit .Free geht's auch nicht, da schließt sich das Form nicht.
Mit dem Schließ-Kreuz geht's problemlos. Was macht das denn anders?

[chaosben]

Versuchs mal mit .Release;

[buyden]

Kennt er nicht.

Undefinierter Bezeichner 'Release'

[TBx]

Hallo buyden!

Ich gehe mal davon aus, daß Du Deinen Frame auf ein TForm legst.
Dann kannst Du folgendes tun:

Delphi-Quellcode:

procedure Tframemessage.btcloseClick(Sender: TObject); 
begin 
  TForm (parent).Close;
end;

Das Free des Forms und des Frames mußt Du dann noch separat lösen.

Gruß

onlinekater

[Angel4585]

Versuch mal im OnClose der dynamischen Form
Action := caFree zu setzen

und dann einfach ein Close;

[buyden]

Funktioniert!!

Dankeschön.

[Angel4585]

Was genau funktioniert? Das Close alleine oder nur mit dem Action = caFree?

[buyden]

ich hab jetzt folgendes:

Delphi-Quellcode:

procedure Tframemessage.btcloseClick(Sender: TObject);
begin
  tform(parent).Close;
end;

und

Delphi-Quellcode:

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

Schließt perfekt und ohne Fehler

[chaosben]

Zitat von buyden:

Kennt er nicht.

Undefinierter Bezeichner 'Release'

Ach sorry ... nicht richtig gelesen.