Delphi TTreeNode gelöscht - Thread gelöscht...?

Thema durchsuchen

Ansicht

Themen-Optionen

TTreeNode gelöscht - Thread gelöscht...?

Ein Thema von ralfi · begonnen am 14. Apr 2004 · letzter Beitrag vom 3. Mai 2004

Vorheriger Beitrag

Nächster Beitrag

shmia

Registriert seit: 2. Mär 2004
5.508 Beiträge

Delphi 5 Professional

Re: TTreeNode gelöscht - Thread gelöscht...?

14. Apr 2004, 13:44

markieren

Delphi-Quellcode:

			procedure TForm1.MakeNewThread(const tname:string);

var

   thread : TThread;

   node : TTreeNode;

begin

   thread := TMyThread.Create(True);  // neuen Thread erzeugen

   node := TreeView1.Items.Add(nil, tname);  // neuen Knoten erzeugen

   node.Data := Pointer(thread);     // <-- Zeiger auf Thread-Objekt im TreeNode merken

   thread.Resume;  // Thread losrennen lassen

end;