Registriert seit: 29. Jun 2005
5 Beiträge
|
UpdateResource
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?
|
|
Zitat
|