你应该创建Button的OnClick事件:
procedure TForm1.Button1Click(Sender: TObject);
begin
Form2.Show;
end;或者:
procedure TForm1.Button1Click(Sender: TObject);
begin
Form2.ShowModal;
end;区别我不说了,你试一下或者看看帮助。
你应该买本带源程序的书看看,或者看看Delphi自己的例子。
procedure TForm1.Button1Click(Sender: TObject);
begin
Form2.Show;
end;或者:
procedure TForm1.Button1Click(Sender: TObject);
begin
Form2.ShowModal;
end;区别我不说了,你试一下或者看看帮助。
你应该买本带源程序的书看看,或者看看Delphi自己的例子。
解决方案 »
- 请问一个问题,谢谢回答
- delphi中如何在点击图片的时候显示出数据库的信息??
- 这问题可不小,不回答可惜了!
- 关于OleContainer如何显示FTP上文件
- 关于 TreeView1 控件的使用问题-----------在线等待!!!!
- 在dbgrid里添加行数?在线
- 用DELPHI做了个痕迹保留控件,在NT系统中安装防火墙时候不能正常调用????各位就我!!!
- msagent的奇怪问题,可能是无法实现的。
- 大家帮我看看这个怎么解决,解决了,另开帖送分!急!
- 我与dbgrid
- sql 查询:如何分批检索大量数据?就像一页一页往下翻(不依靠某一字段,如:日期)
- 如何用Delphi创建一个Unicode的文本文件?分不够再加啊!
uses Unit2procedure TForm1.Button1Click(Sender: TObject);
begin
Form2.ShowModal;
//Form2.Show;
end;
隐藏窗体用FORM2.HIDE;
关闭窗体用FORM2.CLOSE;
procedure TForm1.Button1Click(Sender: TObject);
begin
Form2.Show;
end;
Application.CreateForm(TFrm_System_Manage, Frm_System_Manage);
Frm_System_Manage.ShowModal;
Frm_System_Manage.Free;
Frm_System_Manage := Nil;
设计时没有,就动态创建:
Application.CreateForm(Tform1, form2);
form2.show;
form2.ShowModal;