🚀 go-pugleaf

"Muhammad Momin Rashid" <momin@hotmail.com> wrote in 
news:3ec1568a@newsgroups.borland.com:

> Following is the code which executes on a button click
> 
> void __fastcall TForm1::Button1Click(TObject *Sender)
> {
>   AnsiString asTemp = "";
>   unsigned long lBufferSize = 0;
> 
>   StatusBar1->SimpleText = "Sending Message";
> 
>   asTemp = EditSendTo->Text;
>   lBufferSize = asTemp.WideCharBufSize() + 1;
>   wchar_t *wcSendTo = new wchar_t[lBufferSize];
>   wcSendTo = asTemp.WideChar(wcSendTo, lBufferSize);
> 
>   asTemp = EditMessageFrom->Text;
>   lBufferSize = asTemp.WideCharBufSize() + 1;
>   wchar_t *wcFromName = new wchar_t[lBufferSize];
>   wcFromName = asTemp.WideChar(wcFromName, lBufferSize);
> 
>   lBufferSize = MemoMessage->GetTextLen() + 1;
>   char *cBuffer = new char[lBufferSize];
>   MemoMessage->GetTextBuf(cBuffer, lBufferSize);
> 
>   int iReturn = NetMessageBufferSend(wcSendTo, wcSendTo, wcFromName,
> cBuffer, lBufferSize);
> 
>  // additional code here for error checking and cleanup
> 
>   delete [] wcSendTo;
>   delete [] wcFromName;
>   delete [] cBuffer;
> }
> 

You should cast buffer to LPBYTE, and "calculate" buffer length to 
correct value. 
Some time ago I just fight with this same thing and I think f following 
chunk of code will do the trick. 

AnsiString asRecipient = EditSendTo->Text;
AnsiString asFrom = EditMessageFrom->Text;
AnsiString asMessage = "";

for(int i=0; i<MemoMsg->Lines->Count; i++)
  {
    asMessage += MemoMessage->Lines->Strings[i];
  }    

wchar_t * MyBuffer = new wchar_t[asMessage.WideCharBufSize()];
wchar_t * MyUser = new wchar_t[asRecipient.WideCharBufSize()];
wchar_t * MySelf = new wchar_t[asFrom.WideCharBufSize()];

asMessage.WideChar(MyBuffer, asMessage.WideCharBufSize());
asRecipient.WideChar(MyUser, asRecipient.WideCharBufSize());
asFrom.WideChar(MySelf, asFrom.WideCharBufSize());

NET_API_STATUS MyStatus = NetMessageBufferSend(NULL,
                    MyUser,
                    MySelf,
                    (LPBYTE)MyBuffer,
                    wcslen(MyBuffer) * sizeof(WCHAR));
delete [] MyBuffer;
delete [] MyUser;
delete [] MySelf;

-- 
-jii