Du kannst es auch auf dem Form darstellen. Du willst doch das sich der Thread aktiviert wenn CheckBox.Checked true ist oder?
Dafür kannst du es auch ganz normal aufs Form setzen. Und bei OnClick machst du folgendes:
Delphi-Quellcode:
//unter der Form-Variable
var MyThread : TMyOwnThread;
procedure TForm2.CheckBox1Click(Sender: TObject);
begin
If CheckBox1.Checked then
begin
If not Assigned(MyThread) then //nur um festzustellen ob der Thred nicht schon erzeugt wurde
MyThread := TMyOwnThread.Create(True) //erstellt den Thread und startet ihn
else
MyThread.Resume; //startet ihn wieder wenn Suspend davor aufgerufen wurde
end
else
MyThread.Suspend; //stoppt den Thread
end;