Problem mit OpenFileMapping bei Tastaturhook

[Wotan89]

Hallo!
Ich hab mir mal auch einen Tastaturhook geschrieben, welcher soweit einwandfrei funktioniert, wenn ich meine exe manuell öffne. Wenn ich meine exe jedoch durch einen Service starten lasse, kann OpenFilemapping nur mit Leserecht mein MMF auslesen.

So startet mein Service die exe:
Shellexecute(0,'open','C:\Test.exe',nil,nil,sw_show);//mein servie hat kein Fenster -> erstes Parameter gleich 0
Meine exe lädt die DLL:

Delphi-Quellcode:

var hookinstall: function(hwnd:cardinal):boolean; stdcall;
begin
[...]
hdll:=loadlibrary(pchar(getwindir+'winklg.dll'));
hookinstall:=getprocaddress(hdll,'HookInstall');
if @hookinstall<>nil then
  hookinstall(Form1.Handle);
end;

Und so sieht meine DLL beim starten aus:

Delphi-Quellcode:

function HookInstall(hwnd:cardinal):boolean; stdcall;
begin
result:=false;
hwnd2:=hwnd;  //ich brauch das WindowHandle meiner Anwendung, daher speichere ich sie in ein MMF
maphandle:=CreateFilemapping(INVALID_HANDLE_VALUE,nil,PAGE_READWRITE,0,Sizeof(hwnd2),'Test');  //eigentlich komplette Rechte
p:=mapviewoffile(maphandle,File_map_all_access,0,0,0);                                              
if p<>nil then begin
  cardinal(p^):=hwnd;
  Unmapviewoffile(p);
end;
hook:=SetWindowsHookex(WH_Keyboard,@Getmessage,hinstance,0);
if hook<>0 then 
  result:=true;
end;

exports
HookInstall, HookUninstall;
begin
maphandle:=openfilemapping(File_map_read,false,'Test');  //wenn ich FILE_MAP_READ durch FILE_MAP_WRITE ersetze funktioniert es nur noch, wenn ich meine exe manuell starte
p:=mapviewoffile(maphandle,File_map_read,0,0,0);              
if p<>nil then  begin
  hwnd2:=cardinal(p^);
  unmapviewoffile(p);
end;
closehandle(maphandle);
end.

Hat jemand irgendeine Ahnung, woran es liegen könnte? Mir erschließt sich die Antwort noch nicht, schonmal danke für jede Hilfe.
MFG Wotan