以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  手机端预览图片放大缩小怎么实现  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=180287)

--  作者:wsjawm
--  发布时间:2022/10/12 10:26:00
--  手机端预览图片放大缩小怎么实现
http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=175496&skin=0
如上述链接的问题一样,看了推荐的链接https://blog.csdn.net/qq_21476953/article/details/103022847
云里雾里,不知道怎么在foxtable上实现,还请老师能否做个例子,让我们这些菜鸟提升提升啊

--  作者:有点蓝
--  发布时间:2022/10/12 10:35:00
--  
Select Case e.Path
    Case "test.htm"
        Dim wb As New WeUI
        With wb.AddArticle("", "ar1")
            .UseGallery = True \'启用Gallery,必须放在第一行
            .AddTitle("h1", "大标题")
            .AddTitle("h2", "章标题")
            .AddTitle("h3", "1.1节标题")
            .AddContent("Write your Sad Times in Sand, Write your Good Times in Stone.-- George Bernard Shaw")
            .AddImage("./images/001.jpg")
            .AddTitle("h3", "1.2节标题")
            .AddContent("Write your Sad Times in Sand, Write your Good Times in Stone.-- George Bernard Shaw")
            .AddImage("./images/002.jpg")
        End With
        wb.AppendHTML("<script>document.querySelector(""meta[name=\'viewport\']"").setAttribute(""content"",""width=device-width,initial-scale=1,user-scalable=1"")</script>")
        e.WriteString(wb.Build)
End Select

--  作者:wsjawm
--  发布时间:2022/10/12 11:12:00
--  
老师,您好,测试了一下,手机上预览的图片还是不能放大和缩小啊,是不是我哪里搞的不对?
--  作者:有点蓝
--  发布时间:2022/10/12 11:15:00
--  
请上传实例说明
--  作者:wsjawm
--  发布时间:2022/10/12 11:20:00
--  
就是把您给我的代码直接复制到httprequest中然后开启服务,用手机打开网页测试的
--  作者:有点蓝
--  发布时间:2022/10/12 11:21:00
--  
我测试没有问题
--  作者:wsjawm
--  发布时间:2022/10/12 11:25:00
--  
直接用手机自带的浏览器打开网页可以放大缩小,我用hbuilderx封装成h5的app就不可以放大和缩小
 

--  作者:有点蓝
--  发布时间:2022/10/12 11:30:00
--  
这个请去咨询hbuilderx官方客服,他们应该有自己的设置