摘要:使用glb的3d模型,但是跟踪来跟踪去就是在读取demo.gbl文件时显示401错误。 干货,就一句话: procedure TUniServerModule.UniGUIServerModuleBeforeInit(Sender: TObject);中增加语句: procedure TUniSer
        
阅读全文
 
    
        
        
摘要:说起来头晕:使用devexpress的TcxDBLookUpComboBox非常方便,但是希望能够进入代码和扫码录入(平板中使用),这就麻烦了。 干货: 1、正常按照增量搜索设置参数; 2、增加设置开关控制: Properties: DropDownListStyle = lsEditList; I
        
阅读全文
 
    
        
        
摘要:UniEdit,UniDBEdit,比如输入经纬度:point保留6位小数的数字,如何控制用户输入? 少废话,上干货: 然后: 实战: 第一步: 第二步: have fun!
        
阅读全文
 
    
        
        
摘要:说真话,这玩意真的简单好用。但你要控制好: 1、内存泄漏和异常处理好; 2、有没有发现,通过服务器对数据库进行读写时,在资源管理器中,如果是sql server,就会看到连接1433的连接一直挂在那里。好闹心。 说主题:因为采用get or post链接,将LifeCycle设置为'Invocati
        
阅读全文
 
    
        
        
摘要:一个老项目中,使用软数字录入数据,编译时出现n个:frxpngimage left side cannot be assigned to 原因是使用了frxpngimage单元,在D11中编译出现若干frxpngimage left side cannot be assigned to。 经网查查找
        
阅读全文
 
    
        
        
摘要:var I: Integer; CurrentObject: TJSONObject; FieldName: string; Pair: TJSONPair;function CreateJSONValueForVariant(const aValue: Variant): TJSONValue;b
        
阅读全文
 
    
        
        
摘要:第一步:在TuniStringGrid的ClientEvents.ExtEvents中定义Ext.grid.Panel的reconfigure事件: function reconfigure(sender, store, columns, oldStore, oldColumns, eOpts) {
        
阅读全文
 
    
        
        
摘要:var Column: TUniGridColumn; begin Column := TUniGridColumn(unstrngrd_summary.Columns.Add); Column.Title.Caption := DateToStr(currentDate); end 要清楚标题栏和
        
阅读全文
 
    
        
        
摘要:做成下面效果图: 采用unistringGrid控件。 问题: 1、不同的日期区间如何得到。如: 项目 开始时间时间 -- 终止使用时间 呼吸机 yyyy-mm-dd yyyy-mm-dd 呼吸机 yyyy-mm-dd yyyy-mm-dd 插管 yyyy-mm-dd yyyy-mm-dd SELE
        
阅读全文
 
    
        
        
摘要:折腾二天,你不按照demo里的代码来,就是没有效果。功力不够导致的。学习学习再学习!努力努力再努力! procedure TUniGridsGroupingSorting.UniDBGrid1MultiColumnSort( Columns: TUniDBGridColumnArr; Directi
        
阅读全文
 
    
        
        
摘要:uniTreeVviewc创建一个tree,显示患者姓名(PatientName)。因为需要用到患者ID(PatientID),所以使用help: TPatientTreeNode = class(TUniTreeNode) //strict private FPatientID: string; 
        
阅读全文
 
    
        
        
摘要:通常我们这样设计: MyForm :TXXXXForm; 然后 MyForm := TXXXXForm.Create(Self); 如果其他Form调用MyForm方法: MyForm .mothed; 采用窗口融合方法后,一般不会采用指定变量MyForm了,那么后来的其他单元执行MyForm的方法
        
阅读全文
 
    
        
        
摘要:1、我们会想要能够对一个数据型别进行扩充,而不想继承类别。 2、如果我们想为一个组件类别加入新的方法,为它提供新的功能,而且不想通过继承来做。(如对TFDMEMTable增加方法等,你就得继承做处理,or做成控件进行安装...很繁琐) 那就使用class或者Record助手: 这些特殊用途的数据型别
        
阅读全文
 
    
        
        
摘要:TcxDataSummaryItem.OnGetTextprocedure TApportionDeptCost.cxgrdbndtblvwDBBandedTableView1TcxGridDBDataControllerTcxDataSummaryFooterSummaryItems0GetTex
        
阅读全文
 
    
        
        
摘要:ou can add text in TfrxReport.OnEndDoc event procedure TForm1.frxReport1EndDoc(Sender: TObject); var p: TfrxReportPage; m: TfrxMemoView; i: integer; b
        
阅读全文
 
    
        
        
摘要:fastreport的语言包,是通过不同的xml实现的。它是UTF8编码。可是我们D的IDE默认的是ansi。希望设定成默认UTF8.怎么做: Windows Registry Editor Version 5.00 [HKEY_CURRENT_USER\Software\Embarcadero\B
        
阅读全文
 
    
        
        
摘要:引用 System.Diagnostics 单元 属性: Elapsed 获取当前实例测量得出的总运行时间。 ElapsedMilliseconds 获取当前实例测量得出的总运行时间(以毫秒为单位)。 ElapsedTicks 获取当前实例测量得出的总运行时间(用计时器计时周期表示)。 IsRunn
        
阅读全文
 
    
        
        
摘要://增加一行;焦点到当前指定cell。 frm.cxgrd1.SetFocus; frm.cxgrdbtblvwGrid1DBTableView1.DataController.AppendRecord;//or FDMemTable.Applend; frm.cxgrdbtblvwGrid1DBT
        
阅读全文
 
    
        
        
摘要:PG的sql语句的组织,由于特殊有点小麻烦。掌握方法就简单了 函数:"fn_BillsCharge2Account"("aSQlConditionStr" varchar)调用: SELECT "public"."fn_BillsCharge2Account"('("科室代码" = ''101001
        
阅读全文
 
    
        
        
摘要:cxgrid的换肤有时有点绕人。贴图依葫芦画瓢即可。
        
阅读全文