十万分的感谢。

解决方案 »

  1.   

    咦。csdn的时间怎么搞的。22:01发的。怎么回复在22:00呢 
    --------------------------------------------
    一点浩然气,千里快哉风
    --------------------------------------------
      

  2.   

    重载OnDragEnter,OnDragLeave,OnDragOver,OnDrop
      

  3.   

    不是吧。怎么说也应该是个OLE拖放呀。
      

  4.   

    我这里有MyIE源码,看它的实现是用
    InvokeHelper(0x229, DISPATCH_PROPERTYPUT, VT_EMPTY, NULL, parms,
     bNewValue);
    但还有很多要做。如果要这套源发一封信给我
    [email protected]
      

  5.   

    我也是3.2的,这一类的问题以前有搞过,不是用MyIE的方法,可惜忘记了
    :)
      

  6.   

    转:
    请问高手,怎样得到从ie5.0中拖放到我编写的程序的快捷方式的内容,就象网络蚂蚁一样,
    把快捷方式拖到窗口中就可以下载拖到此窗口快捷方式所指的程序。
    :mafan 时间:01-3-13 14:40:27 ID:469481  
    我在VB中实现过,给你一个VB的例子放一个TEXT,将其属性中的OLEDROPMODE=1加上这个事件的处理
    Private Sub Text1_OLEDragDrop(Data As DataObject, 
                                  Effect As Long, 
                                  Button As Integer, 
                                  Shift As Integer, 
                                  X As Single, 
                                  Y As Single)
        Text1.Text = Data.GetData(vbCFText)‘这里就是得到的URL
    End Sub
    同样你在DELPHI中引用一个微软的ACTIVEX,比如RICHTEXT,按上述方法即可!procedure TForm1.MSRichTextBox1OLEDragDrop(Sender: TObject;
      var Data: IVBDataObject; var Effect: Integer; var Button,
      Shift: Smallint; var x, y: Single);
    begin
            MSRichTextBox1.Text:= Data.GetData(1);
    end;
     
    mafan回答的这个挺有意思的,我试了一下可以得到Drag的Text。
    原来Delphi有那么多东西没有封装进去。
      

  7.   

    S.F.(饭桶) :                                     你说的这个我会的。我要在IE里拖一个url马上松开。在当前窗口以打开这个url。和你说的一样呀。
    --------------------------------------------
    一点浩然气,千里快哉风
    --------------------------------------------