| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1515 人关注过本帖
标题:VFP控制IE问题,望大佬赐教!
只看楼主 加入收藏
qiuxingce
Rank: 2
等 级:论坛游民
帖 子:118
专家分:93
注 册:2014-1-17
结帖率:73.33%
收藏
 问题点数:0 回复次数:2 
VFP控制IE问题,望大佬赐教!
软件界面.visible=.f.
public pbWebBrowser
pbWebBrowser=CREATEOBJECT("InternetExplorer.Application")  
pbWebBrowser.Navigate("https://tjebook.)  
pbWebBrowser.Visible   =   .T.  
pbWebBrowser.FullScreen=.T.   &&全屏  
软件界面.visible=.T.


因为IE界面显示后并没有暂停,软件界面又显示出来了,能不能让IE界面显示后在用户关闭IE窗口之前不执行后面的命令(软件界面.VISIB
搜索更多相关主题的帖子: IE 显示 软件 VFP 界面 
2020-05-21 17:43
zhken
Rank: 7Rank: 7Rank: 7
等 级:贵宾
威 望:11
帖 子:285
专家分:620
注 册:2012-9-21
收藏
得分:0 

&&以下代码存为temp.prg

of = CREATEOBJECT("WebForm")
of.show(1)
RETURN
DEFINE CLASS WebForm as Form
    ADD OBJECT WB as Olecontrol WITH OleClass="Shell.Explorer.2",Top=0,Left=0,Width=this.Width,Height=this.Height,Anchor=15,Visible=.T.
    PROCEDURE init
        fHTML = "WWW.BAIDU.COM"
        STRTOFILE("<PRE>VFP & WebBrowser<PRE>",fHTML)
        this.WB.navigate(fHTML, 0, NULL, NULL, NULL)
    ENDPROC
ENDDEFINE

在你要隐藏的表单上建一个按钮
thisform.visible=.f.
do temp.prg
然后在新表单关闭时 将原表单显出来。

2020-05-21 18:50
qiuxingce
Rank: 2
等 级:论坛游民
帖 子:118
专家分:93
注 册:2014-1-17
收藏
得分:0 
谢谢,受教了!
2020-05-21 20:38
快速回复:VFP控制IE问题,望大佬赐教!
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.016855 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved