AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Netzwerke Delphi ClientSocket/ServerSocket und Hamachi
Thema durchsuchen
Ansicht
Themen-Optionen

ClientSocket/ServerSocket und Hamachi

Ein Thema von Socke_SG · begonnen am 22. Mär 2009 · letzter Beitrag vom 24. Mär 2009
 
Socke_SG

Registriert seit: 31. Mär 2008
47 Beiträge
 
#1

ClientSocket/ServerSocket und Hamachi

  Alt 22. Mär 2009, 20:53
Hallo zusammen,

habe ein Programm geschrieben, welches übers Netzwerk letztendlich nur Stirngs austauscht. Klappt im Netzwerk auch wunderbar, doch wenn ich das ganze versuche über Hamachi (um es übers Internet zu benutzen) ans laufen zu kriegen gibt es Probleme. Client und Server finden und verbinden sich wunderbar miteinander, doch sobald irgendwie eine Nachricht gesendet wird (die im übrigen meistens ein Befehl ist, der intern verarbeitet wird), gibt es eine Zugriffsverletzung der Adresse 00000000 usw. Die Befehle haben in der Regel vier Zeichen als Befehlskennung, die dann vom Client/Server erkannt und weiterverarbeitet weden, sprich, z.B. dass eine Zahlenfolge in ein Array geschrieben wird.

Versteht ihr zufällig woran das liegen könnte? Meine Vermutung ist, dass die Befehle evtl nicht komplett übertragen werden. Vielleicht fällt euch ja etwas dazu ein.

Vielen Dank im Voraus

PS: Hier ein Beispiel wie das bei mir aussieht:

Delphi-Quellcode:
procedure TFrmServer.ServerSocketClientRead (Sender: TObject; Socket: TCustomWinSocket);
var Nachricht: TChatNachricht;
    I: Integer;
    l,j,k: integer;
    dummy: string;
    randomnumber: integer;
    blub: string;
    testzeug: string;
    packetsize: integer;
begin

  {Nachricht empfangen}
  Socket.ReceiveBuf (Nachricht, SizeOf(Nachricht));
  edit1.text:=nachricht.text;
  mess:= edit1.Text;

   if mess[1]+mess[2]+mess[3]+mess[4]+mess[5]+mess[6]+mess[7]='#$§#GCXthen begin
    mess[1]:=' ';
    mess[2]:=' ';
    mess[3]:=' ';
    mess[4]:=' ';
    mess[5]:=' ';
    mess[6]:=' ';
    mess[7]:=' ';
    mess:=trim(mess);
    zahl:=StrToInt(mess);
  end;
  Mit Zitat antworten Zitat
 


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 19:47 Uhr.
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz