十万分的感谢。
解决方案 »
- CToolTipCtrl::AddTool到底在添加什么
- 模板实参推断
- 如何实现把视频文件用鼠标拖入picture控件,获得视频文件的路径
- DAO如何访问sql server 2005?
- 请问怎么根据文件的名字(后缀)获得文件的类型啊?
- 如何获得控件的大小?
- 为什么CloseToolHelp32Snapshot未定义
- MFC中怎样把Static Text中的text变成红色或者绿色?
- 如果用数组,怎么判断呢?
- ★500分相送!!!谁能给我一个可以用的CReBar的例子!!!不要CodeProject上的那个,那个类库加进自己的项目里就不好用!!!
- xingworld (穷男人) 接分 !
- <===镶入Html页面中的ActiveForm在初始化时如何得到Session变量的值!===>
--------------------------------------------
一点浩然气,千里快哉风
--------------------------------------------
InvokeHelper(0x229, DISPATCH_PROPERTYPUT, VT_EMPTY, NULL, parms,
bNewValue);
但还有很多要做。如果要这套源发一封信给我
[email protected]
:)
请问高手,怎样得到从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有那么多东西没有封装进去。
--------------------------------------------
一点浩然气,千里快哉风
--------------------------------------------