有哪位老大知道有这种类型的控件吗?就是可以再运行时动态的拖拉信号灯到指定位置,并可以动态的改变信号灯显示状态

解决方案 »

  1.   

    工控控件常用有IOComp和TMS,(还有天天广告的那个,不过我没用过)
    运行时拖拉控件,这个要自己在代码中处理了
      

  2.   

    用过一个AutoLED控件,基本能实现你要的功能,度娘一下吧
      

  3.   

    不借助控件,自己做也费不了多少事。用 TImage 显示信号灯。要是图形很简单,用 TShape 也行。需要设置 MouseDown 和 MouseMove 两个事件例程。前者用来捕捉鼠标按下时的位置,后者用来移动构件,以此实现拖动效果。我以前做过类似东西,取其中片段做示例,希望有点用。假如窗口类是 TmyForm, 构件名叫做 mgLight, 声明一个 TPoint 类型变量 MousePos,用来记录鼠标初始位置。procedure TmyForm.mgLightMouseDown(Sender: TObject;
      Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
    begin
      if not (ssLeft in Shift) then Exit;
      MousePos.X := X;
      MousePos.Y := Y;
    end;procedure TMyForm.mgLightMouseMove(Sender: TObject;
      Shift: TShiftState; X, Y: Integer);
    begin
      if not (ssLeft in Shift) then Exit;
      mgLight.Left := mgLight.Left + X - MousePos.X;
      mgLight.Top := mgLight.Top + Y - MousePos.Y;
    end;够简单吧?动态改变信号灯可以更换 TImage 图片或改变 TShape 色彩。
      

  4.   

    IOComp 是宇宙超级无敌最强高富帅买切糕第一 工控组件。
      

  5.   

    IOComp 终于也有人说了这个组件啊,以前我刚用时,好少资料
      

  6.   

    IOComp 一直在用,可惜不支持XE3!
      

  7.   

    BeauGauge 工业控件也许可以.
      

  8.   


    BeauGauge的, 比Iocomp如何, 嘿嘿
      

  9.   


    BeauGauge的, 比Iocomp如何, 嘿嘿恩, 比Iocomp好要看的多.
      

  10.   

    好看跟好用有啥关系嘛介绍介绍BeauGauge有什么Iocomp没有的功能,或者性能效率比Iocomp高多少之类的才关键吧
      

  11.   

    u010705885 
    这是什么控件呀,有DELPHI7版本 的吗
    分享一下吧
      

  12.   

    好不好用不是针对用户的而是针对开发者的吧,拥有别人不可替代或更优越的功能和性能才是最重要的。那个BeauGauge 的感官神马的东东,貌似也没多少技术含量,也就是些图片,Iocomp也可以自己换更好看的图片嘛。
      

  13.   

    BeauGauge的控件在哪里可以下载?整下来研究一下
      

  14.   

    BeauGauge收费吧?只能用几个免费的?小弟菜鸟