var
  Thread : TThread;
begin
  Thread := TThread.Create(true);
  Thread.FreeOnTerminate := true; //Dann gibt sich der Thread selber frei
  Thread.Variable := Zahl; //Variable übergeben
  Thread.Resume; //Los gehts

  //Und dann das gleiche nochmal für den zweiten Thread
  Thread := TThread.Create(true);
  Thread.FreeOnTerminate := true;
  Thread.Variable := Zahl2;
  Thread.Resume;
end;