Entwickler-Ecke

Grafische Benutzeroberflächen (VCL & FireMonkey) - TImage Zeichenproblem


Delete - Do 30.12.04 17:06
Titel: TImage Zeichenproblem
Hallo,
eine kleine Anleitung, um das Problem zu schildern:
1. Neues Image auf die Form, Standardeigenschaften beibehalten
2. bmp in Image laden
3. Image ein wenig größer ziehen als sein Picture
4. Ellipse über das gesamte Image zeichen:

Delphi-Quelltext
1:
Image1.Canvas.Ellipse(0,0,image1.width-1, image1.height-1);                    


Wie man sieht wird die Ellipse nicht vollständig angezeigt. Die Bereiche, die vorher nicht vom geladenen Picture bedeckt wurden, können offenbar auch nicht bemalt werden. Wenn man jedoch vorher kein bmp lädt, klappt alles wunderbar. Warum besteht es überhaupt und wie löse ich das Problem?


.Chef - Do 30.12.04 17:38

Wenn du das Image vergrößerst, musst du auch das Picture.Bitmap vergrößern.

Gruß,
Jörg


wulfskin - Do 30.12.04 18:27

Lösung: PaintBox benutzen, Bitmap durch etwas Mathematik in die Mitte malen und dann die Ellipse zeichnen.

Gruß Hape!