Problem z TClientSocket

Napisalem dwa proste programy z pomoca komponentow TclientSocket i TserverSocket.
I teraz jesli chce wyslac tekst w strone server -> klient to wszystko chodzi, ale kiedy probuje wyslac wiadomosc z klient -> server to klient wywala blad 1053(Asynchronius socket error) a server blad o kodzie 10057. Programy te wyswietlaja na polu memo wiadomosci ktore wysylaja i ktore przychodza, a tekst ktory ma byc wyslany wpisuje sie w polu Edit.

Fragment kodu do odbierania wiadomosci servera:

procedure TForm1.ServerSocket1ClientRead(Sender: TObject;
  Socket: TCustomWinSocket);
begin
 If ServerSocket1.Socket.Connected then
 memo1.Lines.Add('Otrzymano wiadomosc: ' +ServerSocket1.Socket.ReceiveText);
end;

Fragment kodu do wysylania wiadomosci klienta

procedure TForm1.Button2Click(Sender: TObject); 
begin
 If ClientSocket1.Socket.Connected then
  Begin
    ClientSocket1.Socket.SendText(Edit1.Text);
    Memo1.Lines.Add('Wyslano wiadomosc: ' +Edit1.Text);
 end
 else
  Memo1.Lines.Add('UWAGA: Blad polaczenia')
end;

Mam jeszcze dwa pytania co moze byc przyczyna tego ze jesli uruchomie te programy na jednym komputerze to wszystko chodzi a jesli program klienta dam na inny komputer to nie ma polaczenia? Oraz w jaki sposob za pomoca klienta wyslac wiadomosc w Hexach do servera? Prosze wybaczyc mi moje bledy, dopiero sie ucze ;P, z gory dziekuje za pomoc.

hmm co do problemu to nie wiem co jest nie tak...

A przyczyną nie łączenia z innym komputerem może być wewnętrzne IP.

Tez ostatnio mecze sockety i poradze ci cos- sprawdz, czy wpisales w socketach(properties) takie same porty...