![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Sockets [D7, WinXP]
HardClubber © (2003-05-30 20:09:00)Работаю с TTCPClien и сервером соответственно. У меня вопросик: никак не пойму, как организовать работу одновременно, скажем, 100 пользователям с сервером?
Создать 100 TcpClient"ов или ещё как?
Заранее благодарен
Dwemer (2003-06-01 06:43:00) [1]В ДЕЛФИ 7 есть эти же самые ClientSocket и Server, просто их убрали из палитры компонентов. В uses добавь модуль ScktComp и:
var
ClientSocket1: TClientSocket;
....
ClientSocket1:=TClientSocket.Create(nil);
with ClientSocket1 do
begin
Active:=FALSE;
ClientType:=ctNonBlocking;
Host:=chat_host;
Port:=80;
OnConnect:=ClientSocket1Connect;
OnRead:=ClientSocket1Read;
OnError:=ClientSocket1Error;
end;
....
procedure TfmMain.ClientSocket1Connect(Sender: TObject;
Socket: TCustomWinSocket);
....
и т. д.
HardClubber (2003-05-30 22:45:00) [2]Нашёл в 6 делфях компоненты clientsocket и сервер соответственно.
Есть ли аналог в 7 делфи?
HardClubber (2003-05-30 21:35:00) [3]Народ! помогите! сессия в разгаре!
Нужно: максимум от 100 клиентов получить запрос на данные, и одновременно им с сервера все эти данные отдать.
Какие есть варианты? желательно exmple"ы, т.к. разбираться некогда, думал будет проще :)