String Table austauschen

[SleepyMaster]

Hi ihrs

weiß jemand von euch, wie ich ein Ressourcen String Table austauschen kann???

Mein bisheriger Code:

Delphi-Quellcode:

function ChangeString(const FileName;NewString: string): Boolean;
var
  hUpdate: Cardinal;
  s:string;
begin
  Result:= False;
  hUpdate:= BeginUpdateResource('C:\Project1.exe', false);
  if hUpdate = 0 then Exit;
  try
    s:=NewString;
    Result:= UpdateResource(hUpdate, 'String Table','1', 0, @s[1], Length(s));
  finally
    EndUpdateResource(hUpdate, not Result);
  end;
end;

Mein Ressourcen Script:

Code:

STRINGTABLE
{
 1, "abcdefghijklmnopqrstuvwxyz"
}

Wie man im Anhang sieht, hat er nicht das String Table ersetzt, sondern nur noch eins hinzugefügt!
Ich glaub mein eigentliches Problem ist, dass ich nicht weiß was als zweiter Parameter bei UpdateResource rein muss!

Vielen Dank
SleepyMaster