Einzelnen Beitrag anzeigen

dioony

Registriert seit: 18. Apr 2005
Ort: Oldenburg
18 Beiträge
 
Delphi 6 Enterprise
 
#1

mehrere TImages im Voraus laden

  Alt 6. Jul 2005, 20:16
Servus!

Ich weiß, dass jeder hier gleich rummeckern wwill, wegen dem betreff, aber mir viel nichts passenders ein...

Nun zu meinem Problem:

Ich lade mehrere Jpegs in während der laufzeit erstellten TImages... Diese haben als parent eine Scrollbox. Das ist auch schön und gut... Nun ist es so, dass nicht alle images geladen werden, sondern nur die, die man gerade in der scrollbox sieht. wenn man nach unten scroll werden erst die anderen images nachgeladen. Hat da jemand ne idee, wie man sie quasi voraus laden kann?


das erstellen sieht wie folgt aus:

Delphi-Quellcode:

var PictureThumb: array of TImage;

(....)

  for i:=0 to ListBox4.Count-1 do
  begin
    PictureThumb[i]:=TImage.Create(self);
    PictureThumb[i].Parent:=ScrollBox1;
    PictureThumb[i].Left:=(left*131);
    PictureThumb[i].Height:=130;
    PictureThumb[i].Width:=130;
    PictureThumb[i].Top:=top;
    PictureThumb[i].Picture.Create;
    PictureThumb[i].Picture.LoadFromFile(ListBox4.Items[i]);
    PictureThumb[i].Picture.
    PictureThumb[i].Stretch:=true;
    PictureThumb[i].Proportional:=true;
    PictureThumb[i].Show;
  end;
* in der ListBox4 stehen die ganzen dateinamen der bilder...

Hab es auch schon mit der graphics32 komponente versucht, aber da lädt er die bilder ziemlich langsam rein. die obige ist die schnellste methode zum bilder laden, die ich bisher rausgefunden habe. alle images vorher zu verkleiner oder so bringt auch keine bessere performance...
falls jemand da noch andere kennt wäre es auch nicht schlecht, wenn da jemand ein tipp hätte!

Danke im voraus!

bis dann dioony
  Mit Zitat antworten Zitat