Kann Thread nicht mehr starten

**TheMiller**

Hallo,

ich versuche, einen Thread mit BeginThread zu starten. Dazu benutze ich folgenden Code:

Delphi-Quellcode:

			function TForm1.Calc: Integer;

begin

  result:=1;

end;

procedure TForm1.Button1Click(Sender: TObject);

var

  ThreadID: DWORD;

  ThreadHandle: THandle;

begin

  ThreadHandle:=BeginThread(nil, 0, @Calc, nil, 0, ThreadID);

end;

Doch immer, wenn ich das Projekt starten will, meckert der Compiler und setzt mir den Cursor hinter "@Calc". Der Compiler sagt:

Zitat von Compiler:

[Fehler] Unit1.pas(36): Variable erforderlich.

Was habe ich für einen Fehler gemacht?

danke

Kann Thread nicht mehr starten

Kann Thread nicht mehr starten

Forumregeln