请教一个delphi小问题,入门级别

Question

一个project
由两个Form组成
比如说是form1,form2
form1上面有两个button,
比如说是button1和button2,现在,我希望
单击button1,form1关闭,把form2打开.
怎么写
procedure button1Click()
的实现代码呢??
请赐教
谢谢各位

Answer 1

procedure TForm1.Button1Click(Sender: TObject);
begin
 form1.Hide;
 form2.show;
end;

Answer 2

procedure TForm1.Button1Click(Sender: TObject);
begin 
 Close;
end;procedure TForm1.Button2Click(Sender: TObject);
begin 
 Form2.Show;
end;
輸入以上代碼, 按鍵F9就可!!

Answer 3

aiirii(ari)
你说的好像不对吧.
Button1Click,
Close语句把form1关闭掉了,但是单击button1这个事件
并不会打开form2啊,
button2Click,
单击button2的时候,form2.show,就算form2打开了,但是
form1并没有被关闭啊.
等我把Delphi6装好后就给大家结帐,呵呵,
稍等片刻

Answer 4

Form1 必须是主窗体procedure TForm1.Button1Click(Sender: TObject);
begin
 form1.Hide;
 form2.show;
end;其中不能用 form1.Close;

Answer 5

procedure TForm1.Button1Click(Sender: TObject);
begin
 form1.Hide;
 form2.show;
end;
是可以的但一定要注意主窗体为form1，并且是sdi的写发！

Answer 6

要注意 Form1在application下的先CreateFrom

Answer 7

不好意思, 我理解错你的意思了!!
就楼上所说, 用:
procedure TForm1.Button1Click(Sender: TObject);
begin 
  Hide;
  Form2.Show;
end;procedure TForm1.Button2Click(Sender: TObject);
begin  
 Close;
end;

Answer 8

呵呵,
我在帮一个朋友做一个单机版的小软件
其实功能很简单,
不连网络也不连数据库.
数据来源于一个文本文件,当然希望这个文件是加密过的.
但现在我还没考虑加密.
先把不用加密的做出来,再去考虑安全性.
当然了,我一开始的这个问题,我曾经试图定义一个onClose事件处理函数,
但是好用.
其实对于各位高手来说,一天就能搞定的软件,
无奈本人菜鸟一个,以后还要麻烦大家:)
多谢了,能不能每个人都加20分?
还是说,这个问题的分只能给一个人啊??