Laufschrift hängt

[SaFu]

könnte ich das ungefähr so machen habe keine anhnung von thread

den code hatte wir mal in der schule angeschnitten

Delphi-Quellcode:

function lauf() :integer;
var x :integer;
begin
 müsste hir das laden der fils rein????
end;

procedure TForm1.Button2Click(Sender: TObject);
Var ThreadID :Dword;
begin
  CreateThread(nil, 0, addr(lauf), nil, 0, ThreadID); // win Api Funktion
end;