RealThinClient SDK是用于開發標準的HTTP(S)服務器，ISAPI擴展以及客戶端的VCL控件?？捎糜赪indows下的CodeGear Delphi 6-2010。關于RealThinClient SDK的教程會持續更新，本節是RealThinClient SDK的第四課，如何從服務器發送小文件。

點擊下載最新版RealThinClient SDK

客戶端

    這是有關調用遠程功能的第一個客戶端課程。您將在本課程中學習如何使用RtcClientModule和RtcResult組件來調用RTC服務器提供的遠程功能。

步驟：

1. 在您的IDE中創建一個新項目

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

   
   

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

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

將其重命名為lbUserName


將其標題屬性設置為用戶名：

• 一個標簽

• 文字編輯

• 備忘錄




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

使用Label1




使用Edit1

• 將其重命名為edUserName

• 將其文本屬性設置為用戶名




備忘錄1

• 將其重命名為mmMemo
  

• 將其ScrollBars屬性設置為ssBoth

• 清理它的Strings屬性

3. 使用RtcHttpClient組件

   我們正在創建一個Client，已經有了Server應用程序，因此現在我們需要一個RtcHttpClient組件來與我們的服務器通信。將一個RtcHttpClient組件拖到主窗體。

   
   

   使用RtcHttpClient1組件

   
   

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

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

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

• 將其重命名為RtcHttpClient
  

• 將其自動連接屬性設置為True

• 將其MultiThreaded屬性設置為True

• 將其ReconnectOn.ConnectLost屬性設置為True

• 將其ServerAddr屬性設置為localhost

• 將其ServerPort屬性設置為80

• 將其UseProxy屬性設置為True

4. 使用RtcClientModule組件
   

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

   
   

   RtcClientModule用于準備遠程函數調用，將其發布到服務器，接受服務器的響應以及調用本地事件處理程序以及每次調用收到的結果。

• 將其重命名為RtcClientModule
  

• 將其客戶端屬性設置為RtcHttpClient

• 將其自動轉發屬性設置為2

• 將其AutoSyncEvents設置為True

• 將其ModuleFileName設置為/ mytest

5. 使用RtcResult組件
   

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

   
   

• 將其重命名為RtcResult

該組件將用于處理從遠程函數調用返回的結果，為此，我們必須實現它的OnReturn事件。

我們的表格應該像這樣：




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;

   該輸入鍵將觸發我們的遠程函數調用。為此，我們捕獲了Enter鍵代碼（＃13），然后：

• 準備一個新的函數調用。
  

• 設置函數的調用參數和

• 調用遠程功能。

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

 如果您對想要購買正版授權RealThinClient SDK Pro，可以聯系咨詢相關問題。

    關注慧聚IT微信公眾號 ???，了解產品的最新動態及最新資訊。