habs jetzt schonmal hinbekommen, dass es startet
Delphi-Quellcode:
procedure TfrmChangeAppName.Button1Click(Sender: TObject);
var
h : Thandle;
s : string;
begin
s:= edit1.Text;
h := BeginUpdateResource(pchar(AppPath),false);
UpdateResource(h,RT_VERSION,MakeIntResource(1),0,@s[9],SizeOf(s));
EndUpdateResource(h,false);
end;
bei klick auf den button passiert einfach nichts... keine fehlermeldung und auch die datei ist nicht geändert...
an der stelle wo die 9 steht, hatte ich auch schon ['ProductName'] stehn, aber dann kommt: [Pascal Fehler] changeappname.pas(39): E2010 Inkompatible Typen: 'Integer' und 'string'
die 9 hatte ich nur zufällig... hätte auch ne 5 sein können
