Delphi 用のFitnesse Slim サーバーを実装しようとしていますが、通信に問題があります。

Fitnesse は私のプロセスを開始し、コマンドライン引数としてポート番号を与えてくれます。

次に、指定されたポート番号でソケットを作成すると、Fitnesse はそのポートに接続します。

仕事にTTcpServerを使用しています：

OnAccepted( ) イベントでは、仕様で指定されているように、使用するプロトコル バージョンを送信します。

ReceiveBuf( ) を呼び出すと、プロセスが終了し、fitnesse が例外をスローします。

oSpyを使用して、何が送受信されるかを確認しました。コードがプロトコル バージョンを送信した後、fitnesse がメッセージを返信し、このメッセージを受信しようとすると接続がリセットされることがわかります。

これの理由が何であるか知っている人はいますか？私は何か完全に間違っていますか？

ところで、fitnesse に付属の Java Slim サーバーを使用すると、すべて正常に動作します。oSpy は、最初の読み取りまで、同じ通信を表示します。読み取りに失敗しましたが、これは期待どおりに機能します。

ある PC から別の PC にファイルを送信するプログラムを作成しています。を使用して送信しようとしていますchar* bufferが、問題が発生しています。バッファを送信すると思いますが、結果はサイズが0キロバイトのファイルです。バッファをファイルに書き込んでいないのではないかと思いますが、確かなことはわかりません。私のバッファ データは *bmp ファイルからのものです。ここでほぼ同じことについて別の質問を見つけましたが、もっと説明が必要です。

私は C++ Builder 2010 を使用していますが、そのチュートリアルを見つけるのは困難です。便利なさまざまなコンポーネントと機能があります。

コード：

クライアント:

サーバー：

サーバー用とクライアント用の 2 つのフォームがあります。サーバー フォームに ttcpserver をドロップし、localhost プロパティを 127.0.0.1 に、localport プロパティを 55555 に、Active プロパティを true に設定した後、button1(sendtextbutton) onclick イベント ハンドラを作成しました。

次に、クライアント フォームに 1 つの ttcpclient 1 ラベル 2 ボタンをドロップし、クライアントのリモート ホスト プロパティを 127.0.0.1 に、リモート ポートを 55555 に設定し、connectbutton(button1) のイベント ハンドラーを作成しました。

ttcpclient の onconnect イベントを書きました:

最後に、ttcpclient の onrecieve イベント ハドラー:

クライアント プログラムのキャプションは、(接続してサーバー フォームのボタンをクリックした後) 'メッセージ' に変更されるはずでしたが、変更されません。私はそれを間違った方法でやっていますか？はいの場合、それを行う方法は？サーバーからクライアントにテキスト メッセージを送信しようとしています (逆接続です!)

2 つのコンソール アプリケーションには、bmThreadBlocking モードの TTcpServer を使用する 1 つのソケット サーバーと、bmBlocking モードの TTcpClient を使用する 1 つのソケット クライアントが含まれます。TTcpClient は、サーバーに接続し、回線を送信してから切断することを目的としています。TTcpServer は、着信接続をリッスンし、OnAccept イベント ハンドラで受信した回線をエコーすることを目的としています。

これら 2 つのコンソール アプリケーションは、Windows (XP および 7) で正常に動作します。ただし、CrossKylix または Kylix を直接使用してコンパイルすると、アプリケーションは Linux (SuSE 10.0 および CentOs 5u7) で期待どおりに実行できません。1 つのクライアントが接続するとすぐに、サーバー アプリケーションは "[1]+ Stopped ./TestSocketServer_1_Console_Native" を取得します。つまり、TTcpServer の OnAccept イベント ハンドラー内/後です。この問題についてコメントしていただけませんか？どんな助けでも大歓迎です！

2 つのコンソール アプリケーションは、 http://www.multiupload.com/9HIIG61W93からダウンロードできます。

便宜上、ソース コードもここに貼り付けます。(ポート番号 98765 または 1876 またはその他の番号は役に立ちません。)

TestSocketServer_1_Console_Native

TestSocketServer_1_Console_Native.dpr

uServerDataModule.pas

TestSocketClient_1_Console_Native

TestSocketClient_1_Console_Native.dpr

uClientDataModule.pas

TTCPServer を使用して Delphi 6 で 1 つのネットワーク アプリケーションをプログラミングしています。このコンポーネントの OnAccept イベントで、別のフォームに対して showmodal を呼び出します。これにより、メイン フォームがハングします。スレッドのせいだと思いますが、このイベントでフォームを表示する方法がわかりません。私は本当にそれを呼び出す必要があります。どんな答えでも感謝します。ありがとう。

私はこれで十分に戦ってきました: 私は TCP クライアント コードを書こうとしていますが、このコードはサーバーにデータを送信し、応答を取得する必要があります。クライアントコードは次のとおりです。

リモート ホストもデータを受信し、応答します。残念ながら、$str のデータを取得できません。私はリモート ホストを制御しておらず、データを受信して​​応答を生成したことしか確認できません。正確にどこが間違っているのか、提案できますか?

私は単純な http サーバーを実装していますが、応答をグローバルな状態に依存させたいと考えています。たとえば、同じクライアントからリクエスト「get_settings」を初めて取得した場合、大きな設定 json を送信し、2 回目は「変更されていない」http 応答を送信します。

そんな感じ

問題は、どうすればそれを実装できるかということです。そして、モナドトランスフォーマーなどを使わずに、手動でできるだけ簡単にしたいと思います。コードは醜くシンプルにしましょう。ありがとう

TCPServer と TcpClient の問題について助けが必要です。Delphi XE2 と Indy 10.5 を使用しています。

一般的なスクリーン キャプチャ プログラムに基づいて、サーバー プログラムとクライアント プログラムを作成しました。

ScreenThief - ネットワーク経由でスクリーン ショットを盗む

私のクライアント プログラムは、.zipファイルと一部のデータをサーバーに送信します。これは通常、個別に数回機能しますが、タイマーを介して 5 秒間に 5 回送信が実行されるストレス テストに入れると、試行 #63 で、クライアントはサーバーに接続できなくなります。

ソケット エラー #10053
ソフトウェアが原因で接続が中止されました。

どうやら、サーバーのリソースが不足していて、それ以上のクライアント接続を受け入れることができないようです。

エラー メッセージの後、サーバーに接続できません。個々のテストでも、ストレス テストでも接続できません。クライアントを終了して再起動しても、エラーは解決しません。サーバーを終了して再起動する必要があります。その後、クライアントは再び接続できます。

クライアントでソケット エラー #10054 が発生することがあり、これによりサーバーが完全にクラッシュし、再起動する必要があります。

何が起こっているのかわかりません。サーバーを時々再起動する必要がある場合、それは堅牢なサーバーではないことを知っています.

テストできるように、クライアントとサーバーのソースを次に示します。

http://www.mediafire.com/download/m5hjw59kmscln7v/ComunicaTest.zip

サーバーを実行し、クライアントを実行し、「無限に実行するためにチェックするだけ」にチェックを入れます。テストでは、サーバーは で実行されlocalhostます。

誰でも私を助けることができますか？レミー・ルボー?