windows xp 桌面上的快捷方式或者文件在拖动的时候有个虚图随着移动,开始移动的时候还有个“ + ” 显示,如何实现这个功能。

解决方案 »

  1.   

    从一个toolbar 向 pagectrol里面拖动
      

  2.   

    以下是dfw找到的,只能在listview内拖动
    不是我要的 当从一个toolbar的一个image/button/panel 向 pagectrol里面拖动的 时候拖动效果。
    来自:卷起千堆雪tyn, 时间:2001-11-06 19:54:00, ID:711607  
    搞定~~~在FORM1上放一个ListView1,建立几个Items,一个ImageList1,ImageList1里面放几个图标~~
    设置ListView1.LargeImages :=ImageList1;procedure TForm1.ListView1DragOver(Sender, Source: TObject; X, Y: Integer;
     State: TDragState; var Accept: Boolean);
    begin
     accept:=Source is TlistView;
    end;procedure TForm1.ListView1DragDrop(Sender, Source: TObject; X, Y: Integer);
    var
     PosPoint:TPoint;
    begin
     PosPoint.x:=x;
     PosPoint.y:=Y;
     (Source As TListView).Selected.SetPosition(PosPoint);
    end;procedure TForm1.ListView1MouseDown(Sender: TObject; Button: TMouseButton;
     Shift: TShiftState; X, Y: Integer);
    begin
    if button=mbleft then
     begin
      with sender as TListview do
      begin
       if GetItemAt(x,y)<>nil then
        begindrag(false);
      end;
     end;
    end;
     
      

  3.   

    zhmnsw(糖醋鼻子) 说的好,我也想到了。
      

  4.   

    http://cache.baidu.com/c?word=tdragcontrolobject&url=http%3A//delphibbs%2Ecom/keylife/iblog%5Fshow%2Easp%3Fxid%3D4794&b=42&user=baidu谈VCL中DragDrop功能的底层实现 
      

  5.   

    up
    不分场合,不分地点,不分时间 大家宣传一下:
    一组数据,日本对中国的依赖程度现排最前,特别是对中国市场的依赖,
    如果中国人1个月不买日货,日本将有数千家企业面临破产。
    如果中国人6个月不买日货,日本将有一半人失业。
    如果中国人1年不买日货,日本经济结构彻底瓦解,日本还能这样嚣张吗!
    你如果是中国人,不用你上战场当炮灰,
    你要做的事很简单,就是不买日货。 
    抵制日货网络签名处:http://www.dzrhlm.com/book/
    抵制日货网络签名处:http://www.dzrhlm.com/book/
    抵制日货网络签名处:http://www.dzrhlm.com/book/
    抵制日货网络签名处:http://www.dzrhlm.com/book/
    抵制日货网络签名处:http://www.dzrhlm.com/book/
    抵制日货网络签名处:http://www.dzrhlm.com/book/
    抵制日货网络签名处:http://www.dzrhlm.com/book/
    抵制日货网络签名处:http://www.dzrhlm.com/book/
      

  6.   

    aiirii(ari-爱的眼睛):
    给出的链接打印了看。