[Помогите!] Чат

[=PaLeTiZaToR=]

Здравствуйте . Написал чат на дельфи , вроде все нормально работает , а вот как мне определить кол-во пользователей и их ники ... очень нужно )
Зараннее спасибо .

[VeTaL_UA]

А чат как работает? Через сервер?)

[=PaLeTiZaToR=]

Цитата: Сообщение от VeTaL_UA А чат как работает? Через сервер?)

Экстрасекс ?
Да, через сервер . Счас ухожу, давай я тебе завтро напишу в скайп с 18,00 до 21,00 где то , ок ? будешь в это время ?

[VeTaL_UA]

Ну пиши при запуске программы в текстовик на сервере ники тех, кто чатик запустил, и удаляй их от туда тогда, когда программу выключают. Не очень сложно...

Цитата: Сообщение от =^PaLeTiZaToR^= давай я тебе завтро напишу в скайп с 18,00 до 21,00 где то , ок ? будешь в это время ?

Я в скайпе редко сижу. Писали бы вы лучше в асю

[=PaLeTiZaToR=]

Цитата: Сообщение от VeTaL_UA Ну пиши при запуске программы в текстовик на сервере ники тех, кто чатик запустил, и удаляй их от туда тогда, когда программу выключают. Не очень сложно... Я в скайпе редко сижу. Писали бы вы лучше в асю

Напиши плз в лс асю... а то чета не могу посмотреть ....

[Mebius]

=^PaLeTiZaToR^=, стандартными средствами, стринг или стринглист с разделителями, а еще лучше массив из рекордов, а еще еще лучше класс на базе тстринглист)

[=PaLeTiZaToR=]

Цитата: Сообщение от Mebius =^PaLeTiZaToR^=, стандартными средствами, стринг или стринглист с разделителями, а еще лучше массив из рекордов, а еще еще лучше класс на базе тстринглист)

А еще лучше написать мне в скайп ... а не на форум =)

[Mebius]

Цитата: Сообщение от =^PaLeTiZaToR^= А еще лучше написать мне в скайп ... а не на форум =)

а мне посты интерестно понабивать xD

вообще на базе стринглиста просто

в OnClientConnect когда юзверь прошел авторизацию пишем:

i:=UserList.IndexOF(Nikname);
if i=-1 then
UserList.add(NikName);

в он клиент дисконнект:

i:=UserList.IndexOF(NikName);
if i>-1 then
UserList.Delete(Nikname);

количество клиентов или с серверсокета или из юзерлист берется

LabelN:='Кол-во юзверей: '+IntToStr(UserList.Count-1);