高手,如何在多个窗体中,使其中一个窗体编译后在最前面?急啊!谢谢
解决方案 »
- 关闭窗体时怎么动态传值给调用窗体
- 如何设置已知句柄的窗口大小和位置?
- 不知道有没有高手知道速达的主界面是如何实现的?
- 一个小问题,急!!!在线等待!谢谢!!!
- 有谁知道,Query能否执行这样一段Sql脚本??各位师傅请进!!!
- 关于动态设置dbgrid的属性的问题,有关dbgrid标题栏的。
- formstyle设为fsStayOnTop的情况下,切换到其他程序时该窗体会保持在最前?怎么去掉?
- TDateTimePicker 能不能不显示时间
- 那位兄台可以告诉我获得ORACLE手册的途径
- delphi三层中怎么保存图片到sqlserver数据库
- 统计数据(另加100分)
- 关于Shellexecute的一个简单的问题(在线等待)
2.如果你说的要首先创建 那么Project—>option 那你要先编译的form设为主窗口
如果你不想把他设置成主窗体,那:formstyle:=fsStayOnTop,记住:如果是MDI的话,在projiect\option 里把你要前端显示的窗体设置为available forms.
如果不是MDI,那你在主窗体的formcreate里加入:form2.show(form2是你要显示的窗体)
program Project1;uses
Forms,
Unit1 in 'Unit1.pas' {Form1},
Unit2 in 'Unit2.pas' {Form2},
Unit3 in 'Unit3.pas' {Form3};{$R *.RES}begin
Application.Initialize;
Application.CreateForm(TForm2, Form2);
Application.CreateForm(TForm1, Form1);
Application.CreateForm(TForm3, Form3);
Application.Run;
end.