Hallo hoscha123!
Zunächst Willkommen in der
DP!
Nimm doch eine TImagelist. In der speicherst Du Deine Bilder.
1. Methode:
function AddIcon(Image: TIcon): Integer; //Icon in Liste
2. Methode:
procedure Draw(Canvas: TCanvas; X, Y, Index: Integer);
| | |
| | ------------------- BildNr. in der Liste
| |
| ------------------------- Bildposition
|
------------------------------------------ Die Zeichenfläche im TabSheet
Viel Erfolg wünscht
schöni
[edit=Sharky]Doppelposting gelöscht. Mfg, Sharky[/edit]