![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как послать сообщение на другой комп? [D6, Win2k]
Alibaba © (2002-05-13 17:25:00)Все привет!
Подскажите, плиз, как послать сообщение на другой комп?
ZZ (2002-05-14 16:56:00) [1]Alibaba
И какие ошибки выдает при компиляции???
Alibaba (2002-05-14 10:33:00) [2]Не совсем...
С Win2k -> Win2k работает
С Win98 -> Win2k НЕТ! (говорит netapi32.dll нету... однако...)
Alibaba (2002-05-13 18:55:00) [3]ЗАРАБОТАЛО!!!!!!!
mrcat (2002-05-13 18:52:00) [4]Client - клиентское место, с него посылаешь сообщения,
Server - сервер, принимает.
Оба сокетных компонента есть на панели компонентов.
удачи
Alibaba (2002-05-13 18:38:00) [5]2ZZ
А ты сам пробовал этот примерчик?
Что-то он у меня компилиться не хочет...
Alibaba (2002-05-13 18:25:00) [6]2mrcat
У тебя есть два разных компонента
ClientSocket и Socket - это так надо?
mrcat (2002-05-13 18:21:00) [7]>> 2Alibaba
Естественно,на сервере тебе это сообщение надо принять:
procedure TMCServerForm.ServerSocket1ClientRead(Sender: TObject;
Socket: TCustomWinSocket);
begin
ShowMessage(Socket.ReceiveText); // или что-то в этом роде...
end;
Alibaba (2002-05-13 18:16:00) [8]2mrcat
Самое толковое предложение.
Сейчас попробую.
mrcat (2002-05-13 17:54:00) [9]procedure TMCForm.SendTextToVasaClick(Sender: TObject);
begin
with ClientSocket do begin
Address := "10.11.12.13";
Port := 1234;
Active := true;
end;
end;
procedure TMCForm.ClientSocketConnect(Sender: TObject; Socket: TCustomWinSocket);
begin
with Socket do begin
SendText("Привет, Вася!");
Active := false;
end;
end;
ZZ (2002-05-13 17:48:00) [10]Без клиентов и серверов - стандартной службой сообщений
http://delphi.xonix.ru/faq/show.php?m=lan&n=2
Song (2002-05-13 17:45:00) [11]Можно определить IP по имени (GetHostByName) либо написать имя в TClientSocket.Host (первое предпочтительнее)
Alibaba (2002-05-13 17:40:00) [12]Приведи, плиз, пример. (IP пусть 10.11.12.13)
mrcat (2002-05-13 17:36:00) [13]ну, дык, используй IP компа Vasa
Alibaba (2002-05-13 17:35:00) [14]Нет, мне не надо ЛОВИТЬ сообщение.
Мне необходимо просто послать сообщение на комп "Vasa".
mrcat (2002-05-13 17:33:00) [15]Организуй клиент/сервер, например на сокетах - все это очень понятно описано в DelpHelp