Thema: Delphi UpdateResource

Einzelnen Beitrag anzeigen

McPri

Registriert seit: 29. Jun 2005
5 Beiträge
 
#1

UpdateResource

  Alt 21. Dez 2007, 15:58
Delphi-Quellcode:
procedure TForm2.Button1Click(Sender: TObject);
var
  res: HWND;
  s: WideString;
  sv: string;
begin

res := BeginUpdateResource('C:\\Datei.exe', false);
s := WideString('Irgendwas.');

if(UpdateResource(res, RT_STRING, MAKEINTRESOURCE(10), MAKEWORD(LANG_NEUTRAL, SUBLANG_NEUTRAL), PWideString(s), sizeof(s)) = false) then begin

  ShowMessage(SysErrorMessage(GetLastError()));
end;

EndUpdateResource(res, false);

end;
Resourcedatei:

Delphi-Quellcode:
STRINGTABLE
BEGIN
10, "String1"
20, "String2"
30, "String3"
40, ""
50, ""
70, "String5"
END


Klappt irgendwie nicht

Kann mir jemand helfen?

Konkretes Problem: Wie übergebe ich bei UpdateResource die String-ID?
  Mit Zitat antworten Zitat