摘要：
ADO如何记录SQL日志 procedure TfrmDM.ADOConnection1WillExecute(Connection: TADOConnection; var CommandText: WideString; var CursorType: TCursorType; var Lock 阅读全文
posted @ 2017-03-21 10:49
delphi中间件
阅读(669)
评论(0)
推荐(0)
摘要：
TSimpleMsgPack的样例代码 unit uMain; interface uses SimpleMsgPack, Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, IdBa 阅读全文
posted @ 2017-03-15 15:51
delphi中间件
阅读(863)
评论(0)
推荐(0)
摘要：
TIdHTTPServer制作REST中间件 使用DELPHI7+INDY9开发 // 陈新光 2017-2-21// LIS数据同步服务器// 浏览器输入：http://127.0.0.1:8000/test?t1=china&t2=cxg unit untMain; interface uses 阅读全文
posted @ 2017-03-15 14:08
delphi中间件
阅读(2956)
评论(0)
推荐(0)
摘要：
cxgrid的FINDPANEL编程 FindPanel := TcxGridFindPanel.Create(cxGrid1DBTableView1.Controller); self.cxGrid1DBTableView1.Controller.ApplyFindFilterText(cxCom 阅读全文
posted @ 2017-03-08 10:18
delphi中间件
阅读(1051)
评论(0)
推荐(0)
摘要：
unit ynSearch; interface uses SysUtils, Windows, DB, DBClient, Classes, ExtCtrls, Dialogs, StdCtrls, Provider, DBGrids, Controls; type TYNSearch = cla 阅读全文
posted @ 2017-03-05 22:25
delphi中间件
阅读(2035)
评论(0)
推荐(0)
摘要：
cxgrid动态创建列 procedure TFrmRuleEdit.CreateCols;var Column: TcxGridDBColumn;begin cdsPowerPrj.First; while not cdsPowerPrj.Eof do begin Column := viewPo 阅读全文
posted @ 2017-02-28 16:36
delphi中间件
阅读(2127)
评论(0)
推荐(0)
摘要：
fastscript例子一 unit Unit1; interface uses Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes , Vcl.Graphics, Vcl.Control 阅读全文
posted @ 2017-02-16 16:29
delphi中间件
阅读(2050)
评论(0)
推荐(0)
摘要：
脚本实现权限控制 功能权限和数据权限通过脚本来实现，异常简单。 function TfrmFunction.rights(bar: TUniToolBar; funcid: string; dataset: TClientDataSet = nil; grid: TUniDBGrid = nil): 阅读全文
posted @ 2017-02-13 11:05
delphi中间件
阅读(962)
评论(0)
推荐(0)
浙公网安备 33010602011771号