Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]如何修改文件存放目录？


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

主题：[求助]如何修改文件存放目录？
帅哥哟，离线，有人找我吗？
新福星
 小大  1楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：八尾狐 帖子：1959 积分：15508 威望：0 精华：0 注册：2011/7/16 20:59:00 		[求助]如何修改文件存放目录？  发帖心情 Post By：2021/3/25 10:47:00 [只看该作者]


图片点击可在新窗口打开查看此主题相关图片如下：qq图片20210325104335.png
图片点击可在新窗口打开查看
问题1 如何用指令修改上图所示的文件存放目录？
问题2 使用控件PictureBox，如何清空原来显示的图片？
谢谢
[此贴子已经被作者于2021/3/25 10:48:07编辑过]
 回到顶部
帅哥，在线噢！
有点蓝
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：106665 积分：542508 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2021/3/25 11:12:00 [只看该作者]

1、http://www.foxtable.com/webhelp/topics/2043.htm
2、如果绑定表的，清空对应单元格的数据。如果没有绑定

Dim pbx AS WinForm.PictureBox
pbx = Forms("窗口1").Controls("PictureBox1")
pbx.Image = nothing
 回到顶部
帅哥哟，离线，有人找我吗？
新福星
 小大  3楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：八尾狐 帖子：1959 积分：15508 威望：0 精华：0 注册：2011/7/16 20:59:00 		  发帖心情 Post By：2021/3/26 10:39:00 [只看该作者]


此主题相关图片如下：qq图片20210326103536.png
按此在新窗口浏览图片

加上

pbx.Image = nothing   这个语句系统就崩溃了报错。


此主题相关图片如下：qq图片20210326103749.png
按此在新窗口浏览图片
 回到顶部
帅哥，在线噢！
有点蓝
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：106665 积分：542508 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2021/3/26 11:11:00 [只看该作者]

我测试没有问题。图片框是不是绑定了表格？

 回到顶部
帅哥哟，离线，有人找我吗？
新福星
 小大  5楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：八尾狐 帖子：1959 积分：15508 威望：0 精华：0 注册：2011/7/16 20:59:00 		  发帖心情 Post By：2021/3/26 13:26:00 [只看该作者]

查找半天也没查到问题在哪！所以换了一种方法，就是把这些图片和行记录字段捆绑起来。
崩溃的情况没有了，但是又出了一种新情况，在空记录的时候图片不应该显示，但是仍然在显示。直至加载了数据之后才发生变化。
在打开窗口时设置了图片的清空。
'Dim p1 As WinForm.PictureBox = e.Form.Controls("PictureBox1")
'Dim p2 As WinForm.PictureBox = e.Form.Controls("PictureBox2")
'Dim p3 As WinForm.PictureBox = e.Form.Controls("PictureBox3")
'p1.Image=Nothing
'p2.Image=Nothing
'p3.Image=Nothing
情况没有改善。图片点击可在新窗口打开查看
 回到顶部
帅哥，在线噢！
有点蓝
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：106665 积分：542508 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2021/3/26 13:36:00 [只看该作者]

绑定的应该去清空单元格内容

具体做个例子发上来看看

 回到顶部
帅哥哟，离线，有人找我吗？
新福星
 小大  7楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：八尾狐 帖子：1959 积分：15508 威望：0 精华：0 注册：2011/7/16 20:59:00 		  发帖心情 Post By：2021/3/26 16:40:00 [只看该作者]

例子做好了怎么上传呢？一上传就出错。

 回到顶部
帅哥哟，离线，有人找我吗？
新福星
 小大  8楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：八尾狐 帖子：1959 积分：15508 威望：0 精华：0 注册：2011/7/16 20:59:00 		  发帖心情 Post By：2021/3/26 16:46:00 [只看该作者]

开发者密码999999
第1次打开设备管理窗口后，随意点一条记录，这时PictureBox1控件将出现图片显示。然后关闭设备管理窗口再次打开。这时候表格的数据好像全部是为空，但是该控件的图片仍然在显示。
因为当前记录为空所以图片是不应该显示的。
 回到顶部
帅哥哟，离线，有人找我吗？
新福星
 小大  9楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：八尾狐 帖子：1959 积分：15508 威望：0 精华：0 注册：2011/7/16 20:59:00 		  发帖心情 Post By：2021/3/26 16:49:00 [只看该作者]

在后台发了。
 回到顶部
帅哥，在线噢！
有点蓝
 小大  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：106665 积分：542508 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2021/3/26 17:47:00 [只看该作者]

临时解决方法，开启窗口计时器，间隔200

计时器事件
e.Form.TimerEnabled = False

Dim p As WinForm.PictureBox = e.Form.Controls("PictureBox3")
Dim s As String = p.BindingField 
p.BindingField = Nothing
p.Image=Nothing
p.BindingField = s
 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.03906 秒, 4 次数据查询