delphi中有没有line控件。

GroupBox是四方的，我只需要直线。

解决方案 »

  1.   

    sharp里好象不能设置为直线。只有圆，椭圆等
      

  2.   

    object Shape1: TShape
        Left = 100
        Top = 80
        Width = 201
        Height = 1
      end
    看看这样可不可以
      

  3.   

    你使用CANVAS 画一个条直线不更好吗?
      

  4.   

    在onPaint事件中加入
    LineTo API 函数来写. 可以画出横线,斜线, ArcTo API 画曲线等, 很灵活. 但要牺牲代码来完成.
      

  5.   

    shape
    可以通过height确定高度，然后再使用填充色确定颜色，这样出来的东西就可以认为是线条了