uniGUI下有专用的登录窗体类:TUniLoginForm,该类属于AppForm,构建代码为: function frmWebLogin: TfrmWebLogin; begin Result := TfrmWebLogin(dmWebMain.GetFormInstance(TfrmWebLogin)); end; 系统中如果存在登录窗体,则首先显示该窗体,当登录窗体返回不同ModuleResult值时,代表不同含义: ModalResult := mrOk; //表示登录成功,显示主窗体…

TUniTreeView目前版本没有封装CheckBox功能,所以需要手工处理,幸好0.99版提供部分代码了,修改过程如下: 1.uniGUIAbstractClasses.pas单元中修改基类TUniTreeNode,增加Checked属性,代码如下: TUniTreeNode = class(TPersistent) private FChecked: Boolean; ... public property Checked : Boolean read FChecked write FCh…

今天尝试用uniGUI做Web服务器,调用应用服务器的WebService,遇到些问题记录下来备忘. 1.对WebService的调用同一般App程序,只是注意如果WebService的执行时间较长,会报超时错误,此时需要处理: (1)在DataModule上放一个THTTPRIO控件: (2)在数据模板创建时,设置THTTPRIO控件的HTTPWebNode属性的超时时间,代码如下: procedure TUniMainModule.UniGUIMainModuleCreate(Sender:…

最近研究了一下UniGUI的TuniDBGrid,记录一下免得忘记了. TuniDBGrid的重要属性包括: 1.列—TUniDBGridColumns和TUniDBGridColumn 每个列对象(TUniDBGridColumn)的重要属性包括: CheckBoxField : TUniCheckBoxField 列作为CheckBox操作的相关属性 属性 类型 说明 AutoPost Boolean 当用户点选CheckBox后,改变前端显示并根据该属性决定: True—立即自动提交到数据…

今天用LoadRunner对uniGUI的Standalone模式的程序进行了一次压力测试,程序采用三层模式,将应用服务器与Web服务器分离,由于条件限制,数据库.应用服务和Web服务都部署在同一条云服务器上,客户端使用IE浏览器,如下图: , 云服务器配置:CPU 4核 内存8G 硬盘500G 带宽10Mbps 客户端为笔记本电脑,i7 8核,内存16G,硬盘1T,客户端带宽20Mbps 先用LoadRunner纪录一组操作,包括操作员登录.打开结算单列表,大约900条纪录分页显示,点击第一条…

uniGUI执行程序部署有3种形式 1.ISAPI模式 部署在IIS或Apache,程序编译为Dll形式,没有试,准备后续专门测试一下. 2.标准执行文件模式 将软件编译成一个独立的Exe文件,包括了WEB服务和业务内容,是uniGUI部署方式中最简单的一种.该方式最大特点是可以进行代码跟踪,同一般exe程序调试一样,在Debug模式下程序调试非常方便.运行exe后就可以直接打开页面进行测试,通过任务栏上的图标可以打开服务监控页面,监控服务程序的运行情况,如下图: 3.Windows服务模式 将…

在业务系统中常常使用回车键(Enter)替代Tab键完成焦点跳转,在uniGUI下,可以不用代码,直接使用TUniForm的NavigateKeys进行设置: 其中Next和Prior决定了焦点向下一个和前一个跳转的按键 Key = 13 表示Enter ShiftStete 表示辅助键(Shift.Alt或Ctrl)按下状态,当二者结合就可以进行判断 一般用Tab或Enter代表跳转下一个控件,Shift+Tab或Shift+Enter代表返回上一个控件,Tab和Shift+Tab是系统缺省,…

uniGUI的文件下载由于TUniSession的存在而变得非常简单,最典型的一个例子就是将列表中的所有数据导出到Excel中.服务器上采用TMS FlexCel控件,先将数据集中的记录导入到Excel文件中,然后再将Excel文件内容输出到内存流中,最后通过TUniSession发送到客户端.代码如下: procedure TfmeWebDBListBase.ExportData; var i, rowindex, colindex: Integer; ms : TMemoryStream;…

uniGUI提供了一个文件上传控件TUniFileUpload,进行数据的导入就变得比较容易.首先将TUniFileUpload控件放置在窗体上,按下导入按钮后,执行TUniFileUpload的文件上传功能: procedure TfmeWebDBListEditBase.btnImportClick(Sender: TObject); begin inherited; { 执行文件上传 } fuMain.Execute; { 启动Mask,显示文件上传过程 } fuMain.ScreenMa…

uniGUI的主窗体可以采用多页面方式进行管理,参考网上的资料,都是用TUniFrame + TUniPageControl 来实现,尝试了一下,效果还不错,如下图: 用TUniFrame 能够使用继承模式,我采用了以下的类关系: TfmeWebEmbedBase : 所有嵌入Frame的基类,实现了与主窗体的交互和控制,包括窗体的关闭等 TfmeWebDBListBase:   与数据集列表操作相关的基类,实现了数据集的开启.数据导出与打印等 TfmeWebDBListEditBase:与数据…