<br /><br /><br />    在上次的文章中讨论了如何把传统的Delphi 主从架构应用程序逐渐转换为DataSnap JSON服务器，在本篇文章中让我们正式讨论如何使用Delphi XE开发DataSnap/REST服务器，由于这其中牵涉到非常多的技术，因此我们将花数篇的篇幅来讨论。现在就让我们从DataSnap/REST服务器开始。<br /><br />开发DataSnap服务

unit AdoconnectPool;interfaceusesClasses, Windows, SysUtils, ADODB, IniFiles, forms;typeTADOConnectionPool = class(TObject)privateFObjList:TThreadList;FTimeout: Integer;F

word邮件合并中日期/电话号码/金额字段的格式2008年02月12日 星期二 21:42 通过设置word文档中合并字段来以需要的格式显示数据。使用(\#)设置数字类格式，金额字段，{MERGEFIELD number \# ￥###,0.00}电话号码字段，{MERGEFIELD phone \# ###'-'###'-'####}

 以下有关分布式数据库开发资料--来源网上                             delphi 多层数据库开发                             2006-10-20 04:22服务器端程序     http://hi.baidu.com/gzsunsos/blog/item/406918d5fe7be1c451da4bd

CREATE TABLE [dbo].[Base_Area]([ID] [INT] NOT NULL,[PID] [INT] NULL,[CityName] [VARCHAR](50) NULL,[Type] [INT] NULL,CONSTRAINT [PK_Base_Area] PRIMARY KEY CLUSTERED([ID] ASC) ON [PRIMAR...

 procedure TForm1.Button1Click(Sender: TObject);varFwMgr,Profile,FwApp: variant;beginFwMgr := CreateOLEObject(HNetCfg.FwMgr);Profile := FwMgr.LocalPolicy.CurrentProfile;FwApp :=

CREATE TABLE [dbo].[Base_Area]([ID] [INT] NOT NULL,[PID] [INT] NULL,[CityName] [VARCHAR](50) NULL,[Type] [INT] NULL,CONSTRAINT [PK_Base_Area] PRIMARY KEY CLUSTERED([ID] ASC) ON [PRIMAR...

CREATE TABLE [dbo].[Base_Area]([ID] [INT] NOT NULL,[PID] [INT] NULL,[CityName] [VARCHAR](50) NULL,[Type] [INT] NULL,CONSTRAINT [PK_Base_Area] PRIMARY KEY CLUSTERED([ID] ASC) ON [PRIMAR...