что не так делаю ?


.h-файл:

const WM_USERMESSAGE = WM_USER + 245;
....
private:
void __fastcall WMUserMessage(TMessage& Msg);

BEGIN_MESSAGE_MAP
VCL_MESSAGE_HANDLER(WM_USERMESSAGE, TMessage, WMUserMessage);
END_MESSAGE_MAP(TForm)

.c-файл:

упаковка:
void __fastcall TFormStart::ServerSocket1ClientConnect(TObject *Sender,
TCustomWinSocket *Socket)
{
String S = Socket->RemoteAddress; // получаем AnsiString — адрес клиента
String *P = &S; // получаем ссылку

PostMessage(Handle,WM_USERMESSAGE, (WPARAM)P, 0); // передаем ссылку
}

распаковка:
void __fastcall TFormStart::WMUserMessage(TMessage& Msg)
{
AnsiString *P = new AnsiString();
AnsiString *P = (AnsiString*)Msg.WParam;

String S = *P; // что то получаем, но не адрес клиента

if(Msg.LParam==0)
ListBox1->Items->Add(S);
}

Здравствуйте, foxdayk, Вы писали:

F>что не так делаю ?

String S = Socket->RemoteAddress; // получаем AnsiString — адрес клиента
String *P = &S; // получаем ссылку

PostMessage(Handle,WM_USERMESSAGE, (WPARAM)P, 0); // передаем ссылку

Строка на стеке умирает.

Как оффтопик: мой вам совет, откажитесь от c++ builder.

Здравствуйте, foxdayk, Вы писали:

F>что не так делаю ?
как минимум, не знаешь что такое "С/С++". Это не программа в VisualStudio. Это язык. а твой вопрос -> в другой форум (например, "прикладные вопросы").

Здравствуйте, foxdayk, Вы писали:

F>что не так делаю ?

void __fastcall TFormStart::ServerSocket1ClientConnect(TObject *Sender,
TCustomWinSocket *Socket)
{
String S = Socket->RemoteAddress; // получаем AnsiString — адрес клиента
String *P = &S; // получаем ссылку

SendMessage(Handle,WM_USERMESSAGE, (WPARAM)P, 0); // передаем ссылку
}

или

void __fastcall TFormStart::ServerSocket1ClientConnect(TObject *Sender,
TCustomWinSocket *Socket)
{
String S = Socket->RemoteAddress; // получаем AnsiString — адрес клиента
String *P = new String( S );
...
}
void __fastcall TFormStart::WMUserMessage(TMessage& Msg)
{
...
ListBox1->Items->Add(S);
}
delete S;

Это только "чтоб заработало".

Здравствуйте, foxdayk, Вы писали:

Попробуйте разобраться, что такое AnsiString изнутри, сразу станет понятно, что через WPARAM в сообщении Вы его не передадите. Если так уж требуется использовать Win-сообщения, то используйте WM_USER или передавайте атомы.

Здравствуйте, foxdayk, Вы писали:

1) --> рвздел WIN API

2) А маршалить память кто вместо Вас будет, Ленини?
Как уже говорилось, либо передавайте атомы и другие данные которые влазят в WPARAM/LPARAM, либо ручной маршалинг, либо воспользуйтесь сообщениями которые маршалятся системой автоматически (например WM_SETTEXT маршалит строку LPARAM, WM_COPYDATA маршалит буфер указанной длины)