FORM1中放一按扭,按扭的ONCLICK中打开FORM2procedure TForm1.ToolButton1Click(Sender: TObject);
begin
Form2:=TForm2.create (self);
Form2.show;
end;
begin
Form2:=TForm2.create (self);
Form2.show;
end;
解决方案 »
- Delphi中嵌套调用dll的问题
- 请高手帮助如何实现delphi修改asf文件的摘要信息
- 急~哪个大哥帮我做下这个题目啊!!!!
- 急:WebBrowser,粘贴,复制,快捷键,问题,高手大师帮忙下啊
- 小弟请教关于midas的问题
- 做记事本程序遇到的问题,请高手指点
- 为什么listview不能输入数据?有什么别的控件类似listview,但是能输入数据。
- table与odbc的问题?
- 请问在DELPHI如何定义日期型的变量??
- 请教:如何利用数据库中的当前记录与当前记录的上一日记录计算出其他字段记录?
- 有没有解线性方程组的源代码(100分,最好是DELPHI)!!!!
- 100分求一个能够对文件加密的算法模块!
begin
Form1.visable:=false;
Form2.showModal;
end;
procedure TForm2.Button1Click(Sender: TObject);
begin
Form1.visable:=True;
close;
end;