線上訂房服務-台灣趴趴狗聯合訂房中心
發文 回覆 瀏覽次數:1090
推到 Plurk!
推到 Facebook!

关于对话框和关闭一个窗口显示另一窗口的问题

答題得分者是:supman
ntjrr
高階會員


發表:240
回覆:312
積分:110
註冊:2005-04-24

發送簡訊給我
#1 引用回覆 回覆 發表時間:2005-05-03 20:05:11 IP:222.184.xxx.xxx 未訂閱
代码如下: begin if ComboBOX.Text='' then Application.MessageBox('ÇëÊäÈëÓû§Ãû³Æ¡£','¾¯¸æ',MB_OK) else begin if not ADOTable1.Locate('user;pass',VarArrayOf([ComboBox.Text,Edit1.Text]),[]) then Application.MessageBox('Óû§Ãû³Æ»òÃÜÂë´íÎó¡£','¾¯¸æ',MB_OK) end; begin if ADOTable1.Locate('user;pass',VarArrayOf([ComboBox.Text,Edit1.Text]),[]) then zjmform.show; logoinform.hide; end; 图中的乱码为正常简体中文,没有错误,问题,1。为什么按对话框中OK键后,整个的软件都退出了,而不是退到刚才的界面2。logoinform.hide;hide用得对不对?好象不能用close,一用的话整个的程序都退出的,而不是关闭这一窗口。
------
我的编程起步于ktop,我将永远支持ktop
ntjrr
高階會員


發表:240
回覆:312
積分:110
註冊:2005-04-24

發送簡訊給我
#2 引用回覆 回覆 發表時間:2005-05-03 20:33:21 IP:222.184.xxx.xxx 未訂閱
我又找了些资料,好象这两个问题是一个问题造成的?就是这个登陆窗口是主窗口,不好关的,一关就是程序就退出了,如果是这个问题,那么登陆窗口总是最先出现的窗口,该如何用简单实用的方法处理好呢?
------
我的编程起步于ktop,我将永远支持ktop
Stallion
版主


發表:52
回覆:1600
積分:1995
註冊:2004-09-15

發送簡訊給我
#3 引用回覆 回覆 發表時間:2005-05-03 22:16:57 IP:211.22.xxx.xxx 未訂閱
請試試看! logoinform.visible := false; zjmform.show; ----------------------------------------------- Creation is the fundation of promotion.
supman
尊榮會員


發表:29
回覆:770
積分:924
註冊:2002-04-22

發送簡訊給我
#4 引用回覆 回覆 發表時間:2005-05-03 22:31:39 IP:203.204.xxx.xxx 未訂閱
您好: 如果您是要做一個讓使用者能登入的視窗,可以在主視窗的OnActivate事件中去呼建登入視窗,登入完畢後再將它關閉,這樣就會回到主視窗而不是把整各程式都關閉了.
系統時間:2024-05-17 12:41:14
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!