Per Code Imagelist Laden

[f4k3]

Moin Moin liebe DPler,

hab folgendes Problem ... ich schreib ne kleine Anwendung die aus 4 verschiedenen Ordnern Bilddateien einer ImageList hinzugefügt werden sollen.
nur hab ich keine Ahnung wie ich des anstellen soll ...

Also um die verschiedenen Dateien zu ermitteln könnt ich FindNext etc. verwenden ...

Aber überhaupt die möglichkeit dass ich im OnCreate eine procedure implementiere die mir bilder von der Festplatte in meine ImageList hinzufügt ... da steh ich momentan aufm schlauch ... ich hab mir bereits die Methoden der ImageList angekuckt ... aber find meiner meinung nach nix brauchbares ... zumindest kann ich damit nix anfangen ...

hat jemand n tipp für mich?!

Gruß

f4k3

[soulies]

hoi,

such die dateien und speicher den pfad in einer liste,
dann kannst du mit sowas wie ...

Delphi-Quellcode:

var
   myBMP : TBitmap;
   i : Integer ;
begin
   myBMP := TBitmap.Create ;
   
   for i:=0 to High(Liste) do
   begin
     myBMP.Loadfromfile(Liste[i]);
     ImageListe.Add(myBMP,nil);
   end;

   myBMP.Free ;
end;

die Bilder in die ImageListe bringen und danach weiterarbeiten.


cya