摘要: //==============================================================================// ADO连接池 cxg 2008-09-26 16:47:40//==============================================================================unit uADOPool;interfaceuses SysUtils,Classes,ADODB,Dialogs,IniFiles,Forms;type// 数据库类型 TDBType=(Access,SqlS 阅读全文
posted @ 2008-09-26 16:46 delphi中间件 阅读(502) 评论(0) 推荐(0) 编辑
摘要: //==============================================================================// ADO数据工厂 cxg 2008-09-26 14:37:23//==============================================================================unit uADOFactory;interfaceuses SysUtils,ADODB,DB,Classes,ActiveX,IniFiles,Forms;const c_SqlSvrPrd='sql 阅读全文
posted @ 2008-09-26 15:09 delphi中间件 阅读(209) 评论(0) 推荐(0) 编辑
摘要: //==============================================================================// 多线程查询 cxg 2008-09-26 14:29:42//==============================================================================unit uSelect;interfaceuses sysUtils,ADODB,Classes;type TSelect = class(TThread) private FAdoConnection:TADOC 阅读全文
posted @ 2008-09-26 14:30 delphi中间件 阅读(228) 评论(0) 推荐(0) 编辑
摘要: 指针和引用的区别:指针是野孩子引用是乖孩子野孩子的特点喜欢撒野打滚乖孩子是对野孩子进行调教了 阅读全文
posted @ 2008-09-26 11:19 delphi中间件 阅读(186) 评论(0) 推荐(0) 编辑
摘要: tdbgrideh(Sender).InplaceEditor.EditText 阅读全文
posted @ 2008-09-26 09:59 delphi中间件 阅读(241) 评论(0) 推荐(0) 编辑
摘要: uses comobj function calculate(express: string): string; var vscript: Variant; begin vscript := createoleobject('scriptcontrol'); vscript.language:='javascript'; result := vscript.eval(express); end; 阅读全文
posted @ 2008-09-26 09:13 delphi中间件 阅读(343) 评论(0) 推荐(0) 编辑