怎么让ComboBox在运行时移动啊？

我用WM_DragMove也不行啊，高手指教一下！

解决方案 »

  1.   

    在ComboBox1.MouseDown(...)
    const
      sc_dragmove = $F012;
    begin
      ReleaseCapture;
      ComboBox1.Perform(WM_SYSCOMMAND, sc_dragmove, 0);
    end;
      

  2.   

    Michaelyfj(星星还是那颗星星) :   ComboBox有mousedown事件吗？
      

  3.   

    我想知道如果实现像WINDOWS快捷方式的拖动~~~
      

  4.   

    我要回家了，希望明天能有答案。下面我再说一遍我的意思，免得让人误会：
      程序运行时，当ComboBox在获得焦点时，用鼠标就能把它随意拖动，就像在设计期拖动控件一样。
      

  5.   

    Form1.DockSite := True;combobox1.DragKind := dkDock;
    combobox1.DragMode := dmAutomatic;
      

  6.   

    我已经研究出来了，但是combobox的焦点是在下拉那个按钮上，只能按那个进行拖动，怎么把焦点设置到Text那部分呢？