Resourcen bearbeiten

[Roland13]

Hallo Leute

Ich bin bei Delphi noch relativ neu und habe folgendes Problem.

Beruflich übersetze ich seit einiger Softwareoberflächen vom englischen ins deutsche. Bisher habe ich dafür das Programm Reshacker und PE Explorer verwendet. Weil es aber auf Dauer ziehmlich umständlich und zeitaufwendig ist jeden String bzw. jeden Dialog oder was es sonst noch zu übersetzen gibt extra mit der Funktion Suchen zu finden, habe ich beschlossen mir ein komfortables Programm Programm in Delphi zu schreiben. Das erste wird wohl sein, dass ich feststellen muß welche Resourcetypen z.B. in einer dll-Datei vorhanden sind, und diese dann alle auf einmal oder jeden Resourcetyp für sich einzulesen und darstellen.

Kennt sich hier jemand aus und kann mir sagen wie soetwas am einfachsten zu realisieren ist?

im Vorraus besten Dank.

Gruß Roland :wink:

[Olli]

Willkommen in der DP. Folgende Funktionen wirst du dazu brauchen:

EnumResourceTypes
EnumResourceNames
EnumResourceLanguages

Du kennst dich doch zumindest mit der Win32-API aus, oder nicht? Wenn nicht, nochmal rückfragen :zwinker:

[Roland13]

Hallo Olli

Leider kenne ich mich nicht mit der Windows API aus obwohl ich schon davon gehört habe. Ich habe bisher immer nur einfache Programme in VB 6.0, Delphi 7 und Kylix 3 geschrieben.

Es ist nett, dass Du mir gleich geantwortet hast.

Gruß Roland

[Olli]

Ich schreibe dir ein kurzes Beispiel, welches ich dann auch gleich in die Codelib stelle. So haben alle etwas davon. Kann aber ein Weilchen dauern ;)
Das Beispiel wird ein Konsolenprogramm ("DOS-Fenster") sein.

[himitsu]

dat is ja nett von dir ... vorallem, da ich sowas eh demnächst gebrauchen würde ^^


Aber ist das EnumResource... sind doch nur zum Auslesen der Informationen

und soweit i das erkannt habe, dann scheinen Roland und ich ebenso UpdateResource zu benötigen, oder?

[Olli]

Zitat:

Zitat von himitsu

und soweit i das erkannt habe, dann scheinen Rolang und ich ebenso UpdateResource zu benötigen, oder?

Korrekt. Aber dazu gibt es definitiv mehrere Thread hier im Forum ;)

Hier das Thema mit Beispielcode:
http://www.delphipraxis.net/internal...ct.php?t=64467

[himitsu]

OK, dann werd i halt zu gegebener Zeit nochma direkt danach suchen ^^





ach ja ... wie wäre es damit, oder zumindestens 'ner FileNotExists-Meldung?

Delphi-Quellcode:

if (ParamCount() < 1) and FileExists(ParamStr(1)) then 
begin 
  ListResources(ParamStr(1)); 
end
else
begin
  Writeln(Format('Syntax: %s <Filename>', [ParamStr(0)])); 
end;

und...

Code:

** ListResources 
** 
** Nimmt den Dateinamen der EXE oder DLL (oder [color=red][b]einer[/b][/color] anderen PE-Datei[color=red][b])[/b][/color] entgegen[color=red][s])[/s][/color].

[MarcoWarm]

Hi Roland13,

also erstmal herzlich Willkommen im Forum.

Eine einfache Art und Weise an die Ressourcen ranzukommen sind die Routinen von Colin Wilson:
http://www.wilsonc.demon.co.uk/delphi.htm

[Roland13]

Hallo Marco

Diese Routinen bzw. das Programm kenne ich. Es gibt da nur das kleine Problem, dass ich dieses Zeug nicht zum Laufen bekomme. Fehlermeldungen über fehlende Eigenschaften oder ähnliches sind schon zum Alptraum geworden.
Möglich, dass dies auch an mir liegt, da ich mich halt mit Delphi nicht auskenne. Ich habe bisher eigentlich immer nur aus Spaß an der Freud ganz einfache Dinge wie Umrechner oder Taschenrechner programmiert,

Gruß Roland

[MarcoWarm]

Aha... hmmm... mit welcher Delphiversion arbeitest Du? Also ich hab mit D2005 keine Probleme mit den Packages gehabt. Das ganze ResEd-Projekt ist darauf aufgebaut.

[Roland13]

Hallo Marco

Ich habe Delphi 7 installiert, aber ich habe es auch schon mit Delphi 2005 Personal versucht. Auch gibt es diverse andere Programme welche ich weder unter D 7 noch unter D 2005 zum laufen bekomme. Der Grund ist wohl, dass eigentlich immer noch zusätzliche Packages oder Komponenten installiert werden müssen. Und eben das bekomme ich wohl nicht hin (noch nicht).

Gruß Roland

[Olli]

Habe den Code nochmal aktualisiert. Er stellt jetzt auch Stringtable-Blöcke korrekt dar. Außerdem werden jetzt auch (Ressourcen-)Namen verarbeitet, die statt eines Strings aus einem Integer bestehen!

Weiter geht's hier

Nachtrag: Wilsons Code basiert, wie so viele andere Codebeispiele, auf UpdateResource & Co. - daher hat er schonmal gewisse Unzulänglichkeiten direkt eingebaut. Abgesehen von der Beschränkung auf NT gibt, werden PE-Dateien meines Wissens nach durch das Löschen einer Ressource zumindest auf einigen Systemen der NT-Plattform (wie es auf XP ff. aussieht weiß ich nicht) nicht kleiner. Im Prinzip wird die Ressource wohl nur ausgenullt und die Referenz gelöscht. Kann sich dank SPs usw. inzwischen geändert haben - keine Garantien.

[Roland13]

Hi Olli

Könntest Du mir wohl eine kleine genaue Anleitung schreiben, was ich machen muß um Wilsons Resource Explorer zum laufen zu bringen. Denn wie schon erwähnt habe ich bisher auser Fehlermeldungen nichts zu sehen bekommen.

Gruß Roland

[Olli]

Zitat:

Zitat von Roland13

Könntest Du mir wohl eine kleine genaue Anleitung schreiben, was ich machen muß um Wilsons Resource Explorer zum laufen zu bringen. Denn wie schon erwähnt habe ich bisher auser Fehlermeldungen nichts zu sehen bekommen.

Sorry, aber da kann ich dir nicht weiterhelfen. Zumal ich selber nur Delphi 4 habe. Da wirst du dich wohl erstmal mit meinem Programm zufriedengeben müssen.

[Roland13]

Hi Olli

Kein Problem.

Es wird sich schon noch eine Lösung finden wie ich zu meinem Programm komme. Letztendlich muß es ja nicht viel können. Es muß in der Lage sein alle Arten von Resourcen einzulesen diese Darstellen und eine Suchen/Ersetzen-Funktion haben. Eigentlich verwunderlich, dass es eine solche Funktion in Kommerziellen Programmen nicht gibt. Oder kennst Du auch nur eines?

Gruß Roland :wink:

[Roland13]

Hi

Auf der Seite Http://sourceforge.net habe ich ein Programm gesehen ( Resource Builder 0.61 Beta) zum Betrieb braucht dieses Programm 3 Zusätze.:

JVCL hab ich gefunden

SynEdit hab ich gefunden

EXLib hier finde ich nur eine Software welche aber nach einer Art Fitnes-Programm aussieht.

Wer weis was ?

Gruß Roland