eingebunde Resourcen abfragen (RCDATA)

[thomasschaf]

Hallo,

entschuldige himitsu. (Ich habe die verstecke Nachricht übrigens auch gelesen).
Du hast völlig recht, nach weiteren Versuchen konnte ich feststellen:
das Problem liegt definitiv darin, wie die Resource in die Exe geschrieben wird.

Dazu die Funktion:

Delphi-Quellcode:

function SetRes(filename, resname, resvalue: string; langid: word;
  delex: boolean): boolean;
var
  hUpdate: THandle;
  Size:    DWord;
begin
  hUpdate := BeginUpdateResource(PChar(filename), delex);
  if (hUpdate <> 0) and (hUpdate <> INVALID_HANDLE_VALUE) then
  begin
    try
      Size   := Succ(Length(resvalue)) * SizeOf(char);
      Result := UpdateResource(hUpdate, RT_RCDATA, PChar(resname),
        langid, PChar(resvalue), Size);
    finally
      EndUpdateResource(hUpdate, False);
    end;
  end;
end;

// Aufruf:
SetRes(f2, Edit1.Text, Edit2.Text, StrToInt(Edit3.Text), CheckBox1.Checked)

// Rückgabewert ist immer True.

Beispiel:
Edit1.text = TEST
Edit2.text = Hallo
Edit3.text = 0
checkbox1.checked = false

---

Nun erhalte ich aber, wenn ich versuche die Datei zu öffnen, in die ich geschrieben habe, sofort die Fehlermeldung siehe Anhang.

[himitsu]

Prüf mal, ob die LangID stimmt.
Diese Resource-Funktionen gehn immer nur auf eine Sprache los.
Wenn also eine andere Sprache angegeben wurde, dann kann das natürlich nicht gefunden werden.

[thomasschaf]

Die Langid ist bei den anderen Resourcen 1033, deswegen habe ich die auch mal ausprobiert.
Leider hat es nicht funktioniert.

Das folgende Problem tauch aber unabhängig davon immer auf:
Nur ein Teil der ReadProcessMemory- oder WriteProcessMemory wurde abgeschlossen

Und zwar sofort nachdem ich die modifizierte EXE starte.
Es ist eine Windows-interne Fehlermeldung.
(siehe Anhang letzten Posts von mir)


Ich mache durch meine Funktion SetRes also die exe (hier: filename) kaputt, wie es scheint.

Ich würde mich freuen, falls es doch noch möglich ist, das Problem zu lösen.