Demo学习: ClientInfo

时间:2023-03-09 06:27:59
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;