PNG-Bilder in Exe einkompilieren?

[Light]

Hallo Ihr,

@turboPASCAL: Ein ganz großes DANKE Schön!


Mein Problem wieso ich es geschafft habe die Res zweimal einzubinden war -
ich habe sie in der Unit versucht ein zweites mal einzubinden,
da ich nicht wusste das sie im Projekt als solche eingebunden wird


Es Funktioniert:
Ich habe Es jetzt so gelöst

Delphi-Quellcode:

...
procedure TFHaupt.GetSetPic(Name:String;XXImage: TImage);
var p:tpngobject;
begin
  p := tpngobject.Create;
  p.LoadFromResourceName(HInstance,PChar(Name));
  XXImage.Picture.Assign(p);
  freeandnil(p);
end;
...

So kann ich an Beliebiger Stelle in Meinem Programm ein Bild Laden!

So kann man das Ganze dann einfach Aufrufen:
GetSetPic('MainBG',IBackground); Meine .RC Datei sieht momentan noch So aus - wird sich wahrscheinlich noch ein bisschen füllen

Delphi-Quellcode:

MainBG RCDATA "f:\Delphi\Delphi_Turbo_2006\explorer_ersatz\V01_S_explor\Layout\1024x768.png"
PWBG RCDATA "f:\Delphi\Delphi_Turbo_2006\explorer_ersatz\V01_S_explor\Layout\PWD400.png"
RahmenB RCDATA "f:\Delphi\Delphi_Turbo_2006\explorer_ersatz\V01_S_explor\Layout\Rahmen_Button.png"
ExitB RCDATA "f:\Delphi\Delphi_Turbo_2006\explorer_ersatz\V01_S_explor\Layout\Exit.png"
OptionsB RCDATA "f:\Delphi\Delphi_Turbo_2006\explorer_ersatz\V01_S_explor\Layout\Options.png"
InfoB RCDATA "f:\Delphi\Delphi_Turbo_2006\explorer_ersatz\V01_S_explor\Layout\Info.png"

Fragt mich bitte nicht was daran jetzt so schwer war
Ich schätze es waren zu viele Sachen auf einmal die Falsch waren...

DANKE FÜR DIE HILFE EUCH ALLEN!

Leuchtende Grüße

Stefan

alias Light