Einzelnen Beitrag anzeigen

Achim Kalwa

Registriert seit: 2. Apr 2005
Ort: Lienen
110 Beiträge
 
Delphi 12 Athens
 
#41

Re: Jedi VCL und Delphi Turbo Exp.

  Alt 10. Sep 2006, 12:22
Zitat von DevilsCamp:
Delphi-Quellcode:
procedure Form1Create(Sender: TObject);
begin
  NTListbox1 := TNTListbox.Create(Self); // oder entsprechende andere Komponente statt Self;
  NTListbox1.Parent := Self; // wie oben
  
  // Nun alle weiteren Properties setzen:
  // Width, Height, Left, Top, usw.
end;

procedure Form1Close(Sender: TObject);
begin
  NTListbox1.Free;
end;
Ensprechend für jede weitere Komponente, die nun nicht mehr per OI eingerichtet werden kann.
NTListbox1.Free ist ein böser Fehler!
Du hast die Komponente bereits der Verwaltung des Forms übergeben, also kümmert sich das Form auch um die Freigabe der Komponente.

Achim
Achim
  Mit Zitat antworten Zitat