Ich hab' jetzt den Code mal so geändert:
Delphi-Quellcode:
class function TResourceMeldung.GetOffset(lg: integer): integer;
var
buffer : PWidechar;
ls : integer;
begin
Result := 0;
ls := LoadStringW(hInstance, lg, @buffer, length(buffer));
if ls <> 0 then
begin
Result := strtoint(buffer^);
end;
end;
Bei WIN64 kommt jetzt ein Fragezeichen statt vorher dreien.
In WIN 32 ist das Ergebnis 1000200030004000, erwartet und in der Ursprungsversion geliefert wird 1000. Setze ich einen anderen Startpunkt, wird das Ergebnis entsprechend verkürzt, z.B. auf 30004000.
Das sollte eigentlich gar nicht gut gehen!
1. buffer ist nicht initialisiert worden und somit zeigt der Pointer irgendwohin.
2. sollte beim Aufruf wohl besser das @-Zeichen weggelassen werden, sonst hat man einen Pointer auf den Pointer