鱼C论坛

 找回密码
 立即注册
查看: 2521|回复: 0

球看代码

[复制链接]
发表于 2012-5-13 21:41:51 | 显示全部楼层 |阅读模式

马上注册,结交更多好友,享用更多功能^_^

您需要 登录 才可以下载或查看,没有账号?立即注册

x
求看代码
procedure TfrmDBSetup.FormClose(Sender: TObject;
var Action: TCloseAction);
begin
//判断是否有主程序实例,如果没有关闭整个程序
  if Assigned(frmLogin) then
//如果有,只关闭当前窗体
    Close
  else
    Application.Terminate;
end;
想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

小黑屋|手机版|Archiver|鱼C工作室 ( 粤ICP备18085999号-1 | 粤公网安备 44051102000585号)

GMT+8, 2024-12-12 05:19

Powered by Discuz! X3.4

© 2001-2023 Discuz! Team.

快速回复 返回顶部 返回列表