Function in Thread auslagern

**Salomon**

Hallo,
ich habe eine Funktion bei deren Abarbeitung das ganze Programm hängt. Nun wollte ich diese in einen Thread auslagern. Das Problem ist, das ich in der Funktion auf die Listboxen der Form zugreifen muss. Ich weiß nicht wie ich das machen kann.

Ich habe folgenden Codeschnipsel bei mir gefunden, nur kann ich damit wie gesagt nicht auf die Komponenten der Form zugreifen:

zusammenfalten · markieren

Delphi-Quellcode:

			type 

  TMyThread = class(TThread) 

  protected 

    procedure Execute; override; 

  end; 

procedure TMyThread.Execute; 

begin 

  //Mach irgendwas 

end; 

procedure StartThread; 

var 

  MyThread: TMyThread; 

begin 

  MyThread:=TMyThread.Create(true); 

  MyThread.Priority:=tpLower; 

  MyThread.FreeOnTerminate:=true; 

  MyThread.Resume; 

end;

Thx Salomon

Function in Thread auslagern

Function in Thread auslagern

Forumregeln