Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Простое клиент-сервер приложение на TTcpServer/TTcpClient [D7, XP]

Soulface © (2006-11-05 01:35:00)
Очень нужно простое клиент-сервер приложение на TTcpServer/TTcpClient.
Если где-то про это уже написано, большая просьба ткнуть меня туда носом, потому что я уже замучался искать.
Если почитать негде, не сочтите за труд, объясните неразумному, как написать приложения (клиент и сервер), которые, например, по нажатию кнопочки будут посылать друг другу переменную stringтипа.

Заранее спасибо.

Soulface (2006-11-05 21:54:00) [1]

> Component..Install Packages..Add bin\dclsockets70.bpl

Спасибо... Вот, оказывается, как всё просто...

Leonid Troyanovsky (2006-11-05 17:29:00) [2]

> Soulface © (05.11.06 15:00) [5]

> которых в Д7 нет.

Component..Install Packages..Add bin\dclsockets70.bpl

--
Regards, LVT.

Soulface (2006-11-05 17:16:00) [3]
Отстану, конечно :)

Anatoly Podgoretsky (2006-11-05 17:06:00) [4]
> Soulface (05.11.2006 17:00:12) [12]

> сразу объяснить мне, чтобы отстал...

А отстанешь? :-
)

Soulface (2006-11-05 17:00:00) [5]

> А ты то тут причем, или думаешь, что тебе будут вылизывать?
>
> И на слабо не надо брать, сейчас Ketmar придет и все тебе
> объяснит

Я всего лишь намекал на возможность сразу объяснить мне, чтобы отстал... Ну что делать, выразился один раз неточно...
Стал бы я вас всех отвлекать, если бы про то, что меня интересует было в книжке написано... Раз пришёл - значит надо, наверное?

Ketmar (2006-11-05 16:09:00) [6]
>[10] Anatoly Podgoretsky(c) 5-Nov-2006, 16:07
>Ресурс ограниченый
так я к тому же.

Anatoly Podgoretsky (2006-11-05 16:07:00) [7]
> Ketmar (05.11.2006 15:59:09) [9]

Ресурс ограниченый

Ketmar (2006-11-05 15:59:00) [8]
>[8] Anatoly Podgoretsky(c) 5-Nov-2006, 15:47
>А ты попробуй, хотя бы для потомков
да ну. я лучше код попишу. или рассказ. или так флудом займусь, без смысла. моск беречь надо, ресурс, чай, не казённый. %-)

Anatoly Podgoretsky (2006-11-05 15:47:00) [9]
> Ketmar (05.11.2006 15:41:07) [7]

А ты попробуй, хотя бы для потомков

Ketmar (2006-11-05 15:41:00) [10]
>[6] Anatoly Podgoretsky(c) 5-Nov-2006, 15:06
>И на слабо не надо брать, сейчас Ketmar придет и все тебе
>объяснит.
сначала хотел, а потом лениво стало. %-)

Anatoly Podgoretsky (2006-11-05 15:06:00) [11]
> Soulface (05.11.2006 15:00:05) [5]

> Вообще-то, этот форум вроде для чайников

А ты то тут причем, или думаешь, что тебе будут вылизывать?
И на слабо не надо брать, сейчас Ketmar придет и все тебе объяснит.

Soulface (2006-11-05 15:00:00) [12]
to Ketmar: спасибо за абсолютно точный и столь же бесполезный ответ. Вообще-то, этот форум вроде для чайников, и такой крутой мастер мог бы оказать снисхождение, поняв, что речь идёт, разумеется, не о передаче переменной, а о передаче её содержимого (в моём случае - текстовой информации).

to Германн: спасибо, но в хелп я тоже смотрел :) ещё бы кто-нибудь объяснил, что означают параметры этого метода... (особенно вторые два). А заодно уж и как работает метод TTcpServer.ReceiveFrom - он ведь должен работать в паре с TTcpClient.SendTo?

to DVM: c Indy связываться не хочется, так как возможности этого инструмента по-моему неадекватны потребностям моего проекта :)

to Leonid Troyanovsky: Тоже спасибо, но этот пример во-первых есть в Д5, а не Д7, во-вторых, он на TServerSocket/TClientSocket, которых в Д7 нет.

Leonid Troyanovsky (2006-11-05 12:21:00) [13]

> Soulface © (05.11.06 01:35)

> меня туда носом, потому что я уже замучался искать.

Ищи в %delphi%\demos - chat.dpr

--
Regards, LVT.

DVM (2006-11-05 12:12:00) [14]
Если устроит пример от Инди то там такое есть. Indy9demos искать надо.

Германн (2006-11-05 04:05:00) [15]

> Soulface © (05.11.06 01:35)
>
> Очень нужно простое клиент-сервер приложение на TTcpServer/TTcpClient.
>
> Если где-то про это уже написано, большая просьба ткнуть
> меня туда носом, потому что я уже замучался искать.

Ну это не совсем "в точности" по сабжу, но всё-таки "первое приближение", имхо.
function SendTo: (var buf; bufsize: integer; ToAddr: TSockAddr; flags: integer = 0): integer; Description Use SendTo to send a single packet of information over the network. Note that information in the packet is not checked for length, completeness, and such, which occurs at a higher level.

Ketmar (2006-11-05 03:56:00) [16]
переменную переслать нельзя.

Наверх

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