怎样用平台开发单窗口应用程序

zhaoxl

求助,怎样用平台开发单窗口应用程序

admin

如果想要实现开发一个简单的单窗体应用程序，可以考虑在“项目事件”中的“BeforeOpenMainForm”事件中写代码

方案一：以模式窗体形式打开单窗体

'获得一个窗体（衍生窗体和自定义窗体都可以）
Dim frm As SmForm=Proj.Forms("会计科目表")
'以模式窗体形式打开窗体，这种方式
frm.ShowDialog()
'取消打开主窗体
e.Cancel=True
复制代码

方案二：直接以窗体替代原来的主窗体，这种方式打开的窗体更符合常规习惯（这种方法得在下个版本才能生效）

'获得一个窗体（衍生窗体和自定义窗体都可以）
Dim frm As SmForm=Proj.Forms("会计科目表")
'将要打开的窗体替代原来的主窗体
e.LoginForm=frm
复制代码

注意：如果设计阶段替换了原来的主窗体，可以重启项目，按住Ctrl键重新打开项目，可以顺利进入原来的主窗体中。

zhaoxl

谢谢,王总