以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]主窗口界面问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=75475)

--  作者:blsu33
--  发布时间:2015/10/9 15:46:00
--  [求助]主窗口界面问题
红袍老师,
   关于主窗口界面,关于关闭按钮的命令

我是使用下列命令
项目属性的AFTER LOAD

\'界面隐藏开始
Dim ribbon As C1.Win.C1Ribbon.C1Ribbon = baseMainForm.Controls("C1Ribbon1")
ApplicationMenu.visible= False
Ribbon.hide
TableCaptionVisible = 0
baseMainForm.MinimizeBox = True
baseMainForm.MaximizeBox = True
baseMainForm.ControlBox= True
MainTable = Tables("临时表")

然后 使用一个窗口 A 设为主窗口

那么 点击 窗口 A 关闭按钮 退出系统 配套的 BeforeCloseProject 我是怎么写的

Dim ps As  System.Diagnostics.Process() = System.Diagnostics.Process.GetProcessesByName("foxtable")
For Each p As System.Diagnostics.Process In ps
    If p.MainWindowTitle = Nothing OrElse p.MainWindowTitle = basemainform.Text Then
        p.kill
        NotifyIcon.Visible =False
        Exit For
    End If
Next
  

这样做不知道对不对?