Newsgroups : Borland : borland.public.delphi.internet.winsock : 2007 Nov : Re: no overloaded version of sendbuffer
| Subject: | Re: no overloaded version of sendbuffer |
| Posted by: | "Pierre Lemerle" (plspam@free.fr) |
| Date: | Sat, 17 Nov 2007 17:06:26 |
ok I got it.
could someone be so kind to confirm me the method is correct,
type
TObjectState = packed record
Scene: String[8];
Name: String[8];
Position: TVector3f;
orientation: TPackedRotationMatrix;
end;
var
my_record:TObjectState ;
from the client's side
--------------------
N:=sizeof(my_record);
UDPClient.sendbuffer(rawtobytes(my_record,N));
from the server's side
---------------------
procedure TForm1.UDPServerUDPRead(Sender: TObject; AData:
TBytes;ABinding: TIdSocketHandle);
var
buff:TObjectState;
begin
move(Adata[0],buff,N);
end;
none