以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助] 禁止对某行进行操作的命令  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=45534)

--  作者:wumingrong1
--  发布时间:2014/1/29 18:28:00
--  [求助] 禁止对某行进行操作的命令
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目1.table


--  作者:y2287958
--  发布时间:2014/1/29 22:19:00
--  
http://www.foxtable.com/help/topics/2247.htm
--  作者:wumingrong1
--  发布时间:2014/2/18 0:07:00
--  
我想问一下:如果我想禁止通过项目右上角的 "关闭" 直接关闭项目,或者是在关闭前先检测项目是否有被修改未保存的内容、如果有弹出提示框并禁止关闭项目,该怎么处理?

是否在项目属性的BeforeCloseProject中设置  (IF ?????该怎么写?)

If  ???????     \'如果当前项目已经修改过

e.Cancel = True 

MessageBox.Show("请先保存被修改数据 再退出系统", "提示", MessageBoxButtons.OK, MessageBoxIcon.Question)


End If

--  作者:Bin
--  发布时间:2014/2/18 8:40:00
--  
dim c as boolean
for each dt as datatable in datatables
       if dt.HasChanges then
            c = true
            exit for
       end if
next

if c then
   messagebox.show("先保存")
   e.cancel=true
end if