RealThinClient SDK是用于開發(fā)標(biāo)準(zhǔn)的HTTP(S)服務(wù)器，ISAPI擴展以及客戶端的VCL控件。可用于Windows下的CodeGear Delphi 6-2010。關(guān)于RealThinClient SDK的教程會持續(xù)更新，本節(jié)是RealThinClient SDK的第四課，如何從服務(wù)器發(fā)送小文件。

點擊下載最新版RealThinClient SDK

客戶端

    這是有關(guān)調(diào)用遠程功能的第一個客戶端課程。您將在本課程中學(xué)習(xí)如何使用RtcClientModule和RtcResult組件來調(diào)用RTC服務(wù)器提供的遠程功能。

步驟：

1. 在您的IDE中創(chuàng)建一個新項目

   在IDE中創(chuàng)建一個新項目，并將主窗體重命名為fmMain

   
   

2. 在客戶的主窗體中放置一些控件

   對于客戶的應(yīng)用程序，我們將需要三個組件來進行用戶交互：

將其重命名為lbUserName


將其標(biāo)題屬性設(shè)置為用戶名：

• 一個標(biāo)簽

• 文字編輯

• 備忘錄




將這三個組件拖到您的主窗體，然后

使用Label1




使用Edit1

• 將其重命名為edUserName

• 將其文本屬性設(shè)置為用戶名




備忘錄1

• 將其重命名為mmMemo
  

• 將其ScrollBars屬性設(shè)置為ssBoth

• 清理它的Strings屬性

3. 使用RtcHttpClient組件

   我們正在創(chuàng)建一個Client，已經(jīng)有了Server應(yīng)用程序，因此現(xiàn)在我們需要一個RtcHttpClient組件來與我們的服務(wù)器通信。將一個RtcHttpClient組件拖到主窗體。

   
   

   使用RtcHttpClient1組件

   
   

   RtcHttpClient組件用于使用HTTP請求的TCP / IP通信。

   接收到的數(shù)據(jù)將由RtcHttpClient處理，以收集請求信息，并使其可以通過Request屬性輕松訪問。同樣，您的響應(yīng)將打包到HTTP結(jié)果標(biāo)頭中，并作為有效的HTTP結(jié)果發(fā)送出去，任何Web瀏覽器均可讀取。

   即使客戶端一次發(fā)送所有請求（作為一個大的請求列表），RtcHttpClient也會確保您一個接一個地接收請求，并有機會一對一地答復(fù)它們，因此您可以放寬并處理所有請求。傳入的請求，而不必?fù)?dān)心您對不同請求的響應(yīng)會重疊。
   

• 將其重命名為RtcHttpClient
  

• 將其自動連接屬性設(shè)置為True

• 將其MultiThreaded屬性設(shè)置為True

• 將其ReconnectOn.ConnectLost屬性設(shè)置為True

• 將其ServerAddr屬性設(shè)置為localhost

• 將其ServerPort屬性設(shè)置為80

• 將其UseProxy屬性設(shè)置為True

4. 使用RtcClientModule組件
   

   將一個RtcClientModule組件拖到主窗體。

   
   

   RtcClientModule用于準(zhǔn)備遠程函數(shù)調(diào)用，將其發(fā)布到服務(wù)器，接受服務(wù)器的響應(yīng)以及調(diào)用本地事件處理程序以及每次調(diào)用收到的結(jié)果。

• 將其重命名為RtcClientModule
  

• 將其客戶端屬性設(shè)置為RtcHttpClient

• 將其自動轉(zhuǎn)發(fā)屬性設(shè)置為2

• 將其AutoSyncEvents設(shè)置為True

• 將其ModuleFileName設(shè)置為/ mytest

5. 使用RtcResult組件
   

   將一個RtcResult組件拖到主窗體。

   
   

• 將其重命名為RtcResult

該組件將用于處理從遠程函數(shù)調(diào)用返回的結(jié)果，為此，我們必須實現(xiàn)它的OnReturn事件。

我們的表格應(yīng)該像這樣：




6. 為我們的RtcResult組件定義OnReturn事件

procedure TfmMain.RtcResultReturn(Sender: TRtcConnection; Data,
  Result: TRtcValue);
begin
  mmMemo.Lines.Add(Result.asString);
end;

7. 為我們的edUserName組件定義OnKeyPress事件

   procedure TfmMain.edUserNameKeyPress(Sender: TObject; var Key: Char);
   begin
     if Key=#13 then
     begin
       edUserName.SelectAll;
       with RtcClientModule do
       begin
         // (1)
         with Data.newFunction('Hello') do
         begin
           // (2)
           asString['name'] := edUserName.Text;
         end;
         // (3)
         Call(RtcResult);
       end;
     end;
     Key := #0;
   end;

   該輸入鍵將觸發(fā)我們的遠程函數(shù)調(diào)用。為此，我們捕獲了Enter鍵代碼（＃13），然后：

• 準(zhǔn)備一個新的函數(shù)調(diào)用。
  

• 設(shè)置函數(shù)的調(diào)用參數(shù)和

• 調(diào)用遠程功能。

    下一節(jié)我們將會接著介紹本課程的第二節(jié)-啟動，如果您有任何的建議和疑惑都可以在評論區(qū)留言，也希望感興趣的朋友可以持續(xù)關(guān)注本教程。

 如果您對想要購買正版授權(quán)RealThinClient SDK Pro，可以聯(lián)系咨詢相關(guān)問題。

    關(guān)注慧聚IT微信公眾號 ???，了解產(chǎn)品的最新動態(tài)及最新資訊。