Canvas bekommt Timage-resize nicht mit

**idefix2**

Hallo,

jetzt habe ich folgendes Problem:
Ich zeichne eine Graphik in das Canvas eines TImages. Das TImage ist align-client.
Wenn ich jetzt das Formular grösser mache, wird zzwar die Zeichenfläche grösser, entsprechend verändert sich auch der Massstab meiner graphik, aber es wird nur der Ausschnitt der Graphik angezeigt, der der ursprünglichen Bildgrösse entspricht, der Rest der zeichenfläche bleibt grau.

**DeddyH**

Und wann zeichnest Du? Im OnPaint?

**himitsu**

Wenn du auf ein leeres TImage zugreifst, dann wird darin ein TBitmap angelegt, mit der Größe des TImage.
Ändert man nun die Grlße des TImage, dann wird aber das TBitmap nicht verändert.

Lösung: Man muß das enthaltene TBitmap auch mit anpassen, da das Canvas auf dieses Bitmap zugreift.

**DeddyH**

Oder man nimmt gleich eine PaintBox, die ist zum Selberzeichnen IMO besser geeignet.

**idefix2**

@ DeddyH:
Ich zeichne derzeit nur in der Onclick-Routine des Zeichnen-Buttons. Später vielleicht noch timergesteuert nach einem onresize-event.
Und was ich gerne wissen würde: Was ist der Vorteil der Paintbox gegenüber dem TImage?

@ himitsu:
Und wie passe ich die Bitmap-Grösse an?

**Progman**

Zitat von idefix2:

...
@ himitsu:
Und wie passe ich die Bitmap-Grösse an?

Image1.Picture.Bitmap.Width := Image1.Width ... usw.

**DeddyH**

Die Hilfe sagt:

Zitat:

Mit TPaintBox können Sie einem Formular benutzerdefinierte Bilder hinzufügen. Im Gegensatz zu TImage-Objekten, die Bilder aus einer Bitmap-, Symbol- oder Metadatei anzeigen, muss die Anwendung bei TPaintBox das Bild direkt auf der Zeichenfläche selbst erzeugen. Mit der Ereignisbehandlungsroutine OnPaint zeichnen Sie auf die Zeichenfläche der TPaintBox-Komponente.

Kurz gesagt: will man vorhandene Grafiken (z.B. aus Dateien) anzeigen, ist TImage die Komponente der Wahl. Zum Selberzeichnen nimmt man dann besser TPaintBox und erledigt das Zeichnen in der OnPaint-Routine.

**idefix2**

@Progman: Danke, so funktioniert es.

Vielleicht stell ich das ganze später noch auf eine Paintbox um, aber so wie es jetzt aussieht, funktioniert es auch mit einem TImage wunderbar.

Canvas bekommt Timage-resize nicht mit

Canvas bekommt Timage-resize nicht mit

AW: Canvas bekommt Timage-resize nicht mit

AW: Canvas bekommt Timage-resize nicht mit

AW: Canvas bekommt Timage-resize nicht mit

AW: Canvas bekommt Timage-resize nicht mit

AW: Canvas bekommt Timage-resize nicht mit

AW: Canvas bekommt Timage-resize nicht mit

AW: Canvas bekommt Timage-resize nicht mit

Forumregeln

DeddyH Registriert seit: 17. Sep 2006 Ort: Barchfeld 27.542 Beiträge Delphi 11 Alexandria	#2 AW: Canvas bekommt Timage-resize nicht mit 11. Nov 2011, 12:32 Und wann zeichnest Du? Im OnPaint? Detlef *"Ich habe Angst vor dem Tag, an dem die Technologie unsere menschlichen Interaktionen übertrumpft. Die Welt wird eine Generation von Idioten bekommen."* (Albert Einstein) Dieser Tag ist längst gekommen
	Zitat

DeddyH Registriert seit: 17. Sep 2006 Ort: Barchfeld 27.542 Beiträge Delphi 11 Alexandria	#4 AW: Canvas bekommt Timage-resize nicht mit 11. Nov 2011, 12:41 Oder man nimmt gleich eine PaintBox, die ist zum Selberzeichnen IMO besser geeignet. Detlef *"Ich habe Angst vor dem Tag, an dem die Technologie unsere menschlichen Interaktionen übertrumpft. Die Welt wird eine Generation von Idioten bekommen."* (Albert Einstein) Dieser Tag ist längst gekommen
	Zitat

idefix2 Registriert seit: 17. Mär 2010 Ort: Wien 1.027 Beiträge RAD-Studio 2009 Pro	#5 AW: Canvas bekommt Timage-resize nicht mit 11. Nov 2011, 13:01 @ DeddyH: Ich zeichne derzeit nur in der Onclick-Routine des Zeichnen-Buttons. Später vielleicht noch timergesteuert nach einem onresize-event. Und was ich gerne wissen würde: Was ist der Vorteil der Paintbox gegenüber dem TImage? @ himitsu: Und wie passe ich die Bitmap-Grösse an?
	Zitat

idefix2 Registriert seit: 17. Mär 2010 Ort: Wien 1.027 Beiträge RAD-Studio 2009 Pro	#8 AW: Canvas bekommt Timage-resize nicht mit 14. Nov 2011, 20:03 @Progman: Danke, so funktioniert es. Vielleicht stell ich das ganze später noch auf eine Paintbox um, aber so wie es jetzt aussieht, funktioniert es auch mit einem TImage wunderbar.
	Zitat