🚀 go-pugleaf

>I have tryed a ProcessPacket routine like :
>void__fastcall TForm1::ProcessPacket(TCustomWinSocket *Socket, void *Data, int DataLength)
>{
>        // process Data as needed...
>        char *a = new char[DataLength];
>        a = (char*)Data;
>        Memo->Lines->Add(AnsiString(a,DataLength));
>        delete[] a;
>}
>
>It dont work.. why not ? Sender program send an example with :
>        char *buf=new char[10];
>        buf = "1234567890";
>        int size=10;
>
>        Socket->SendBuf ( &size, sizeof(int) );
>        Socket->SendBuf ( buf , size );
>
>and the receiver write only not ascii chars. What is wrong ?

Fixed it, it was : ProcessPacket(TCustomWinSocket *Socket, LPBYTE *Data, int DataLength) so it is LPBYTE not void* .
A new problem appairs now when i receive half package each time, i write in the Memo the first 5 chars correctly and the last 5 in a not ascii chars..

Here is the code used in the sender :
   char *buf=new char[10];
   buf = "12345";

   Memo->Lines->Add("invio 1");
   int size=10;
   Socket->SendBuf ( &size, sizeof(int));
   Socket->SendBuf(buf,5);

   Sleep(3000); // to be sure it send data in 2 different package
   buf = "67890";
   Memo->Lines->Add("invio 2");
   Socket->SendBuf(buf,5);

Any idea ?
Thank you very much, you all helped my a lot :)
Alfred