Всім привіт!
Підкажіть, пліз, як послати повідомлення на інший комп?
Організуй клієнт / сервер, наприклад на сокетах - все це дуже зрозуміло описано в DelpHelp
Ні, мені не треба ЛОВИТИ повідомлення.
Мені необхідно просто послати повідомлення на комп "Vasa".
ну, дик, використовуй IP компа Vasa
Приведи, плиз, приклад. (IP нехай 10.11.12.13)
Можна визначити IP по імені (GetHostByName) або написати ім'я в TClientSocket.Host (перше переважно)
procedure TMCForm.SendTextToVasaClick (Sender: TObject);
begin
# 032; with ClientSocket do begin
# 032; # 032; Address: = "10.11.12.13";
# 032; # 032; Port: = +1234;
# 032; # 032; Active: = true;
# 032; end;
end;
procedure TMCForm.ClientSocketConnect (Sender: TObject; Socket: TCustomWinSocket);
begin
# 032; with Socket do begin
# 032; # 032; SendText ( "Привіт, Вася!");
# 032; # 032; Active: = false;
# 032; end;
end;
2mrcat
Саме розумне пропозицію.
Зараз спробую.
>> 2Alibaba
Природно, на сервері тобі це повідомлення треба прийняти:
procedure TMCServerForm.ServerSocket1ClientRead (Sender: TObject;
# 032; Socket: TCustomWinSocket);
begin
# 032; ShowMessage (Socket.ReceiveText); // або щось в цьому роді.
end;
2mrcat
У тебе є два різних компонента
ClientSocket і Socket - це так треба?
2ZZ
А ти сам пробував цей прімерчік?
Щось він у мене Компільо не хоче.
Client - клієнтське місце, з нього посилаєш повідомлення,
Server - сервер, приймає.
Обидва сокетних компонента є на панелі компонентів.
Не зовсім.
З Win2k -> Win2k працює
З Win98 -> Win2k НІ! (Говорить netapi32.dll немає. Однако.)
Alibaba
І які помилки видає при компіляції.