Y
yjtjhyygy
Unregistered / Unconfirmed
GUEST, unregistred user!
procedure dot(DotPoint:TPoint;DotColor:TColor); {画点函数
otPoint为坐标,DotColor为色彩}
begin
form1.Image1.Canvas.Pen.Width := 3 ;
with form1.image1.canvas do
Pixels[DotPoint.x,DotPoint.y] :=DotColor; //not(Pixels[DotPoint.x,DotPoint.y]xor DotColor);
end;
怎么设置点的大小?是像素点(Pixels)大小?
![Big Grin :D :D](https://cdn.jsdelivr.net/joypixels/assets/8.0/png/unicode/64/1f600.png)
begin
form1.Image1.Canvas.Pen.Width := 3 ;
with form1.image1.canvas do
Pixels[DotPoint.x,DotPoint.y] :=DotColor; //not(Pixels[DotPoint.x,DotPoint.y]xor DotColor);
end;
怎么设置点的大小?是像素点(Pixels)大小?