Gibt es einen bestimmten Grund, warum du den Wert für FS:[0] über EAX umleitest?
Wenn nicht, dann könnte es doch so aussehn ^^
Delphi-Quellcode:
procedure CallProcedure...
asm
...
// Restore exception handler
POP FS:[0]
ADD ESP, 4
// POP &ExceptionHandler
end;
Und zusätlich müßte man so dann sogar 'n parameterlose
Funktion übergeben können.
z.B.
Delphi-Quellcode:
Type TParameterlessFunction = Function; register;
Function CallFunction(TargetFunction: TParameterlessFunction;
ExceptionHandler : TExceptionHandlerProc): Integer;
{der Rest ist gleich}
Und mal sehn was ich hiermit anfangen kann ^^