S siso Unregistered / Unconfirmed GUEST, unregistred user! 2005-02-14 #1 想学习做五子棋,只是不知delphi中用什么函数可以输出圆形(作为棋子)和线(作为棋盘) 就是可以自定义圆的中心点和半径之类的函数?我初学delphi 麻烦说仔细一点.谢谢!
S siso Unregistered / Unconfirmed GUEST, unregistred user! 2005-02-14 #2 想学习做五子棋,只是不知delphi中用什么函数可以输出圆形(作为棋子)和线(作为棋盘) 就是可以自定义圆的中心点和半径之类的函数?我初学delphi 麻烦说仔细一点.谢谢!
Z zzz2k Unregistered / Unconfirmed GUEST, unregistred user! 2005-02-14 #3 //此段为画圆 Canvas.Brush.Color := clBlack; Canvas.Brush.Style := bsSolid; Canvas.Ellipse(x1, y1, x2, y2); //此段为画线 Canvas.Pen.Color := clBlack; Canvas.Pen.Style := psSolid; Canvas.MoveTo(x1, y1);//移动画笔到 x1, y1(线的起点) Canvas.LineTo(x2, y2);//画到 x2, y2(线的终点)
//此段为画圆 Canvas.Brush.Color := clBlack; Canvas.Brush.Style := bsSolid; Canvas.Ellipse(x1, y1, x2, y2); //此段为画线 Canvas.Pen.Color := clBlack; Canvas.Pen.Style := psSolid; Canvas.MoveTo(x1, y1);//移动画笔到 x1, y1(线的起点) Canvas.LineTo(x2, y2);//画到 x2, y2(线的终点)
S siso Unregistered / Unconfirmed GUEST, unregistred user! 2005-02-15 #4 请问zzz2K Canvas.Ellipse(x1, y1, x2, y2); 中的x1,y1,x2,y2分别代表什么，是圆的四个点还是坐标？ 应该怎样才能在自定义坐标画圆 比如像在(40,20)的位置画半径为5的圆应该怎么办？谢谢!
请问zzz2K Canvas.Ellipse(x1, y1, x2, y2); 中的x1,y1,x2,y2分别代表什么，是圆的四个点还是坐标？ 应该怎样才能在自定义坐标画圆 比如像在(40,20)的位置画半径为5的圆应该怎么办？谢谢!
H hotboys Unregistered / Unconfirmed GUEST, unregistred user! 2005-02-15 #5 你可以参看delphi帮助文件的，写得很详细，上面你问的x1,y1代表点坐标. 要画半径为50的圆，则是： ellipse(40,20,5,5)就可以了
S siso Unregistered / Unconfirmed GUEST, unregistred user! 2005-02-16 #6 请问hotboys ,我用 procedure TForm1.Button1Click(Sender: TObject); begin Canvas.ellipse(40,20,5,5); end; 结果输出的是椭圆,不是正圆. 还有我E文太差了~~
请问hotboys ,我用 procedure TForm1.Button1Click(Sender: TObject); begin Canvas.ellipse(40,20,5,5); end; 结果输出的是椭圆,不是正圆. 还有我E文太差了~~
H hotboys Unregistered / Unconfirmed GUEST, unregistred user! 2005-02-16 #7 哦,我上面说错了,ellipse(x1,y1,x2,y2)应该是在以点(x1,y1)和点(x2,y2)的矩形框内画一个圆. 这样就知道,如果依你上面要求画一个半径为5的画就应该是: ellipse(40,20,40+5*2,20+5*2); 就可以了.
哦,我上面说错了,ellipse(x1,y1,x2,y2)应该是在以点(x1,y1)和点(x2,y2)的矩形框内画一个圆. 这样就知道,如果依你上面要求画一个半径为5的画就应该是: ellipse(40,20,40+5*2,20+5*2); 就可以了.
