Direkt aus dem Typ fällt mir jetzt nur die
RTTI ein,
oder wie man es über eine Zeiger macht (siehe unten),
und ich glaub im Assembler ging es so
MOV EAX, OFFSET THash_SHA.FDigest
.
Delphi-Quellcode:
var X: THash_SHA;
i := NativeInt(@X.FDigest) - NativeInt(@X);
Wo ich grad nochmal drüber nachdachte, hab ich mal versucht die Rechnung zu kürzen
und (ungetestet) könnte es vielleicht so
NativeInt(@THash_SHA(nil).FDigest)
gehn.
Alternativ mach einen Boolean als Parameter und an der Stelle quasi ein IF-THEN-ELSE,
bzw. einen Integer mit IF-THEN, bzw. sowas wie ein CASE,
und dann dort die beiden Codes rein.
Delphi-Quellcode:
// ob es mit einer "Variable" direkt so geht
lea edi, [eax + DasOffset]
// glaub ich nicht, falls es nicht direkt ein Register ist, sondern eine Referenz, weil es ja vermutlich
// sowas geht ja nicht, auch nicht implizit
lea edi, [eax + [DasOffset]]
// also falls nicht Register, dann irgendwie so (oder mit anderem Register und ADD)
inc eax, DasOffset
lea edi, [eax]