![]() |
|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
![]() |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
![]() Всем доброго времени суток.
Нужна помощь, помогите с темой: Разработка системы рассылки сообщений пользователям сети на основе сокетов windows (Палазков). И небольшое описание темы: Технология клиент-сервер на основе сокетов Windows Реализация сокетов через API-функции. Горит ))))) |
#2
|
||||
|
||||
![]() Открываем гугл и любую книжку по делфи и пишем. Что именно не получается?
Предвидя ответ "всё" говорю сразу: такое в раздел "Работа" этого форума. jmp $ ; Happy End! The Cake Is A Lie. |
#3
|
|||
|
|||
![]() Ну почти все, создал "сервер" по примеру из гугля. Не пойму как клиент подключается. Хотелось бы что-нибудь не слишком грамоздкое =)
|
#4
|
||||
|
||||
![]() Цитата:
Всегда пишите код так, будто сопровождать его будет склонный к насилию психопат, который знает, где вы живете. |
#5
|
|||
|
|||
![]() Вот отсюда брал http://www.delphimaster.ru/articles/socksrv/
Там даже пример есть ![]() Как по этому примеру "клиент" к этому "серверу" подключить? |
#6
|
||||
|
||||
![]() Цитата:
Код:
procedure TForm1.Button1Click(Sender: TObject); begin with ClientSocket1 do begin Port := 1025; Host := '127.0.0.1'; Active := True; end; end; Код:
ClientSocket1.Socket.SendText('Hello server!'); Цитата:
Всегда пишите код так, будто сопровождать его будет склонный к насилию психопат, который знает, где вы живете. |