Thema: TCP/IP Client

Einzelnen Beitrag anzeigen

Tek

Registriert seit: 26. Nov 2015
2 Beiträge
 
#1

TCP/IP Client

  Alt 3. Dez 2015, 08:29
Hallo zusammen !

ich habe Client in C# programmiert, der sollte die daten im Server anfragen und der Server sollte Ihn beantworten,
aber leider funktioniert nicht , ich weiß nicht wo der fehler liegt. bitte kann jemand mir helfen...

Ich habe einen Client, der mit delphi programmiert wurde, funktioniert einwandfrei.

Delphi Code:

Delphi-Quellcode:
procedure TForm1.Memo_SendKeyPress(Sender: TObject; var Key: Char);
var
  s: string;
  i: integer;
  t_start : tdatetime;
begin
    case Key of
      #13: if Memo_Send.Lines.Count>0 then
        begin
           s := Memo_Send.Lines[Memo_Send.Lines.Count-1];
           with IdTCPClient do try
                IOHandler.Writeln(s);
                s:= IOHandler.ReadLn(#10#13,300);
                Memo_Receive.Lines.Add(s);
           finally end;
        end;
    end;
end;
Mein C# Code:


Code:
            // send from Client to Server          
            NetworkStream nwStream = client.GetStream();
            byte[] bytesToSend = ASCIIEncoding.ASCII.GetBytes(data);
            Console.ForegroundColor = ConsoleColor.Yellow;
            nwStream.Write(bytesToSend, 0, bytesToSend.Length);
            Console.WriteLine("Sending:" + data);


            // Received data from Server
            byte[] bytesToRead = new byte[client.ReceiveBufferSize];
            Int32 bytesRead = nwStream.Read(bytesToRead, 0, client.ReceiveBufferSize);
            Console.ForegroundColor = ConsoleColor.Cyan;
            Console.WriteLine("Received:" + Encoding.ASCII.GetString(bytesToRead, 0, bytesRead));
Danke im Voraus

Geändert von mkinzler ( 3. Dez 2015 um 08:41 Uhr) Grund: Delphi-/Code-Tag eingefügt
  Mit Zitat antworten Zitat