如何用代码获得当前窗本的name和caption
如何用代码获得当前窗本的name和caption
[解决办法]
self.Name;
self.Caption;
不加self也可以的
[解决办法]
窗体名.name
窗体名.caption
如form1.name;form1.caption
[解决办法]
[解决办法]
Frm_Main.ModuleIfTrue(Data1.ADOQuery8,Frm_AssistBase);
参数传进来的时候,定义一个变量,然后赋值就好啦。
var
sName: string
begin
sName:= Frm_AssistBase;
[解决办法]
Frm_Main.ModuleIfTrue(Data1.ADOQuery8,Frm_AssistBase);
看下这个过程,如果Frm_AssistBase已经创建了,直接用Frm_AssistBase.name
[解决办法]
用比较 句柄 的方法最可靠。
[解决办法]
写了一个小测试,就当f4是你的新窗体吧
看下面的code
- Delphi(Pascal) code
var f4: TForm4; ff: TForm;procedure TForm3.Button1Click(Sender: TObject);var aHandle: THandle;begin f4 := TForm4.Create(self); f4.Show(); //f4.Active := True; aHandle := GetForegroundWindow; ff := TForm(FindControl(aHandle)); ff.Caption := 'New Caption'; ff.Name := 'newForm';end;
[解决办法]
窗体名有时不必记住,只用self 即可