Registriert seit: 19. Feb 2007
Ort: In der Lüneburger Heide
165 Beiträge
Delphi 10.4 Sydney
|
AW: Bitmaps in Stringgrid einbinden
3. Sep 2010, 14:28
Würde schätzen Dein letzter Artikel hat die Default leere Grafik. Du erzeugst nur eine Bitmap außerhalb der Schleife und hast somit nur eine Objektinstanz mit der Du arbeitest. Die wird wieder und wieder verwendet. Verlagere Dein img := TImage.Create mal hinter das While..EOF.
Würde das aus Speicherplatzgründen aber vielleicht anders realisieren und bei leerer Grafik einen Nil-Zeiger in dem Array speichern und diesen dann beim Zeichnen auswerten. Sobald er nicht belegt ist würde ich dort die 00-000.bmp laden und zeichnen. Dann schleppst Du nicht so viele unnütze Objekte mit rum.
Carsten
Geändert von DelphiBandit ( 3. Sep 2010 um 14:31 Uhr)
|