Probiers öfters aus.
Bei mir geschieht es auch manchmal, dass es 4-5 mal hintereinander problemlos klappt.
:S
Edit:
Hab endlich
etwas gefunden
Lösung
Delphi-Quellcode:
if Buttons[7] then
begin
if not magnifyActive then
begin
// TODO 1: This doesnt work properly
FillChar(magnifyProcess, SizeOf(magnifyProcess), 0);
FillChar(StartupInfo, SizeOf(StartupInfo), 0);
StartupInfo.cb := SizeOf(StartupInfo);
StartupInfo.wShowWindow := SW_SHOW;
StartupInfo.dwFlags := STARTF_USESHOWWINDOW;
Wow64RedirectionDisabled := Wow64DisableWow64FsRedirection(Wow64Value);
magnifyActive := CreateProcess(pWideChar(SysDir + '\magnify.exe'),
NIL, NIL, NIL, True, 0, NIL, NIL, StartupInfo, magnifyProcess);
if Wow64RedirectionDisabled then
Wow64RevertWow64FsRedirection(Wow64Value);
end;
end else
if magnifyActive then
magnifyActive := not TerminateProcess(magnifyProcess.hProcess, 0);
Ich hatte es im Hinterkopf, dass es da evt. zu Problemen kommen kann, wenn man aus 32 Bit 64 Bit Anwendungen startet.. alles im Hinterkopf..
ist mir nur nicht eingefallen =/
Jedenfalls, danke für die Beteiligung
Gute Nacht