话题581449的标题是： 如何实现FlashGet那样的文件链接功能? (200分)
分类：Internet/TCPIP caowei (2001-07-02 20:02:00)
就是在IE里面点超链接,弹出我自己的程序来处理,象网络蚂蚁,FlashGet那样的...
我已经查遍了已答问题,没有具体的回答...
我需要知道具体的实现办法,要有程序可以参考....
liutan (2001-07-03 8:41:00)
思考。。。
newhand (2001-07-04 8:45:00)
我也想了解，要源码，不要简单的回答
ljqljq (2001-07-04 9:18:00)
修改注册表,在HKEY_CURRENT_USER/Software/Microsoft/Internet Explorer/MenuExt下，
添加即可。
caowei (2001-07-04 12:11:00)
那样只是在右键的菜单里面加了个项，不是我说的鼠标左键点击就直接打开
newhand (2001-07-04 12:40:00)
我想还是如何得到超连接
请看：http://www.delphibbs.com/delphibbs/dispq.asp?lid=549945
谁能给个调用的示例
hoke (2001-07-04 17:13:00)
关注！
caowei (2001-07-06 20:43:00)
是不是去问问FlashGet,NetAnts的作者啊???
guoyan (2001-07-08 12:36:00)
用bho实现！
newhand (2001-07-08 12:45:00)
这句话谁都知道
guoyan (2001-07-08 14:11:00)
下载一个iehelper分析一下不就出来了，如果什么都指望别人给你
做出来，一点研究的精神都没有，那如何能提高自己的水平！
caowei (2001-07-09 20:15:00)
iehelper是什么? 在哪里有啊?
别只说啊,给点专业精神好不好? 怎么能指责别人呢?
我已经把MSDN翻遍了,只有一篇文章与BHO有关,看了一下,还是不会....
帮帮忙啊...........
caowei (2001-07-11 20:57:00)
再问........
caowei (2001-07-22 9:35:00)
这个问题还有人知道答案吗?
枫 (2001-07-22 10:09:00)
网络蚂蚁,FlashGet都一样的，都是通过一段VBSCRIPT实现取链接的，你可以看一下他们的安装后
的软件以及注册表，
caowei (2001-07-24 19:31:00)
那是鼠标右键的功能....
我需要的是鼠标左键点击以后直接弹出程序窗口.....
Toylin (2001-07-30 18:27:00)
通过与IE交流，获得其内部网页源码，取出点击的连接，用你的程序打开它，屏蔽掉ie的响应
CathyEagle (2001-07-30 19:23:00)
http://www.euromind.com/iedelphi/ie5tools/bho.htm
Flintstone (2001-08-17 11:13:00)
各位请继续啊。
comfan2001 (2001-10-07 22:37:00)
另: 我知道flashget有一项功能是检测粘贴版 通过用户将超级链接复制到内存中,flashget就启动下载程序
监视剪贴板内容
----冲浪的年代，用过网络蚂蚁的人肯定不少，其中一项监视剪贴板变化的功能让人感觉到不少体贴。本文将介绍在Delphi中如何使用“体贴板”，来丰富自己的软件功能。
---- Windows使用剪贴板观察器和观察链。剪贴板观察器是一个显示剪贴板当前内容的窗口。通常它应该至少能显示三种普通格式的内容：文字CF_TEXT、位图CF_BITMAP、元文件CF_METAFILEPICT。剪贴板观察链是一系列相互独立的剪贴板观察窗口，它们都能够接受当前发送到剪贴板的内容。我们大致按照以下步骤在窗口中处理有关剪贴板的内容。
----首先，使用SetClipboardViewer（HWND）函数向剪贴板观察链中加入一个观察窗口。当剪贴板的内容发生变化时，该窗口会接收到一个WM_DRAWCLIPBOARD消息。该函数需要传递的参数是观察窗口的句柄。返回值也是一个窗口句柄类型，标识了将要加入的下一个窗口。
----然后，响应WM_DRAWCLIPBOARD消息处理剪贴板内容的变化。
----最后，在程序退出或关闭时需要调用ChangeClipboardChain函数来将自己从观察链中删除。然后调用SendMessage函数把这些消息传递到观察链中的下一个观察窗口。函数ChangeClipboardChain原型如下：
BOOL ChangeClipboardChain(HWND hWndRemove
//将要删除的窗口的句柄HWND hWndNewNext //观察链中下一个窗口的句柄);
---- Delphi的clipbrd.pas单元中定义了一个类TClipboard，它封装了Windows剪贴板，简化了大量复杂的处理过程。我们在程序中可以直接调用全局函数Clipboard，该函数用于返回TClipboard对象实例，使用这个实例对剪贴板进行剪切、复制和粘贴等操作。下面是TClipboard对象的几个常用的方法和属性的简单介绍。
----方法：
---- Assign：将指定的对象放入剪贴板中。
---- Open：打开剪贴板，防止其他程序改写剪贴板。在向剪贴板加入多项数据时尤其有用。
---- Close：关闭剪贴板。应该与打开剪贴板成对使用。
---- Clear：清空剪贴板。
---- GetAsHandle：返回剪贴板中指定格式数据的句柄。使用前必须打开剪贴板。
---- GetComponent：返回剪贴板中的一个控件。Delphi自己使用得多。
---- HasFormat：查询剪贴板中是否有指定格式的内容。
----属性：
---- AsText：用于读写剪贴板文字内容。
---- FormatCount：读剪贴板中数据格式的种数。
---- Formats：返回剪贴板中各种格式的列表。
----此外，Delphi中的许多控件中也封装了有关剪贴板处理的操作。
下面的一个处理剪贴板的简单例子，只是将剪贴板的文字内容显示为窗口标题。
unit Unit1;
interface
uses
Windows
Messages
SysUtils
Classes
Graphics
Controls
Forms
Dialogs
Clipbrd;//加入clipbrd单元
type
TForm1 = class(TForm)
procedure FormCreate(Sender: TObject);procedure FormClose(Sender:
TObject;
var Action: TCloseAction);
private
{ Private declarations }
public
NextClipHwnd:HWND;//
观察链中下一个窗口句柄procedure WMDrawClipBoard(var
AMessage:TMessage);
message WM_DRAWCLIPBOARD;//处理WM_DRAWCLIPBOARD消息过程
end;
var
Form1: TForm1;
implementation
{$R *.DFM}
{ TForm1 }
procedure TForm1.WMDrawClipBoard(var AMessage: TMessage);begin
//将WM_DRAWCLIPBOARD消息传递到下一个观察链中的窗口
SendMessage(NextClipHwnd
AMessage.Msg
AMessage.WParam
AMessage.LParam);
//查询剪贴板中特定格式的数据内容
if (Clipboard.HasFormat(CF_TEXT) or
Clipboard.HasFormat(CF_OEMTEXT)) then
begin
//处理剪贴板中内容
Caption:=Clipboard.asText;
end;end;
procedure TForm1.FormCreate(Sender: TObject);begin
//获得观察链中下一个窗口句柄
NextClipHwnd:=SetClipBoardViewer(Handle);end;
procedure TForm1.FormClose(Sender: TObject; var Action:
TCloseAction);begin
//从观察链中删除本观察窗口
ChangeClipboardChain(Handle
NextClipHwnd);
//将WM_DRAWCLIPBOARD消息传递到下一个观察链中的窗口
SendMessage(NextClipHwnd
WM_CHANGECBCHAIN
Handle
NextClipHwnd);
end;end.
----需要注意的是，在处理剪贴板内容变化的消息WM_DRAWCLIPBOARD的过程和关闭窗口事件中使用函数sendmessage把WM_DRAWCLIPBOARD或WM_CHANGECBCHAIN消息传递到观察链中的下一个窗口是必要的，否则有可能其他窗口不能获得类似消息。另外，在使用网络蚂蚁时笔者曾经碰到不能设置剪贴板格式的情况，在此提醒读者注意检查RegisterClipboardFormat等函数的返回值。
kindly (2001-10-07 22:43:00)
很简单,去easymatrix.home.chinaren.com看看我的那个程序就知道了,具体思路就是做一个
automation object,用一段vb script调用这个object,像ADO对象一样,可以看看书.细节问题
来信联系.coolsoj@163.net
dadabox (2001-10-07 23:03:00)
kindly,你有下载方面的程序吗?能否发给我一个?你要分我可以给你.
dadabox_sz@21cn.com,谢谢!
kindly (2001-10-07 23:15:00)
抱歉,没看清楚题目[
]
截获超链接可以用一个进程内服务器,写一个BHO,截获IE的消息,具体我没有时过,但是
思路应该如此,可以看看这个网站www.euromind.com/iedelphi
wjiachun (2003-03-16 13:12:00)
接受答案了.
kindly的回答最终被接受。
