Demo学习: ClientInfo

ClientInfo

获取客户端环境参数,从0.9版本开始新增了TUniClientInfoRec对象,可以得到客户端的一些信息,之前为了获取浏览器版本号需要自己写函数,现在可以直接使用TUniClientInfoRec对象了。

procedure TMainForm.UniFormActivate(Sender: TObject);
var
  C : TUniClientInfoRec;
begin
  UniLabel7.Caption:=UniApplication.RemoteAddress;
  C:=UniApplication.ClientInfoRec;
  UniLabel6.Caption:=C.BrowserType;
  UniLabel4.Caption:=IntToStr(C.BrowserVersion);
  UniLabel5.Caption:=C.OSType;
end;

 

posted on 2013-08-28 22:58  `青石  阅读(694)  评论(0编辑  收藏  举报