ImageList: Zuschneiden, Dehnen, Zentrieren zur Laufzeit

[Nils_13]

Hi,

wenn man eine ImageList auf einem Formular hat und diese doppelt anklickt, sieht man im erscheinenden Fenster oben rechts die Radiobox "Optionen". Wie kann man diese Optionen zur Laufzeit setzen ? Im Quellcode der ImageList konnte ich nichts finden.

[_frank_]

and die property-editoren kommst du zur laufzeit nicht dran...imho sind die infos nur in den Entwurfszeit-packages verfügbar. da wirst du dir was eigenes basteln müssen. zum thema zuschneiden hab ich vor kurzem mal ne Klasse zum markieren hier gepostet.

zentrieren geht indem du die neuen Positionen neu ausrechnest.

Delphi-Quellcode:

neu.x:=(width-bmp.width) div 2;
neu.y:=(height-bmp.height) div 2;

zum drehen gibts genug quellcode...einfach mal im forum/google suchen. z.b. hier ist ein guter Thread zu Bildmanipulationen.

HTH Frank

[extrem]

Zitat:

Zitat von Nils_13

wenn man eine ImageList auf einem Formular hat und diese doppelt anklickt, sieht man im erscheinenden Fenster oben rechts die Radiobox "Optionen". Wie kann man diese Optionen zur Laufzeit setzen ? Im Quellcode der ImageList konnte ich nichts finden.

Diese Optionen sind ja nur dann verfügbar, solange die Bilder noch nicht der TImageList hinzugefügt wurden.
Dazu würde ich ein zweites transparentes oder weißes Bild mit den Abmaßen der TImageList benutzen, auf das ich dann die Bilder nacheinander zentriert rauf zeichne und dann der TImageList hinzufüge.

[Nils_13]

Hi,

danke für Eure Hilfe! Nun funktioniert es. Es sieht eben alles etwas breit aus, kann doch sein dass ich später noch OwnerDraw verwenden muss. Aber das ist egal. :)