Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)
-   -   Delphi Gittermuster auf TImage (https://www.delphipraxis.net/38361-gittermuster-auf-timage.html)

smart 18. Jan 2005 08:59


Gittermuster auf TImage
 
Wie kann man auf ein TImage ein Gittermuster zeichnen. Rechtecke und Kreise bekomme ich hin.

Dani 18. Jan 2005 09:07

Re: Gittermuster auf TImage
 
Hi!

Delphi-Referenz durchsuchenfor, Delphi-Referenz durchsuchenTImage.Picture.Graphic.Width, Delphi-Referenz durchsuchenTImage.Picture.Graphic.Height, Delphi-Referenz durchsuchenTCanvas.MoveTo(), Delphi-Referenz durchsuchenTCanvas.LineTo :cheers:

Alexander 18. Jan 2005 09:12

Re: Gittermuster auf TImage
 
Alternativ geht auch eine While-Schleife ;)

Du musst doch im Prinzip nur ausrechnen wie oft die Linie gezeichnet werden muss. Dann kommt einfach das Zeichnen, LineTo & MoveTo hilft da - denke ich - schon sehr viel weiter.
Zum Schluss in der Schleife (egal ob FOR oder WHILE) gehst du einfach mit dem "Stift" ein paar Pixel runter und fängst dann beim erneuten Schleifenbeginn wieder an zu zeichnen... Wenn's nicht mehr ins Image reinpasst, dann hörst du ganz einfach auf :-)
Ich denke, dass du es selber hinbekommst :-)

smart 18. Jan 2005 09:37

Re: Gittermuster auf TImage
 
Vielen Dank, an Euch. Wie man Linien zeichnet habe ich auch gefunden. Aber leider nichts über Gittermuster. Ich hatte eigentlich gedacht, dass es dafür vielleicht eine Routine gibt. Deswegen meine Frage, nach dem Motto, warum das Rad zeimal erfinden.


Alle Zeitangaben in WEZ +1. Es ist jetzt 01:05 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz