if edit2.Text<>myinifile.readstring('user','password','') then begin showmessage('密码错误'); edit2.SelectAll; end else begin // Application.Terminate; form1.showmodal; form3.close; end; form3是输入密码的窗口, 如果密码正确则出现form1,form3则关闭. 应该如何写?

是不是這樣就好了 Form1.Show ; Form3.close ; 我也學沒多久 不知道你是不是這意思 Carter

不行.

您好﹗    請問使您有此困扰的原因是不是Form3為Main Form﹖ 當您將Form3.Close的時候﹐整個專案就會結束了﹐若是這個原因﹐可考慮使用Form3.Hide的方法將Form3隱藏﹒ Form1.Show; Form3.Hide;    如果Main Form是Form1的話﹐使用您貼出的程式就應可行了﹒    參考看看﹗    ===================== 努力,相信會獲得美麗! 忻晟

------
忻晟

Form3為Main Form, 按版主的作法,将form3.hide, 可是form1. close时, 整个程序并没有结束. form3没有close.

如将form1设为Main Form, 登陆窗口如何写?

您好﹗    Form3為Main Form﹐在其內鍵入Password正确后就開啟Form1﹐Form3隱藏﹐如果您想在Form1關閉的時候就關閉整個專案﹐就需要在Form1的OnClose事件中﹕

begin
  Application Terminate;
end;

這樣才可以真正關閉整個專案﹒ 另一種方法就是在Form1的OnClose事件中﹐再將Form2顯示出來﹕

begin
  Form3.Show;
end;

參考看看﹗ P.S 如果把Form1作為Main Form﹐可在Form1的OnActivate事件中﹐加入﹕

begin
  Form3.ShowModal;
end;

利用ShowModal方法來使Form3作為當前焦點視窗﹐且一定要正确輸入密碼才可將Form3關閉并將焦點移到Form1﹒ ===================== 努力,相信會獲得美麗! 忻晟 發表人 - cashxin2002 於 2003/11/28 15:11:44

------
忻晟

谢谢各位.