Форум АНТИЧАТ - Показать сообщение отдельно - Помгите с сообщениями в делфи

Тема: Помгите с сообщениями в делфи

Показать сообщение отдельно

05.03.2006, 23:47

Raider

Познающий

Регистрация: 02.05.2005

Сообщений: 42

Провел на форуме:
137056

Репутация: 9

Т.е тебе всего-то надо указать тип сообщения ???

Клиент:

Код:

var
  MsgType: UINT;
begin
  MsgType := MB_ICONERROR;
  ClientSocket1.Socket.SendBuf(MsgType, SizeOf(UINT));
end;

Сервер:

Код:

var
  MsgType: UINT;
begin
  Socket.RecvBuf(MsgType, SizeOf(UINT));
  MessageBox(Handle, '', '', MsgType);
end;