怎么通过名称获取窗口类
如何通过名称获取窗口类
知道一个窗口的名称或者是该窗口类的名称,如"tFrm_Main",如何获取到该窗口类?
------解决方案--------------------
TNewForm = class of TForm
先注册窗体类
RegisterClass(TFormName);
通过GetClass函数读取类,转换为TNewForm 类
var
NewForm: TNewFrom;
begin
NewForm := TNewForm( GetClass( 'TFormName' ));
Form := NewForm.Create(nil);
Form.showmodal;
end;
------解决方案--------------------
建立一个dataModule然后包你需要使用的窗口以published添加引用,然后使用fieldAddress来查找
知道一个窗口的名称或者是该窗口类的名称,如"tFrm_Main",如何获取到该窗口类?
------解决方案--------------------
TNewForm = class of TForm
先注册窗体类
RegisterClass(TFormName);
通过GetClass函数读取类,转换为TNewForm 类
var
NewForm: TNewFrom;
begin
NewForm := TNewForm( GetClass( 'TFormName' ));
Form := NewForm.Create(nil);
Form.showmodal;
end;
------解决方案--------------------
建立一个dataModule然后包你需要使用的窗口以published添加引用,然后使用fieldAddress来查找