Registriert seit: 15. Jun 2010
Ort: Augsburg Bayern Süddeutschland
3.470 Beiträge
Delphi XE3 Enterprise
|
AW: Thread Verständnis Frage
18. Nov 2010, 16:17
@Klause01
bist Du sicher ... ich kann mir nicht vorstellen daß die Threads sich bei Terminierung aus der Objektliste entfernen.
Delphi-Quellcode:
Var
o:TObjectList<TButton>;
procedure TForm1.Button1Click(Sender: TObject);
var
b:TButton;
begin
o:=TObjectList<TButton>.Create;
o.OwnsObjects := true;
o.Add(TButton.Create(self));
o.Add(TButton.Create(self));
b := o[0];
b.Free;
Caption := IntToStr(o.Count);
// knallt natürlich o[0].Parent := self;
end;
Thomas Wassermann H₂♂ Das Problem steckt meistens zwischen den Ohren
DRY DRY KISS
H₂♂ (wenn bei meinen Snipplets nichts anderes angegeben ist Lizenz: WTFPL)
|