![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Имитация локальной сети на одном ПК [D7, WinXP]
Константинов © (2005-01-10 18:12:00)Нужно передовать текстовые сообщения между машинами в локальной сети.
Я использую для передачи:
ClientSocket1.Host := Form2.Edit1.Text;
ClientSocket1.Port := Form2.SpinEdit2.Value;
ClientSocket1.Active := true;
ClientSocket1.Socket.SendText(Edit2.Text);
ClientSocket1.Active := false;
и для приема:
ServerSocket1.Port := Form2.SpinEdit1.Value;
ServerSocket1.Active := true;
...
procedure TForm4.ServerSocket1ClientRead...
S := Socket.ReceiveText;
end;
на клиенте и на сервере.
Если номера портов и имя ПК для ServerSocket и ClientSocket совпадают, то приложение принимает свои собственные сообщения,
попытка сменить порт у одного из этих компонентов приводит к исключению.
Как мне имитировать одновременную работу клиентской и серверной части ( на этапе разработки ) на одной локальной машине ( не имеющей доступа к сети ).
Заранее спасибо.
Константинов (2005-01-11 18:55:00) [1]to Eraser © (11.01.05 00:45) [4]
спасибо!
Попробую :))
Eraser (2005-01-11 00:45:00) [2]Советую тебе прогу VMWare, с помощю которой ты можешь создать виртуальные компы и связывать их в сеть.
Советую.
Константинов (2005-01-11 00:16:00) [3]Все! Разобрался! :)
Но только действительно сокеты не получится использовать.
Мне нужен диалог сервера с множеством клиентов.
Буду читать по Indy.
Константинов (2005-01-10 18:23:00) [4]Сорри! Попробую почитать нижестоящую ветку.
novice_man (2005-01-10 18:23:00) [5]Если номера портов и имя ПК для ServerSocket и ClientSocket совпадают, то приложение принимает свои собственные сообщения,
попытка сменить порт у одного из этих компонентов приводит к исключению.
Чем приложение принимает сообщения?