Threads

Argh :)  har totalt glemt alt om hvordan man laer tråde i delphi :/

Har oprettet tråden "getstr".
procedure getstr.Execute;
var
b : string;
begin
  b:=Form1.IdTCPClient1.ReadLnWait;
  if (b<>'') then
    Form1.Memo1.Lines.Add(b);
end;

- Den skulle vha. Form1.idTCPClient1 (en indy tcp komponent) tjekke om der er nyt data, og hvis der er så sende det til memo1 på form1.

I form1 kalder jeg den med en timer
procedure TForm1.Timer1Timer(Sender: TObject);
begin
Timer1.Enabled:=False;
Unit2.getstr.Create();
Timer1.Enabled:=True;
end;


men Unit2.getstr.Create(); kræver et argument, hvad skal der være ?



- Er åben for andre forslag, skal blot kunne læse en TCP stream og behandle den (uden at den primære form låses).