Problem mit LoadString bei 64 bit

[JohannesK]

Weitere Variante die unter W32 funktioniert, aber unter W64 als Ergebnis in buffer nur ??? liefert.

Delphi-Quellcode:

class function TResourceMeldung.GetOffset(lg: integer): integer;
var
  buffer : array[0..1023] of Widechar;
  ls : integer;
begin
  Result := 0;
  ls := LoadStringW(hInstance, lg, @buffer, length(buffer));
  if ls <> 0 then
  begin
    showmessage(inttostr(length(buffer)));
    showmessage(buffer);
  end;
end;

Hat jemand eine Idee ?

[Bernhard Geyer]

Wie bekommst du hInstance bzw. welche Datei sollt hInstance repräsentieren?

[JohannesK]

Ich benutze nur ein Ressourcenfile, hinstance wird nicht explizit zugewiesen, repräsentiert meine Bibliotheksname.res, in W32 ist wie gesagt bisher kein Problem aufgetreten.

[p80286]

Zitat von JohannesK:

Weitere Variante die unter W32 funktioniert, aber unter W64 als Ergebnis in buffer nur ??? liefert.

    showmessage(buffer);

Dir ist schon klar, daß showmessage nicht den vollständigen buffer-Inhalt anzeigt?
was steht denn in buffer wenn Du den debugger bemühst?

oder immer wieder gern genommen:

Delphi-Quellcode:

for i:=0 to sizeof(buffer) do
  msg:=msg+inttohex(buffer[i],2);
showmessage(msg);

Gruß
K-H

[JohannesK]

Es kommen in beiden Fällen die gleichen Rückgaben: der korrekte Wert 1000 bei WIN32 und ??? bei WIN64.