uniGUI试用笔记（四）

uniGUI下有专用的登陆窗体类：TUniLoginForm，该类属于AppForm，构建代码为：

function frmWebLogin: TfrmWebLogin; 
begin 
  Result := TfrmWebLogin(dmWebMain.GetFormInstance(TfrmWebLogin)); 
end;

系统中若是存在登陆窗体，则首先显示该窗体，当登陆窗体返回不一样ModuleResult值时，表明不一样含义：

ModalResult := mrOk;      //表示登陆成功，显示主窗体

 ModalResult := mrCancel;  //表示登陆失败，退出程序

当主窗体返回不一样ModuleResult值时，也有不一样含义：

ModalResult := mrOk;      //表示登出，关闭主窗体，显示登陆窗体

ModalResult := mrCancel;  //表示退出程序

 

uniGUI有2种窗体模式，一种是AppForm，一种是FreeForm，前者由uniApplication进行实例管理，后者须要程序员本身管理。

AppForm须要先注册：

initialization 
  RegisterAppFormClass(TfrmWebxxx);

而后经过TUniGUIMainModule进行建立，代码示例以下：

var 
  frm : TfrmWebxxx; 
begin 
  frm := TfrmWebxxx(MainModule.GetFormInstance(TfrmWebxxx)); 
  frm.Show;

FreeForm不须要注册，同VCL中的窗体同样，能够直接建立，如：

var 
  frm : TfrmWebxxx; 
begin 
  frm := TfrmWebxxx.create(self); 
  frm.Show;

不管是AppForm仍是FreeForm，在建立后都不须要手动释放，由系统自动释放。这不太符合Delphi的编程习惯，AppForm还说得过去，但FeeForm就有点不合适了，可是确实存在手工释放报错的状况，因此不建议在uniGUI中使用FreeForm。