编程资料收集与共享交流

//如果客户端是TCP/IP是短连接的情况就没有必要了。type pClientConns = ^TClientConns; // 客户连接 TClientConns = record clientid: integer; ip: string; port: string; logintime: TDateTime; end;type G_C

OleVariant，COM的一种数据类型。MIDAS基于COM之上构建的，自然使用OleVariant作为数据序列格式。延续到现在最新的DATASNAP仍然支持它。TClientDataset.data，TClientDataset.delta，这俩个属性的类型都是OleVariant。OleVariant可以是string,integer,float...这个大家都知道，但它也可以

unit uJSONDB; interface uses SysUtils, Classes, Variants, DB, DBClient, SuperObject, Dialogs; type TJSONDB = class private class function getJsonFieldNames(res: ISu

procedure TFrmMain.btnUpdateFilesClick(Sender: TObject);begin try if Assigned(gEXEmm) then FreeAndNil(gEXEmm); if Assigned(gINImm) then FreeAndNil(gINImm); gEXEmm := TFileS

在用ADO+TClientDataSet操作数据库时，用DataSetProvider.ApplyUpdates更新时可能会因为某种错误而提示如下：Project Project1.exe raised exception class EDatabaseError with message '-2147217900 is not a valid value for field 'ERR

以前，使用 DELPHI XE 时，可以使用类型如下的代码来

在上一篇文章中，使用了 OLE