菜鸟问题 我用一个bitbtn控件.我想单几他调用另一个from怎么实现. 另一个from叫aboutfrom 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;type TForm1 = class(TForm) Button1: TButton; procedure FormCreate(Sender: TObject); procedure Button1Click(Sender: TObject); private { Private declarations } public { Public declarations } end;var Form1: TForm1;implementationuses unit2;{$R *.dfm}procedure TForm1.FormCreate(Sender: TObject);beginend;procedure TForm1.Button1Click(Sender: TObject);beginform2.Show ;end;end. procedure TMainfrom.BitBtn5Click(Sender: TObject);beginaboutform.Show ;end;这样就能实现了!!谢谢. 当ListView滚动时,怎样保证背景图像不滚动及不闪烁? 最近要学习delphi,请高手指点一下 一个弱弱的问题~~~真的很弱,不要笑啊~~~ DELPHI的技巧,急急急 Delphi8.0注册问题? 如何取得网卡号???? 如何将文本中的数据读入到一个数据库中? 请问GEXPERTS这东西怎样用的,谁用过 treeview高手进关于标记问题 呵呵,再过几分钟就是偶的生日,送分同庆!!!!(sundayboys) 高分求教:看看这条SQL语句怎么写法: 类似WINDOWS下的搜索
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;type
TForm1 = class(TForm)
Button1: TButton;
procedure FormCreate(Sender: TObject);
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;var
Form1: TForm1;implementation
uses unit2;{$R *.dfm}procedure TForm1.FormCreate(Sender: TObject);
beginend;procedure TForm1.Button1Click(Sender: TObject);
begin
form2.Show ;end;end.
begin
aboutform.Show ;
end;
这样就能实现了!!谢谢.