TThread vs. TObject bzw. gleichzeitig vs. nacheinander

[Angel4585]

Also so schwer wie du sagst ist das doch garnicht, oder?

Also ich habe einen Thread:

Delphi-Quellcode:

TMyThread =class(TThread)
 private
 protected
  procedure Execute;override;
 public
 end;

eine Variable vom Typ TMyThread

MyThread : TMyThread; und Mit folgender Zeile kann ich das ganze starten:

Delphi-Quellcode:

MyThread := TMyThread.Create(True);
MyThread.Resume;

in Execute steht z.B. folgendes:

Delphi-Quellcode:

procedure TMyThread.Execute;
begin
while not Terminated do
 begin
 sleep(10);//Damit der Rechner nicht komplett ausgelastet ist
 Synchronize(Prozedur)//Prozedur aufrufen 
 end;
end;

(Bis jetzt war das ein kinderspiel)
Was muss man jetzt noch wissen?

Ach ja man kann noch nen Konstruktor integrieren:

Delphi-Quellcode:

TMyThread =class(TThread)
 private
 protected
  procedure Execute;override;
 public
  constructor Create(x,y,z : integer);
 end;
.
.
.

constructor TMyThread.Create(x,y,z : integer);
begin
inherited Create(True);
end;

Aufruf ist dann folgender:

Delphi-Quellcode:

MyThread := TMyThread.Create(1,2,3);
MyThread.Resume;