![]() |
Re: Canvas Bezugspunkt ändern
Ja ich glaub auch. Das ist bestimmt sinnvoller. Dann komm ich wenigstens nicht so schnell bei mehreren Objekten durcheinander.
Aber wie ist das möglich? |
Re: Canvas Bezugspunkt ändern
Zitat:
|
Re: Canvas Bezugspunkt ändern
Zitat:
|
Re: Canvas Bezugspunkt ändern
Zitat:
|
Re: Canvas Bezugspunkt ändern
Ich merke gerade erst, dass dein Beispiel sowieso etwas verquer ist :gruebel: . Nehmen wir mal an, ich will eine Linie ((30|30);(80|80)) zeichnen, also die Diagonale des Images. Dann muss ich doch wohl ein 80x80-Bitmap erstellen und dessen Rect(30, 30, 80, 80)-Ausschnitt auf das Image ((0|0)) kopieren.
|
Re: Canvas Bezugspunkt ändern
Hallo,
da bietet sich doch eine Hilfsprozedur an:
Delphi-Quellcode:
procedure PosRectangle(aCanvas: TCanvas;Left,Top,Width,Height: Integer);
begin aCanvas.Rectangle(Left,Top,Left+Width,Top+Height); end; procedure TForm1.Button1Click(Sender: TObject); begin PosRectangle(PaintBox1.Canvas,30,30,70,70); end; |
Re: Canvas Bezugspunkt ändern
Zitat:
|
Re: Canvas Bezugspunkt ändern
Hi,
den Bezugspunkt kannst du ändern mit[Movewindoworg(canvas.handle, 35, 35, nil)] oder auch ohne nil. mfg soncer |
Alle Zeitangaben in WEZ +1. Es ist jetzt 10:22 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz