1、修改注册表
2、这个问题在VB中只需要1行代码就可以了:
Private Sub Form_OLEDragDrop(Data As DataObject, Effect As Long, Button As Integer, Shift As Integer, X As Single, Y As Single)
    Debug.Print Data.GetData(vbCFText)
End Sub

解决方案 »

  1.   

    1、修改注册表
    2、这个问题在VB中只需要OLEDragDrop事件1行代码就可以了:
    Private Sub Form_OLEDragDrop(Data As DataObject, Effect As Long, Button As 
        Integer, Shift As Integer, X As Single, Y As Single)
        Debug.Print Data.GetData(vbCFText)
    End Sub
    Delphi就比较复杂,看MSDN中的这个章节:
    Handling Shell Data Transfer Scenarioswww.applevb.com
      

  2.   

    1.修改注册表:
     HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\Main\Start Page的值改为相应的就可以了2.这个有控件如果要的话,我Email你!
      

  3.   

    to yiyu(议余):
    如果方便的话,请把这个控件Email给我,不胜感激。
    Email: [email protected]
      

  4.   

    给我一个!!谢谢
    [email protected]
      

  5.   

    我也想要一个,可以吗?十分感谢!!!
    Email: [email protected]