Hi,
ich versuche aktuell in einer Listbox mit CustomItems eine Benutzerbild anzuzeigen.
Ich will es in einem TCircle platzieren. Soweit klappt es auch, bis zu dem Zeitpunkt an dem ich in der Listbox scrolle oder das Fenster bis zur Listbox verkleinere.
Fehlermedungen:
- TSettingsFont kann nicht zu TBitmap zugewiesen werden.
- TBounds kann nicht zu TBitmap zugewiesen werden.
Mit ItemData.Bitmap [Anzeige in Glyph] funktioniert es einwandfrei, allerdings bekomme ich die Bilder so nicht in eine Runde Darstellung.
Bisherige Versuche:
circleUser.Fill.Bitmap.Bitmap := Bitmapcontainer1.FindBitmap('PicName') ;
circleUser.Fill.Bitmap.Bitmap := imgTMP.Bitmap;
Code:
if fileexists(pfad + PicName + '.png') then
imgTMP.Bitmap.LoadFromFile(pfad + PicName + '.png')
else imgTMP.Bitmap.LoadFromFile(pfad +'nopic.png');
Item.StylesData['circleUser.fill.bitmap.bitmap'] := imgtmp.Bitmap
Kann mir hier jemand weiterhelfen?
Vielen Dank im Voraus
Gruß Heiko