varI:Integer;CurrentObject:TJSONObject;FieldName:string;Pair:TJSONPair;functionCreateJSONValueForVariant(constaValue:Variant):TJSONValue;begincaseVarType(aValue)ofvarInteger:Result:=TJSONNumber.Create(Integer(aVal

网上有不少介绍。自己的经验：是否需要下载文件fontawesome-free-6.5.1-web（），没有研究。说ext_js已经下载配套了。我很懒，得过且过。1、下载fontawesome-free-6.5.1-web放在resource，一般推荐files。2、在ServerModule的costomfiles：.\resource\fontawesome-free-6.5.1-web\css\all

使用echart非常简单，网上有介绍。主要放一个unihtmlFrame。然后unihtmlframe.text:='html的代码'，就会渲染（初次调用echart的js库要一点稍后）。unigui本身的chart貌似不能动态生成。option={title:[{text:'TOP10(抗菌药物使用人数)',top:'1

Unidbgrid自动调整列宽UniDBGrid1->ClientEvents->ExtEvents[Ext.data.Store[store]]addstore.loadfn:functionstore.load(sender,records,successful,eOpts){sender.grid.columnManager.columns.forEach(function(col){col.autoSize()})}UniDBGrid1.

第一步：在TuniStringGrid的ClientEvents.ExtEvents中定义Ext.grid.Panel的reconfigure事件:functionreconfigure(sender,store,columns,oldStore,oldColumns,eOpts){columns.forEach(function(col){if(col.titleEl){col.titleEl.on('dblcli

百度源代码如下:<styletype="text/css"> body,html,#allmap{width:100%;height:100%;overflow:hidden;margin:0;font-family:"微软雅黑";} #l-map{height:100%;width:78%;float:left;border-right:2pxsolid#bcbcbc;} #r-result{height:100%;width:

参考自带例子：C:\ProgramFiles(x86)\FMSoft\Framework\uniGUI\Demos\Desktop\HTTPPostCallback-URLFrame-AutoTarget 添加步骤1] 2] 3] 

做成下面效果图： 采用unistringGrid控件。问题：1、不同的日期区间如何得到。如：项目  开始时间时间--终止使用时间呼吸机 yyyy-mm-dd  yyyy-mm-dd呼吸机 yyyy-mm-dd  yyyy-mm-dd插管 yyyy-mm-dd  yyyy-mm-ddSELECT"器械"::VARCHAR(30)AS"

1、编译时自己退出运行的程序。在做unigui开发时，每次编译运行时，unigui的应用都会在后台运行，每次重新编译时都必须手工在任务栏里将应用退出才行，非常麻烦，可以在项目编译的参数里加上杀进程的命令，这样每次重新编译时就会自动将旧的进程杀掉。命令参数如下：taskkill/f/im$(OUTPUT

UniGUI将Excel表上传，并将数据导入SQL（转）采用第三方控件XLSReadWriteII实现导入数据的办法1、首先将Excel文件上传至服务器；在表单中添加UniFileUpload和XLSReadWriteII控件procedureTck_tz.UniLabel4Click(Sender:TObject);beginUniFileUpload1.Execute;end;2、用XLSR

关于UniGui的UniDateTimePicker控件显示问题本人在使用UniGuiUniDateTimePicker控件的显示问题：在UniForm上使用UniDateTimePicker，显示正常。但在Unigrid的列中使用，就出现显示问题，如下图：解决办法：将UniDateTimePicker的属性usesystemformat设置为True,即可显示正常。如下

上面已经将groupbythisfield汉化。由于版本的不断更新，不可避免有汉化遗漏。那么说到如何汉化问题。 根据ExtJSVersion查找你电脑响应目录文件D:\ProgramFiles(x86)\FMSoft\Framework\uniGUI\ext-7.5.1\build\classic\locale\locale-zh_CN.js（主要是该文件）D:\ProgramFi

折腾一天，你不按照demo里的代码来，就是没有效果。procedureTUniGridsGroupingSorting.UniDBGrid1MultiColumnSort(Columns:TUniDBGridColumnArr;Directions:TUniSortDirections);varOrderStr:string;I:Integer;beginUniMainModule.ADOQuery5.Close;//必须在

UniGUI使用ADO组件、调用数据库的存储过程、生成EXECL表的例子（自己学习记录一下，不一定合理，仅供参考）本例子是使用ADO等组件连接一个云服务器的一个数据库，调用GetOrg存储过程，把机构信息展现把结果导出的一个EXECL表里，并下载把显示的HSate的值进行替换1表示正常，其他表示暂停

uniGUI学习之UniImage1三种导入图片方式参考自带DEMO,C:\ProgramFiles(x86)\FMSoft\Framework\uniGUI\Demos\Desktop\UniImage1]  FromPicture,直接加载到Picture属性 2]从磁盘文件中加载UniImage3.Picture.LoadFromFile('0.jpg');0.jpg和应用程序.exe位置要在一

跟ExpressDBTreeView学习(06)原理一样，参考系统自带Demo:示例代码下载：C:\ProgramFiles(x86)\FMSoft\Framework\uniGUI\Demos\Desktop\Grid-DBTreeGrid只要设置数据库里的ID，和其对应的ParentId,即可，UniGui会自动生成树显示： 

TUniGUIMainModule.EnableSynchronousOperations属性与所有其他Web应用服务器类似，uniGUI框架采用异步操作模式。在此模式下，请求由服务器处理，响应处理完毕后立即发送回客户端。例如，当用户按下客户端屏幕上的按钮时，就会生成Ajax请求，服务器将处理关联的OnButtonClick()事件。一旦

简单一点的(05)UniGUI何输出FastReport的pdf新建一个打印预览uniForm窗口printU 主窗口引用它,新建一个unibutton打印按钮. usesprintU;procedureTMainForm.UniButton1Click(Sender:TObject);beginprintU.UniForm1.ShowModal(nil);end;  usesServerModule;proced

procedureTMainForm.UniFormShow(Sender:TObject);varHtml:TStringList;beginHtml:=TStringList.Create;tryHtml.LoadFromFile('.\js\jsPlumb\template.html');Html.text:=StringReplace(Html.text,'[var_unigui_jsname]'

unigui的应用默认会在/server显示相关信息，unigui编译的应用能不能简单设置就可以取消/server页面?经验证，在UniServerModule.UniGUIServerModuleHTTPCommand拦截/server就可以取消server页面：procedureTUniServerModule.UniGUIServerModuleHTTPCommand(ARequestInfo:TIdHTTPRequ

https://www.cnblogs.com/qiufeng2014/p/14779399.htmlunigui的应用默认会在/server显示相关信息，unigui编译的应用能不能简单设置就可以取消/server页面?经验证，在UniServerModule.UniGUIServerModuleHTTPCommand拦截/server就可以取消server页面：procedureTUniServerModule.Un

https://www.cnblogs.com/fireboxsoft/p/10293068.html新建一个打印预览uniForm窗口printU 主窗口引用它,新建一个unibutton打印按钮. usesprintU;procedureTMainForm.UniButton1Click(Sender:TObject);beginprintU.UniForm1.ShowModal(nil);end;  

Delphi10.3如何在StringGrid某单元格下划线显示，并点击弹出新窗口拖一个UniHTMLFrame1到界面上<!DOCTYPEhtml><htmllang="en"><head><metacharset="UTF-8"/><title>网页标题</title><basetarget=&qu

引用了第三方js,css等文件，但是因为缓存的原因，修改后没有及时生效。方法一：在ServerModule的OnHTTPCommand事件中，加入以下代码AResponseInfo.CacheControl:='max-age=0,no-cache,no-store,must-revalidate,proxy-revalidate';但是此方法有缺点，只支持exe模式，exe模式下所有的请求

默认Hint样式 procedureTMainForm.UniFormShow(Sender:TObject);vari:Integer;beginfori:=0toSelf.ControlCount-1dobeginwithTUniFormControl(Self.Controls[i])dobeginifHint<>''thenbeginShowHint