Graphics32 anno domini 2012

[creehawk]

Okay, hatte ich auch gesehen und folgendes gemacht:

Auf der Form ist eine TImageCollection und TVirtualImageList vorhanden, TImageCollection hat wie gesagt 257 128er Png's, TVirtualImageList ist leer und hat die TImageCollection als ImageCollection vermerkt. Der jeweilige Bildname kommt aus einer XML Datei und entspricht exakt dem Namen in der TImageCollection.

Delphi-Quellcode:

Var
I:Integer;
BILD:String;
 begin   
 For I := 0 to ShortListItemsNodes.length-1 do
  begin
   BILD := ShortListItemsNodes.Item[I].attributes[6].Text;
   VirtualImageList1.Add(BildName,BildName);
  end;
 end;

Nach dem Durchlauf ist in der VirtualImageList nichts drin wenn ich VirtuelImageList.count vertrauen darf. Setze ich VirtualImageList1.Add(BildName,I), also I als Index, holt er die Bilder zwar, aber natürlich nur in der Reihenfolge 0,1,2,3,..... was mir jetzt nicht wirkltich hilft.

Und jetzt der Witz: Setze ich manuell einzelne Bilder wie

Delphi-Quellcode:

      Main.VirtualImageList1.add('icon_cat_0','icon_cat_0');
      Main.VirtualImageList1.add('icon_eagle_0','icon_eagle_0');
      Main.VirtualImageList1.add('icon_fish_0','icon_fish_0');

werden diese anstandlos verarbeitet und angezeigt. Versteh ich jetzt überhaupt nicht.

creehawk