如何接受从其它程序中拖来的文字
编号：QA001575
建立日期: 1999年8月23日 最后修改日期：1999年8月23日
所属类别：
欧滨:
vb5.0 或者 delphi4.0 c/s
win95
我想程序实现这样一个功能，即在另一个程序（如记事本，写字板，IE等）中加亮一些文本，然后用鼠标拖到我自己的程序中以便进一步处理，我怎样才能实现呢？好象只能通过API，但我不知如何做，能帮帮我吗？
回答:
记事本不支持你说的拖放文字的功能，不是所有程序都支持你说的功能。你可以在VB中建立一个标准EXE程序，在Form上放置一个文本框，将MultiLine属性设置为True，将文本框的OLEDropMode设置为2。然后在OLEDragDrop事件中加上以下代码：
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)
End Sub
现在，你可以从写字板拖放一些文字到文本框了。
此问题由李海回答。
| |
|
|
| |
|
|
