Foxtable(狐表)用户栏目专家坐堂 → ExWeUI.WebUI.AddTabsGroup中延迟加载的问题


  共有4552人关注过本帖树形打印复制链接

主题:ExWeUI.WebUI.AddTabsGroup中延迟加载的问题

帅哥哟,离线,有人找我吗?
有点蓝
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:109728 积分:558356 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/2/13 20:51:00 [显示全部帖子]

那就直接设置content,不要使用DataUrl

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:109728 积分:558356 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/2/14 9:54:00 [显示全部帖子]

直接把页面内容设置到content里呀,比如

Dim wb As New weui  
wb.AppendHTML("<link rel='stylesheet' href='./weui/exweui.css'/>",True)  
wb.AppendHTML("<script src='./weui/exweui.js' ></script>",True)  
With ExWeUI.WebUI.AddTabsGroup("","tg01")  
    With .AddPage("tab01","标签一")  
Dim wb2 As New weui 使用另外的weui生成页面内容
        wb2.AddForm("","form1","test.htm")
        With wb2.AddInputGroup("form1","ipg1","登录")
            .AddInput("xm","户名","text")
            .AddInput("pw","密码","password")
        End With
        With wb2.AddButtonGroup("form1","btg1",True)
            .Add("btn1""确定""submit")
        End With 
        .Content = wb2.Build 把页面内容设置到Content 
    End With  


 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:109728 积分:558356 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/2/14 10:54:00 [显示全部帖子]

动态的必须切换一下页签才会刷出页面。同时显示就不叫动态了,只能按4楼的方法处理

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:109728 积分:558356 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/2/14 11:17:00 [显示全部帖子]

你们重来不看帮助的吗?

增加一个标签页的语法是:

AddPage(ID, Text)
AddPage(ID, Text, Default)

  ID  字符型,标签页ID。
  Text  字符型,标签页标题。
 Default  逻辑型,是否默认显示此页,默认为false。如果设置为true,则默认选中此标签页。

如果不设置Default,默认显示的就是第一个tab,把页面内容放到第一个tab即可。

也可以调用js打开指定的tab
ex_tabClick('tabpageid')

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:109728 积分:558356 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/2/14 11:43:00 [显示全部帖子]

把页面内容放到默认的tab即可,看4楼。

也可以调用js打开指定的tab
ex_tabClick('tabpageid')

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:109728 积分:558356 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/2/14 13:35:00 [显示全部帖子]

wb.AppendHTML("<script>initExWeUI();ex_tabClick('tab011')</script>") 
e.WriteString(wb.Build)  

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:109728 积分:558356 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/2/14 14:21:00 [显示全部帖子]

请上传实例说明

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:109728 积分:558356 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/2/14 14:30:00 [显示全部帖子]

新建一个项目做例子。

或者使用exweui提示的实例做测试。

学会使用浏览器的开发者工具调试,看看文件有没有正常引用,js函数有没有执行到

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:109728 积分:558356 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/2/14 15:44:00 [显示全部帖子]

没有引用框架文件,建议仔细看一下帮助文件的第一个帮助“使用方法”
  1. wb.AppendHTML("<link rel='stylesheet' href='./weui/exweui.css'/>",True)  
  2. wb.AppendHTML("<script src='./weui/exweui.js' ></script>",True)  

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:109728 积分:558356 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/2/14 21:19:00 [显示全部帖子]

哦,习惯性思维。我看里面有exweui.js,以为是在外部引用的。除非所有的页面都用到exweui,否则不建议这么用。

其次,调用ex_tabClick的代码应该放到页面里,而不是所有页面都需要执行。

最后,需要把其它页面设置为默认页面,ex_tabClick函数调用后才会切换,也就是说如果当前页面就已经是a,再使用代码激活a是没有意义的

            With .AddPage("tab011","a")
                .DataUrl="a.htm"
            End With
            With .AddPage("tab021","b",True)
                .DataUrl="b.htm"
            End With

 回到顶部
总数 11 1 2 下一页