>>38
この程度のバグを取れないようでは困ると思うが...
バグは２カ所。

TForm1.socServerClientRead で，一つのイベントに対して
Socket.ReceiveText と (socServer.Socket).ReceiveText の２カ所で
文字列を取ろうとするから２回目でエラー。

TForm1.Button3Click で，EdtText.Text をクライアントに送り返すはずのコードが
なぜか ReceiveText を SendText しようとしている。何も受信していないだろ？

もし，周りにデバッグのうまい人がいたら頼み込んでデバッグの現場を見せてもらいなさい。
他人のデバッグ手法は見ていておもしろいぞ。