K
Kingron
Unregistered / Unconfirmed
GUEST, unregistred user!
对于任意一个TEdit,都可以实现IE 的地址自动完成功能,条件是,IE必须是5.0及其以上。
非常有趣,如果编写浏览器,那么就很有用了,可以用到你的地址栏中。:)
///自动补全文件路径和名称。
function SHAutoComplete(h:hwnd;f:dword):dword;stdcall;external 'Shlwapi.dll';
procedure TForm1.Button1Click(Sender: TObject);
begin
SHAutoComplete(Edit1.Handle,0);
end;
非常有趣,如果编写浏览器,那么就很有用了,可以用到你的地址栏中。:)
///自动补全文件路径和名称。
function SHAutoComplete(h:hwnd;f:dword):dword;stdcall;external 'Shlwapi.dll';
procedure TForm1.Button1Click(Sender: TObject);
begin
SHAutoComplete(Edit1.Handle,0);
end;