🚀 go-pugleaf

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;
}

"Remy Lebeau (TeamB)" <gambit47@yahoo.com> wrote in message
news:3ec11fe0$1@newsgroups.borland.com...
>
> "Muhammad Momin Rashid" <momin@hotmail.com> wrote in message
> news:3ec0f3fb@newsgroups.borland.com...
>
> > When I tried sending a message to the same machine,
> > a string of question marks "????" was sent instead of
> > the actual message.  Whereas it fails completly while
> > sending a message to a network machine.
>
> What does your actual code look like?
>
>
> Gambit
>
>