关于对话框和关闭一个窗口显示另一窗口的问题 |
答題得分者是:supman
|
ntjrr
高階會員 發表:240 回覆:312 積分:110 註冊:2005-04-24 發送簡訊給我 |
代码如下:
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 發送簡訊給我 |
|
Stallion
版主 發表:52 回覆:1600 積分:1995 註冊:2004-09-15 發送簡訊給我 |
|
supman
尊榮會員 發表:29 回覆:770 積分:924 註冊:2002-04-22 發送簡訊給我 |
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |