我在使用ShellExecute和ShellAbout时发现两个问题,请问怎么解决?
1、ShellExecute 打开一个网页地址,如果当前窗口中没有打开的IE窗口,就无任何反应。
2、ShellAbout 默认的关于窗口不能显示在屏幕中央。
下面是我的写法:
URL := 'http://www.delphibbs.com/' ;
ShellExecute(handle,nil,pchar(URL),nil,nil,sw_ShowNormal);
a := '你好';b:= '中国';
shellabout(application.handle,pchar(a),pchar(b),application.Icon.Handle);
1、ShellExecute 打开一个网页地址,如果当前窗口中没有打开的IE窗口,就无任何反应。
2、ShellAbout 默认的关于窗口不能显示在屏幕中央。
下面是我的写法:
URL := 'http://www.delphibbs.com/' ;
ShellExecute(handle,nil,pchar(URL),nil,nil,sw_ShowNormal);
a := '你好';b:= '中国';
shellabout(application.handle,pchar(a),pchar(b),application.Icon.Handle);
解决方案 »
- WriteIn过程不能直接使用?
- 程序能运行,但编译时提示....
- Tform.Create(nil)和 Tform.Create(application) 有什么区别??
- Delphi有没有静态成员变量的?
- SOS关于IdTCPClient1和IdTCPServer1r 传输问题
- 哪位兄弟有DELPHI写的FTP服务器和SMTP服务器代码给我一份,指点一下原理!
- 请教:如何在sql语句中嵌入变量或文本框内容查询?
- 我要疯掉了!!!CSDN的BUG太大了,浪费我的感情
- 圣诞之夜!发生了改变我一生的事情!
- 在程序中定义了Form1和Form2,其中Form2是个永远在上方显示的窗体,那么 Form2.show后,
- 如何根据服务器开放的端口得到其IP地址和机器名?
- 如何把excel文件自动转存为文本文件
2. 自己做个About窗口。
ShellAbout(Application.MainForm.Handle, PChar(a), PChar(b), Application.Icon.Handle);新窗口打开
ShellExecute(Handle, nil, 'IEXPLORE', PChar(URL), nil, SW_SHOW);