Hi,
ich versuche gerade über den TServer und TClient-Socket, die x und y Werte eines Objektes zu senden. Von Client ---> Server und von Server ---> Client. Ich sende einen String der die x und y werte beinhaltet. Und lese ihn dann mit folgendem code aus:
Delphi-Quelltext
1: 2: 3: 4: 5: 6: 7: 8: 9: 10: 11: 12: 13:
| SendText('xy'+IntToStr(Player1.left)+','+IntToStr(player1.top));
textclient:=client.Socket.ReceiveText;
x2:=COPY(textserver,POS('y',textserver)+1,POS(',',textserver)-3); y2:=COPY(textserver,POS(',',textserver)+1,4);
Player2.Left:=strtoint(x2); Player2.Top:=strtoint(y2); |
Die StringVariable textserver ist der empfangene String, er binhaltet folgenden text:
"xy
y,
x"
Rot sind die einzelnen positionswere! Sie können von 0-999 gehen!
Wenn ich das Prgramm ausführe und es probiere wird bei x2 oder y2 manchmal ein Buchstabe dargestelt. Das führt dann zu einem Fehler.
Ist hier ein Fehler im Code?
Wenn jemmand einen besseren Weg weiß wie ich die Position von Objekten senden kann, bin immer Ohr
Mfg Schnup
