設置完成了,現在我們記下DSTCPServerTransport1的prot值
ServerMethodsUnit1中的: TServerMethods1 = class(TDSServerModule) ,如果 TServerMethods1給你改成了其它的代碼了,則需要記住對應的代碼
以上兩個值一會兒在客戶端要用到
編譯並獨立於IDE運行服務器端吧
運行後如圖:
保持服務器端不要關閉,讓我們開始客戶端的編程吧
file->new-> vcl for the application 打開一個應用程序
把FROM的標題改成:datasnap clIEnt
放上一個 SQLConnection1
loginprompt為:false
把derver 改成:Datasnap 然後點derver前的+號
hostname 輸入 127.0.0.1
prot 設置與服務器的相同,默認為211(剛剛服務器上要求記住的)
放上一個DSProviderConnection1
sqlconnection為:SQLConnection1
serverclassname 為: tServerMethods1(剛剛服務器上要求記住的)
把 SQLConnection1的connected 設置為true
放上一個ClIEntDataSet1
RemoteServer設置為:DSProviderConnection1
providername 設置為:DataSetProvider1
active設置為:true
放上一個:DataSource1
dataset設置為:ClIEntDataSet1
放上一個:DBNavigator1
DataSource設置為DataSource1
放上一個DBGrid1
DataSource設置為DataSource1
現在保存客戶端為datasanpdemo1clIEnt