Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

TClientSocket из DLL


Shock ©   (2005-06-05 18:02:00) 

делаем ДЛЛ с кодом
TClientSocket *sock = new TClientSocket(NULL);
  sock->Port = 1234;
  sock->Address = "192.168.7.42";
  sock->Host = "192.168.7.42";
  sock->Active = true;
  sock->Socket->SendText("sdff");
  return 0;
все гуд конект есть но не отсылает строчку :(
если мужду sock->Active = true; и sock->Socket->SendText("sdff"); вставить ShowMessage("dd"); то после нажатия кнопки ок строка отсылаеться :( подскажите в чем трабла


Shock   (2005-06-05 21:24:00) [1]

Сенкс помогло !
TClientSocket *sock = new TClientSocket(NULL);
  sock->Port = 1234;
  sock->Address = "192.168.7.42";
  sock->Host = "192.168.7.42";
  sock->ClientType = ctNonBlocking;
  sock->Active = true;
  while(sock->Socket->Connected==false){
  Application->ProcessMessages();
  sock->Socket->SendText("sdff");       }
  return 0;


Новичек   (2005-06-05 18:08:00) [2]

Попробуй while not Sock.Socket.Connected do Application.ProcessMessages. (Нет под рукой Builder'a, сам переведи на C++).


Наверх

Титульная страница Поиск, карта сайта Написать письмо