non-vcl Thread innerhalb einer Klasse deklarieren

**Nogge**

Hallo Community,
Ich stehe gerade vor einem Syntaxproblem (jedenfalls hoffe ich das ganz stark!). Ich möchte eine non-vcl-Thread-Klasse erstellen, die in etwa so aussehen sollte:

zusammenfalten · markieren

Delphi-Quellcode:

			TMyClass = class

  private

    [...]

    TMyThread = function dummyThread(Ptr: Pointer): DWORD; //funzt so leider nicht

    myThread: TMyThread;

  public

    procedure callThread();

  end;

[...]

function TMyDialog.dummyThread(Ptr: Pointer): DWORD; // dummyThread ist Bestandteil der Klasse TMyDialog

begin

  result := 1;

end;

procedure TMyDialog.callThread();

begin

  tHandle := BeginThread([...], @myThread, [...]);

  tHandle := BeginThread([...], @dummyThread, [...]); // Syntaxfehler!

end;

BeginThread verlangt eine Variable vom Typ TThreadFunc und genau das ist das Problem. Sobald dummyThread als Bestandteil einer Klasse deklariert wird, ist es keine Variable mehr. Kann mir jemand sagen, ob man dies iwie umgehen kann?

mfg Nogge

non-vcl Thread innerhalb einer Klasse deklarieren

non-vcl Thread innerhalb einer Klasse deklarieren

Forumregeln