Forum: Netzwerke
Delphi
by Basilikum,
20. Jun 2006
also das wäre mir absolut neu... verwechselst du allenfalls select() mit accept() ?
Forum: Netzwerke
Delphi
by Basilikum,
20. Jun 2006
versuch es mal mit folgender Receive-Function:
function TNet.Winsock_reciveTCP;
Var
Buffer : String;
R : Integer;
begin
SetLength(Buffer,1024);
R:=recv(S_accepting, buffer, Length(buffer),0);
If (R < 0) Then --fehler--
Forum: Netzwerke
Delphi
by Basilikum,
19. Jun 2006
SizeOf() wird dir bei einem Pointer (PChar ist ein solcher) auf einer 32-Bit-Maschine immer 4 zurückgeben...
eine Möglichkeit ist StrLen(), dann ist es jedoch unmöglich, ein 0-Byte als Bestandteil der Daten zu haben, da dies als Kennzeichnung für das Ende dient... => kommt auf die Daten an - für "Nur-Text" funktioniert StrLen problemlos...
Forum: Netzwerke
Delphi
by Basilikum,
19. Jun 2006
ich nehme an, buffer ist bei dir PChar !?
function TNet_client.Winsock_sendTCP;
var bytecount:integer;
begin
buffer:='Ein wichtiges Datenpaket';
bytecount:=send(S, buffer^, strlen(buffer), 0);
(send() erwartet keinen Pointer, sondern eine untypiserte Variable)
zum 2. Problem: verrate uns doch noch, von welchem Type buffer ist... aller Pointer-ähnlichen Dinge scheiden aus, da du...