?我在Form1中加了两个Button,我想点击Button1实现调用Form2,点击Button2调用Form3,应该怎么作?
解决方案 »
- 如何修改DELPHI的默认图标!
- 如何将ADOQuery查询的结果的列名进行更改
- 在程中打开其他计算机win2000的.exe文件,怎么在程序中写好用户和密码而自动访问.exe文件?
- rtl90.bpl错误
- 谁知道windowsmediaplayer怎么播放一个列表中文件吗
- 怎样把查询出来的结果赋给一个xml对象?
- 过年散分:顺便带一个问题(位图打印问题)(500分相送见者有分)
- 如何把图片文件存贮到sqlserver数据库?
- Delphi (如何打包) 有什么 可以 将 我的东西 转化成 具体的软件?????
- quickreport的问题!(急问)
- DBChart如何动态定指Labels,X,Y的来源
- 请教一个问题~
application.createform(tform2,form2)
form2.showmodal;
form2.free;
end;
兄弟是不是想逗我们玩?
Form2.show
和Form3.show
就可以了满地的书上都有这个东西
多看书吧
form2.show;button2.onclick :
form3.show;
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;type
TForm1 = class(TForm)
Button1: TButton;
Button2: TButton;
procedure Button1Click(Sender: TObject);
procedure Button2Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;var
Form1: TForm1;implementationuses Unit2, Unit3;{$R *.dfm}procedure TForm1.Button1Click(Sender: TObject);
begin
form2.show;
end;procedure TForm1.Button2Click(Sender: TObject);
begin
form3.show;
end;end.
以上是最简单的做法,不知你具体的需要是什么。