Delphi2010 DataSnap入门 (一)

转载 2011年01月11日 15:07:00

DataSnap到了Delphi2010有了很大的变化,已经可以完全抛弃DCOM之类的东西了,在以前版本中建立一个DataSnap,需要使用DCOMConnection或者SockConnection来连接到服务器,而在Delphi2010中提供了一个新的连接组件:TDSProviderConnection,可以更方便地来连接服务器.

先来学习一个简单的DataSnap:

新建一个工程,在Delphi Project中选择DataSnap Server组,然后选择其中的DataSnap Server,点击确定,然后选择缺省设置即可.系统会生成一个工程框架.其实现在你什么代码都不用写,就已经建立好了一个DataSnap的服务器,那么这个服务器可以提供什么呢?它输出了一个类,这个类只有一个方法:

function EchoString(Value: string): string;

我们来测试一下这个服务器,建立一个普通的VCL From Application,然后在窗体中放入下面控件:

一个TSQLConnection,设置其Driver为DataSnap,并且Connected置为True.因为在本机测试,所以其他参数都不需要更改.(当然,需要先运行刚才建立的服务另,要不然会报告错误)

一个TSqlServerMethod,将其SQLConnection属性设为刚才的SQLConnection,然后在ServerMethodName属性中可以选择TServerMethods1.EchoString.这时你选择Params属性,会出现两个参数:Value和ReturnParameter,前者是方法EchoString传人的参数,后者是EchoString输出的值.

 

OK,到这里一切都设定好了,我们一句代码都没有编写,太说不过去了,还是放个按钮,然后在里面写下这几句代码吧:

 

SqlServerMethod1.ParamByName('Value').AsString:='Hello,Garfield !';
SqlServerMethod1.ExecuteMethod;
ShowMessage(SqlServerMethod1.ParamByName('ReturnParameter').AsString);

 

 

运行一下客户端,可以看到一个对话框,里面显示信息:Hello,Garfield !

Datasnap 使用JSON 传递数据的简易方法

在上一篇文章中,使用了 OLE
  • aroc_lo
  • aroc_lo
  • 2014年06月05日 23:45
  • 5019

DataSnap 多层返回数据集分析FireDAC JSON

DataSnap 多层返回数据集分析FireDAC JSON 转自:http://www.cnblogs.com/cb168/p/4281155.html采用服务器返回数据,一种是返回字符串数据例如...
  • xieyunc
  • xieyunc
  • 2017年03月27日 22:29
  • 1456

Delphi XE8中开发DataSnap程序常见问题和解决方法 (三)用TClientDataSet的“ProviderName”属性连接服务器时,无法找到服务器端的“DatasetProvier”

当我们在客户端用TClientDataSet的“ProviderName”属性连接服务器时,无法找到服务器端的“DatasetProvier”!! 问题原因:服务器端对提供服务的控件所属单元选择错...
  • sunylat
  • sunylat
  • 2015年06月11日 10:56
  • 5470

DELPHI DATASNAP 2010 入门操作(2)不写一行代码,绿色三层我也行

有一行代码的三层,功能肯定非常的简单,但是,再简单,我们也三层了,学习一个东西,需要从入门开始就有兴趣,如果入门就给吓怕了,哪么后来何来信心学习呢?现在就让我们开始吧,不只是没有华丽的词语,而是连用词...
  • xxhh07
  • xxhh07
  • 2011年09月10日 14:30
  • 1204

Delphi2010 DataSnap入门 (二)

Delphi2010 DataSnap入门 (二)
  • shuaihj
  • shuaihj
  • 2011年01月11日 15:15
  • 5588

Delphi2010中DataSnap高级技术(5)—建立稳定服务程序之TCP心跳包的使用

原文出处:http://blog.csdn.net/sunstone/archive/2009/12/17/5023718.aspx 为了能让我们的服务程序更加稳定,有些细节问题必须解决。就如上一讲中...
  • night_cat
  • night_cat
  • 2011年03月06日 20:35
  • 1681

Delphi2010 DataSnap 学习(二)

====================================================== 注:本文源代码点此下载 =============================...
  • javazhuanzai
  • javazhuanzai
  • 2012年02月01日 02:32
  • 266

[转]Delphi 2010 DataSnap白皮书2

====================================================== 注:本文源代码点此下载 =============================...
  • javazhuanzai
  • javazhuanzai
  • 2012年01月15日 07:44
  • 233

Delphi2010中DataSnap高级技术(4)—TCP keepAlive和KeepAliveInterval参数详解

Delphi2010中DataSnap高级技术(4)—TCP keepAlive和KeepAliveInterval参数详解
  • shuaihj
  • shuaihj
  • 2011年01月11日 15:26
  • 2734

[转]Delphi2010中DataSnap高级技术(4)—TCP keepAlive和KeepAliveInterval参数详解

====================================================== 注:本文源代码点此下载 =============================...
  • javazhuanzai
  • javazhuanzai
  • 2012年01月16日 03:19
  • 199
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:Delphi2010 DataSnap入门 (一)
举报原因:
原因补充:

(最多只允许输入30个字)