![]() |
Einen Pixel einfärben ????????
Hallo,
Ich wollte gerne wissen wie ich einen einzigen pixel auf dem Formular einfärben kann? Ich würde gerne um den Quellcode bitten. Danke im voraus. MfG Ch4ndl3r |
Re: Einen Pixel einfärben ????????
Delphi-Quellcode:
mfg
Form1.Canvas.Pixel[X,Y] := clgreen;
Nicodius |
Re: Einen Pixel einfärben ????????
|
Re: Einen Pixel einfärben ????????
Ich habe es hin bekommen!!
Das sieht so aus.
Delphi-Quellcode:
Jetzt zeichnet er mir eine linie übers Formular. Jetzt wollte ich gerne die Farbe eines Pixels ändern, aber nur eines pixel nicht der ganzen linie.
procedure TForm1.FormPaint(Sender: TObject);
begin //Zeichnen einer Linie Form1.Canvas.MoveTo(0,10); Form1.Canvas.LineTo(635,10); end; |
Re: Einen Pixel einfärben ????????
hier nochmal :wink:
Delphi-Quellcode:
Form1.Canvas.Pixel[X,Y] := clgreen; // färbt den punkt des Forms bei X/Y in die farbe grün
|
DP-Maintenance
Dieses Thema wurde von "Daniel" von "Tutorials und Kurse" nach "Sonstige Fragen zu Delphi" verschoben.
|
Re: Einen Pixel einfärben ????????
Die linie überdeckt aber dann den anderen pixel und der einzelne pixel ist nicht zu sehen, sonder nur wieder die linie.
Delphi-Quellcode:
Ich glaube ich muss die Farbe von dem Pixel aus lesen und dann ändern. Aber wie ????????
procedure TForm1.FormPaint(Sender: TObject);
begin //Zeichnen einer Linie Form1.Canvas.Pixels [500,10] := clred; <----- Ist nicht zu sehen. Form1.Canvas.MoveTo(0,10); Form1.Canvas.LineTo(635,10); end; |
Re: Einen Pixel einfärben ????????
Was hälst davon das Pixel erst nach der Linie zu setzen ? :wall:
|
Re: Einen Pixel einfärben ????????
Erst die Linie zeichnen, danach den einzelnen Pixel.
|
Re: Einen Pixel einfärben ????????
Auf diese idee bin ich auch schon gekommen aber funktioniert auch nicht. Sonst hätte ich euch nicht mit dieser Frage belästigt.
Edit: ups funktioniert doch :roll: |
Alle Zeitangaben in WEZ +1. Es ist jetzt 19:53 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 by Thomas Breitkreuz