如何用程序打开IE,并缩小到屏幕左下角如题,用代码打开IE,已实现,
现在要需要打开IE的同时,把IE浏览器缩小到屏幕右下角,
造成没有刷新的假象。各位兄弟帮帮忙吧。
最好能给出小段代码
不胜感激
现在要需要打开IE的同时,把IE浏览器缩小到屏幕右下角,
造成没有刷新的假象。各位兄弟帮帮忙吧。
最好能给出小段代码
不胜感激
解决方案 »
- 求:数据库SQL SERVER保存读取图片例程。(jpg和bmp格式)
- 关于多个combobox控件从数据库里提取数据(在线等)
- combobox的问题
- 用DLL共享内存,为什么对出来的值,不是写入的值(申请内存我用的是gmem_DDEShare),请高手帮忙
- 告急!!!主从表的问题,怎样修改从表时,让主表的数据跟着变化?
- 关于Image
- 请教各位老兄:如何做一个数据库安装程序?谢谢!
- 请问用extracticon读取程序的ico图标后如何将它保存为ico文件?
- delphi三层开发中的应用服务器方法调用的参数传递问题。
- 我的数据库备份文件名以时间命名,如200206190800,表示2002/6/19日8点备份的,那么我如何实现用程序自动判断哪个备份文件是最新的并将其
- 求fastreport交叉报表问题,变态的财务,变态的问题~~~~
- 串口问题
或者
shellexecute
你可以加一个Trayicon,自己去实现
是这样的,我是要在一个激活的IE里面,实现打开新的页面,并把这个IE缩小下来
运用ShellExecute或者WinExec都只会不断的打开新的IE,希望大家再帮帮忙
在你的uses 增加 DDEman;
var
DDE:TDdeClientConv;
begin
if DDE.SetLink('IExplore', 'WWW_OpenURL') then//IE必须已经运行
begin
DDE.OpenLink;
DDE.RequestData('www.csdn.net');//链接到指定网页
DDE.CloseLink;
end;
end;要想缩小IE,先用FindWindow获得IE句柄
然后用ShowWindow
如何用程序打开IE,并缩小到屏幕左下角 如题,用代码打开IE,已实现,
现在要需要打开IE的同时,把IE浏览器缩小到屏幕右下角,
你自己说话都有矛盾,不明白你的意思!
其实,打开IE等功能我都已经用DDE来实现了,
我的问题是,当我在激活的IE上面新打开一个IE界面的时候,把IE给缩小了,其实就是模拟IE界面右上角的[- 口 X]缩小,放大,关闭中的缩小按钮
Hd:= FindWindow('IEFrame',nil);
if Hd<>0 then
ShowWindow(Hd,SW_MINIMIZE);
var h:HWND;
begin
ShellExecute(0,0,'http://www.baidu.com',0,0,SW_MINIMIZE);
Sleep(500);
h:=FindWindow('IEFrame',0);
if h=0 then
showmessage('没有打开系统自带的IE浏览器。')
else
CloseWindow(h);
end;使用前必须在Uses里面包含ShellAPi
2.接着用FindWindow函数找到这个IE句柄,然后赋值给K
3.判断k是否为空,如果不为空就showWindow,然后在showWindow的第二个参数里面设置为缩小(SW_MINIMIZE)再次谢谢stherix