1、向导(选项1"Forms Application",选项2"VCL application",选项3"TCP/IP  Sample Methods",选项4"211",选项5"TDSServerModule")生成Server端文件。

2、在Server端中的ServerMethodsUnit1单元上加入四个组件(FDQuery,FDConnection,FDPhyMySQLDriverLink,DataSetProvider)。并加入 uses midaslib

3、在项目组中加入client 端:Add New Project,Delphi Projects->VCL Forms Application。

4、server端“Run Without Debugging”,运行server。

5、在Client端窗体加入三个组件(SQLConnection,DSProviderConnection,ClientDataSet)。

SQLConnection->Driver->DataSnap.hostname:=127.0.0.1
               Driver->DataSnap.Port:=211

DSProviderConnection->SQLConnection:=SQLConnection1
            ->ServerClassName:=tServerMethods1

ClientDataSet->RemoteServer:=DSProviderConnection1
           ProviderName:=DataSetProvider1
           Active:=True              

6、在Client端窗体再加入三个组件(DataSource,DBNavigation,DBGrid)
DataSource->DataSource:=ClientDataSet
DBNavigation->DataSource:=DataSource
DBGrid->DataSource:=DataSource
        

SQLConnection "Generate snap client classes",保存为datasnapclientclass.pas
client form中加入 uses datasnapclientclass

相关文章:

  • 2022-12-23
  • 2022-01-24
  • 2022-12-23
  • 2021-10-11
  • 2021-08-15
  • 2021-08-29
  • 2021-05-09
  • 2022-12-23
猜你喜欢
  • 2022-12-23
  • 2021-08-21
  • 2021-07-16
  • 2022-12-23
  • 2022-12-23
  • 2022-12-23
  • 2022-12-23
相关资源
相似解决方案