全國最多中醫師線上諮詢網站-台灣中醫網
發文 回覆 瀏覽次數:1128
推到 Plurk!
推到 Facebook!

再次請問Justmade關於MDI

答題得分者是:Justmade
yezi_ji
一般會員


發表:16
回覆:31
積分:9
註冊:2003-03-22

發送簡訊給我
#1 引用回覆 回覆 發表時間:2003-03-27 08:49:54 IP:218.14.xxx.xxx 未訂閱
你好,非常感謝你上次的幫助,但是我現在又遇到問題了,就是按你上次說的做了,錯誤是不會彈出來了,現在是進不了主界面了。比如:程序運行了之後,首先是密碼登錄框顯示,接著我輸入正確密碼並按了確定按鈕,之後,程序就結束了,主界面不顯示了。不勝感激。 我是菜鳥,請多指教!!
Justmade
版主


發表:94
回覆:1934
積分:2030
註冊:2003-03-12

發送簡訊給我
#2 引用回覆 回覆 發表時間:2003-03-27 09:06:21 IP:218.16.xxx.xxx 未訂閱
我之前寫到的是    MainForm - OnShow :
procedure TfmMain.FormShow(Sender: TObject);
begin
 with TLogin.Create(Self) do
 begin
 try
   if ShowModal <> mrok then
    Application.Terminate;
 finally
    Free;
 end;
end;
Login Form 判斷 :
if password.text='pass' then
  ModalResult : =mrok
else
  ModalResult := mrCancel;
當使用者輸入了 pass 按確定後,程式會設定 Login Form 的 ModelResult 為 mrOK 並回到 Main Form ,那時 Main Form 判斷 ModelResult = mrOK 所以不執行 Application.Terminate 而繼續將 MainForm Show 出來。 你是否作出了一些改動呢?
yezi_ji
一般會員


發表:16
回覆:31
積分:9
註冊:2003-03-22

發送簡訊給我
#3 引用回覆 回覆 發表時間:2003-03-27 12:25:34 IP:218.14.xxx.xxx 未訂閱
我只是在登錄框中間加了一些密碼判斷,和SQL SERVER數據庫鏈上了,用ADO連接的,返回值沒有改動,程序都是對的,就是登錄框結束程序就結束了。但是我在SDI的界面里,登錄框的程序是一樣的,就是沒有返回值,都可以進入下一個界面。 是不是主窗口和登錄窗口的屬性設置有什麽不對?他們的主要屬性有什麽要求? 不勝感激. 我是菜鳥,請多指教!!
Justmade
版主


發表:94
回覆:1934
積分:2030
註冊:2003-03-12

發送簡訊給我
#4 引用回覆 回覆 發表時間:2003-03-27 13:00:10 IP:218.16.xxx.xxx 未訂閱
我剛試過 : 1. 做一新專案 2. 設定 FormStyle 為 MDI Form 3. 在 OnShow 事件加入上述的碼 4. 做一新 Form 名 Login 5. 加入兩個 BitBtn, kind 一個設 bkOK, 另一個 bkCancel 6. 在第一個 Form use 第二個 Form 7. Run 完全正當,按 OK 則繼續 Show Form ,按 Cancel 則結束 所以應是其他部份的問題,沒看你的程式很難猜出來... 你若暫時不執行 FormShow 的程式區段除不顯示LOGIN FGRM 外能正當運作嗎?
yezi_ji
一般會員


發表:16
回覆:31
積分:9
註冊:2003-03-22

發送簡訊給我
#5 引用回覆 回覆 發表時間:2003-03-27 14:16:29 IP:218.14.xxx.xxx 未訂閱
我也試了,可能真的是中間那些代碼出了問題,我自己慢慢找。真的非常感謝你,謝謝。 我是菜鳥,請多指教!!
yezi_ji
一般會員


發表:16
回覆:31
積分:9
註冊:2003-03-22

發送簡訊給我
#6 引用回覆 回覆 發表時間:2003-03-27 14:32:15 IP:218.14.xxx.xxx 未訂閱
非常感謝你,問題解決了,我在登錄框的onclose的事件里做了Application.Terminate命令,真不好意思,花了你這麽多時間,不過,我真的非常謝謝你。 我是菜鳥,請多指教!!
Justmade
版主


發表:94
回覆:1934
積分:2030
註冊:2003-03-12

發送簡訊給我
#7 引用回覆 回覆 發表時間:2003-03-27 14:38:53 IP:218.16.xxx.xxx 未訂閱
自己先找找是好的,若真的找不到可該兩個 form 的程式碼出來大家幫忙找找。
系統時間:2024-05-15 12:05:07
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!