|
Registriert seit: 12. Aug 2003
Ort: Soest
4.012 Beiträge
Delphi 10.1 Berlin Enterprise
|
AW: Inline Assembler: CALL
13. Sep 2016, 23:35
Also thiscall (ECX = Pointer zur Objektinstanz) ist auch ohne Assembly möglich:
Delphi-Quellcode:
type
TFunctionPointer = function(A, B, C: Integer): Integer of object;
// Aufruf
var
Method: TMethod;
begin
Method.Code := Pointer($00401234); // Adresse der Funktion
Method.Data := Pointer($00749624); // Adresse der Objektinstanz
Result := TFunctionPointer(Method)(1, 2, 3);
Das ist nicht korrekt. thiscall geht  so
|