Easy:ie超链接内容如何拖曳到一个程序中进行处理？(100分)

[?]顺便讨论一下学生如何寻找机会学习提高编程技能

给你段VBSCRIPT脚本取所有连接：
<script language="Vbscript">
set links = external.menuArguments.document.links
ReDim params(links.length*2)
params(0)=external.menuArguments.document.Url
for i = 0 to links.length-1
params(i*2+1)=links(i).href
params(i*2+2)=links(i).innerText
next
//在此处将params传给你要调用的COM或ASP组件
</script>

能具体一点吗？用delphi实现的

一个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;

谢谢，还想问一下，如何锁住打印机

up

DragDrop4.0
http://61.132.118.185:8080/dispdocnew.php?id=4215

谢谢楼上这位朋友！我想这应该是一个浮动窗口的控件。