TExtraResManager

[jonny]

Hallo habe mal ne Frage zu dem TExtraResManager von Motzi.

Also ich habe schon alles ausprobiert und ich krieg es einfach nicht hin.

Also ich schreibe ein paar Dateien als Extra Ressource in eine EXE und will sie dann auslesen und das klappt irgendwie nicht ich bekomme nichts ausgelesen. Es gibt keine Fehlermeldung das da keine ExtraRessourcen gibt es passiert einfach nichts auch wenn ich auch nur die Anzahl der Ressourcen ausgeben will passiert auch nichts keine Ausgabe. Wass kann das Sein kann mir jemand sagen wie ich mit dem TExtraResManager umgehen muss.

[jonny]

Hat denn keiner ne Idee? oder ein Beispiel wie ich mit der Komponente umgehen soll?

[Edit] ups das war nicht absicht das das zweimal hier eingetragen wird.

[edit=Christian Seehase]Doppelpost gelöscht. Mfg, Christian Seehase[/edit]

[Luckie]

Wie wäre es, wenn du dich direkt an den Autor der Komponente wendest, anstatt hier darauf zu hoffen, dass er mal vorbei kuckt, wenn er überhaupt hie rregistriert ist.

[FriFra]

Der Autor ist hier registriert...

http://www.delphipraxis.com/user2049.html


Ich verwende diese Komponente übrigens auch Poste doch bitte mal etwas Code, dann kann man vielleicht sehen, was falsch ist.

[jonny]

OK Schreiben in eine EXE Datein:

Delphi-Quellcode:

  ExtraResManager.AddFile(edSoundFileName.Text, 1, 'Sound');
  ExtraResManager.AddFile(edLogoFileName.Text, 2, 'Logo');
  ExtraResManager.AddFile(ExtractFilePath(Application.ExeName) + cboxLanguages.Text + '.lng', 3, 'Language');
  ExtraResManager.SaveToEXEFile(FolderDialog.Directory + '\Anwendung.exe');

Lesen aus der EXE (sichselber):

Delphi-Quellcode:

  If ExtraResManager.HasExtraResources(Application.ExeName) Then
  begin
    ExtraResManager.LoadFromEXEFile(Application.ExeName);
    For I:=0 To ExtraResManager.Resources.Count - 1 Do
    begin
      If ExtraResManager.Resources.Items[I].ResName = 'Sound' Then
        ExtraResManager.Resources.Items[I].SaveToFile('C:\sound.wav')
      else
      If ExtraResManager.Resources.Items[I].ResName = 'Logo' Then
        ExtraResManager.Resources.Items[I].SaveToFile('C:\logo.bmp')
      else
      If ExtraResManager.Resources.Items[I].ResName = 'Language' Then
        ExtraResManager.Resources.Items[I].SaveToFile('C:\language.lng');
    end;
  end;

[Motzi]

Zitat von Luckie:

[..]wenn er überhaupt hie rregistriert ist.

Als dass du nicht wüsstest, dass ich hier registriert bin...!

@jonny: also das kann ich nicht ganz nachvollziehen...! Schick mir mal die Anwedung mit den angehängten Daten an [e-mail] dann schau ichs mir mal an..

[Luckie]

Weiß ich von wem die Kompo ist? Das du sowas ähnliches hast, weiß ich.

[Motzi]

Zitat von jonny:

Hallo habe mal ne Frage zu dem TExtraResManager von Motzi.

[Luckie]

Ok, einen habe ich noch, dann wird es offtopic:
Woher soll ich wissen, dass du gemeint bist? Es gibt bestimmt noch mehrere Motzi's.