delphi7 中如何点击菜单项弹出新窗体
Posted
tags:
篇首语:本文由小常识网(cha138.com)小编为大家整理,主要介绍了delphi7 中如何点击菜单项弹出新窗体相关的知识,希望对你有一定的参考价值。
在新窗体中我可以再进行编辑其他的控件
参考技术A delphi7 中如何点击菜单项弹出新窗体假设你form1已完成,
另外新一个form2,
form2代码中应有下面内容
var
form2 : TForm2;
//下面是在form1中输入的代码
procedure TForm1.Button1Click(Sender: TObject);
begin
form2 := TForm2.Create(nil);
form2.Show;
//或者
form2.ShowModal;
form2.Free ;
end;
//如你是菜单中用的,procedure 后面或许是类N4Click而非Button1Click
另外,运行时,delphi7会自动提示加入代码
uses Unit1form2;
Unit1form2是我保存form2时用的文件名
以上是关于delphi7 中如何点击菜单项弹出新窗体的主要内容,如果未能解决你的问题,请参考以下文章