TImageList nimmt nur eine bestimmte Zahl an Bildern auf

[kalmi01]

Moin moin,

ich habe da ein recht seltsames Phänomen:

In meiner Anwendung befinden sich mehrere TImageList.
Alle habe eine Bildgrösse von 256x256.
Eins davon soll zur Laufzeit mit bis zu 500 Bildern befüllt werden.
Es werden aber nur 158 Bilder aufgenommen !
Ab 159 ist alles Weiss.

Speichermangel ist nicht das Problem.
Interessanterweise wird ab dem 159ten Bild auch kein Speicher mehr alloziiert.

Delphi-Quellcode:

JPG.LoadFromFile(Datei);

// ein paar Berechnungen, um  tmpRect  zu erhalten

Bild.Canvas.StretchDraw(tmpRect, JPG);

if not Bild.Empty
then begin
       KollektionView.Items.BeginUpdate;
         j := KollektionList.Add(Bild, nil);
         with KollektionView.Items.Add do
         begin
           Caption := StrList.Strings[i];
           ImageIndex := j;
         end;
      KollektionView.Items.EndUpdate;
    end;

[Bernhard Geyer]

Es gibt ja noch die Grenze bezüglich GDI-Ressourcen
Alternativ könnte zufälligerweise das 159-Bild ein kaputtes BMP sein das Windows hier durcheinander bringt.

[kalmi01]

Hallo Bernhard,

Zitat:

Alternativ könnte zufälligerweise das 159-Bild ein kaputtes BMP sein das Windows hier durcheinander bringt.

definitiv nicht.
Sind alle handverlesen.

Zitat:

Es gibt ja noch die Grenze bezüglich GDI-Ressourcen

Welche Grenze ?
Klär mich bitte auf.

159 x 256 x 256 x 3 macht nichteinmal 32MB.

[Bernhard Geyer]

Zitat von kalmi01:

Zitat:

Es gibt ja noch die Grenze bezüglich GDI-Ressourcen

Welche Grenze ?

Die Anzahl der GDI-Handels.

Zitat von kalmi01:

Klär mich bitte auf.

Hat das deine Mutter nicht gemacht?

Zitat von kalmi01:

159 x 256 x 256 x 3 macht nichteinmal 32MB.

Du glaubst doch wohl nicht das Windows (32-Bit) für GDI-Elemente für einen Prozess 2 GB verwenden kann? Je nach Windows-Version können schon 1000 GDI-Elemente nur noch mit einem harten Reboot den Rechner zum leben zu bringen.