[C++ -> Delphi] Zmienne funkcji do hook'a

Mam problem z konwersją aplikacji pod hooka napisanej w C++ na Delphi - konkretnie z tym kodem:

typedef struct tagSharedData {
    HWND hWnd;
} SharedData;

typedef SharedData* PSharedData;

typedef PSharedData __stdcall (*GetMsgRecPointerProc)();
GetMsgRecPointerProc GetMsgRecPointer;

PSharedData lpMsgRec;

Nie bardzo wiem jak w Delphi miałaby wygladać ta deklaracja z uzyciem stdcall [???] .

Cały kod źródłowy (orginalny w C, jak i to co udało mi sie przetłumaczyć na Delphi) udostepniłem na http://www.delphi.is.net.pl/hook.rar.

wpisz normalnie (bez stdcall) poza tym chyba w delphi jest coś takiego jak

stdcall

Hmm, napisz mi "normalnie" taką deklaracje w Delphi:

typedef PSharedData __stdcall (*GetMsgRecPointerProc)();
GetMsgRecPointerProc GetMsgRecPointer;

Ja sie z czymś takim w Delphi nie spotkałem, albo sie spotkałem tylko nie wiem że o to chodzi :-).

to:

typedef struct tagSharedData {
      HWND hWnd;
} SharedData;

typedef SharedData* PSharedData;

typedef PSharedData __stdcall (*GetMsgRecPointerProc)();
GetMsgRecPointerProc GetMsgRecPointer;

PSharedData lpMsgRec;

można zapisac jako:

type 
  tagSharedData=packed record
    hWnd:HWND;
  end;
  SharedData=tagSharedData;
  PSharedData=^SharedData;
  GetMsgRecPointerProc=procedure (Data: PSharedData);

ale coś mi się wydaje że to jest błędne, bo nie moge ściągnąć tego pliku (hook.rar)