Клиент веб-чата на делфи. Как реализовать?

← →
Rescator © (2006-08-18 23:43) [0]

Посоветуйте, пожалуйста, как это сделать. Буду благодарен за любую ссылку и пример похожего приложения :)

Не могу авторизоваться в чате.. Отправляю серверу пост-запрос такой:

var
request, URL, content,
Header, Body: string;
begin
TcpClient1.RemoteHost:="psychology.net.ru";
TcpClient1.RemotePort:="80";
url:="/comcom/index.php";
content:="Login=<hided>&Password=<hided>&Room=1&Sex=%CC&Enter=+%C2%EE%E9%F2%E8+%E2+%F7%E0%F2";
request:="POST "+URL+" HTTP/1.0"+CRLF;
request:=request+"Accept: */*"+CRLF+
"Accept-Language: ru"+CRLF+
"User-Agent: Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1; MRA 4.3 (build 01218); .NET CLR 2.0.50215)"+CRLF+
"Content-Type: application/x-www-form-urlencoded"+CRLF+
"Proxy-Connection: Keep-Alive"+CRLF+
"Content-Length: "+inttostr(length(content))+CRLF;
TcpClient1.Open;
TcpClient1.Sendln(request+CRLF+content,"");
Header:=TcpClient1.Receiveln(CRLF+CRLF);
Body:=TcpClient1.Receiveln("");
TcpClient1.Close;
Memo1.Lines.Add(Header + CRLF + Body);

Пишет, что на сервере нет такой странички и отсылает на сайт хостинга этого чата. Помогите разобратся(

← →
Ketmar © (2006-08-18 23:54) [1]

http://elite-mythology.sourceforge.net/TAKChat/
вот тебе "любая" ссылка. %-)

Клиент веб-чата на делфи. Как реализовать? Найти похожие ветки