は非常に単純なTIdCommandHandler条件応答の例を探している

Question

デルファイXE2、インディ10

ので、私のクライアントは私のTIdCmdTCPServerのTIdCommandHandlerによって処理されるコマンドを送信します。

私はいくつかのロジックを実行して、成功または失敗の応答を返し、その応答をクライアントで確認できるようにします。

例として、いくつかのコード行で指摘できますか？前もって感謝します。

Answer 1

これは最も簡単なデモです。

procedure TForm1.IdCmdTCPServer1CommandHandlers0Command(ASender: TIdCommand); 
begin 
    //ASender.Response.Add('Hello'); // wrong way 
    ASender.Reply.SetReply(0,'HELLO'); 

end; 

：

フォームにIdCmdTCPServerを追加し、1つのコマンドを追加し、Commandプロパティでその名前を設定し、私はもともと私はこのようなOnCommandイベントで応答を処理しなければならないと思いました更新 RemyはResponseを使用すべきではないと指摘しました。

成功または失敗を返したいので、数値結果の後に文字列値を使用するのが普通です。応答文字列のリストの各文字列は暗黙の行末をクライアントに送信しています

procedure TForm1.IdCmdTCPServer1CommandHandlers0Command(ASender: TIdCommand); 
begin 
    if DoSomething then 
    ASender.Reply.SetReply(0,'OK') 
    else 
    ASender.Reply.SetReply(999,'ERROR'); 

end; 

IdCommandHandlerとCmdTCPServer /クライアントとのアイデアは、あなたがプロトコルの「RFC」スタイルに従っていることですこれらはANSI/ASCIIテキストベースです。 RFC形式のインターネットプロトコルの応答は、通常、数値と文字列の両方の値を持つテキストとしてワイヤを介してエンコードされます。文字列リストの内容を取得してレスポンスとして返す必要がある場合は、ASender.Responseを使用できます。クライアントの場合、question here suggests that TIdCmdTcpClient is not the most natural way to build the client for this serverです。彼らの名前から、あなたはお互いのために作られたと思っていたでしょうが、それは正確ではありません。ビルドできる最も単純なTIdCMDTCPServersについては、プレーンバニラTIdTCPClientがクライアントを起動する最も単純なビルディングブロックであることがわかります。