![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Свой браузер-чат [D7, WinXP]
Дмитрий_05 © (2005-06-02 20:35:00)Я хотел бы попробовать написать браузер-чат, для общения в чатах... Например под krovatka.ru. Что-то наподобие программы Capellan, только получше, он мне не нравится... Идея хорошая, а реализовано не очень как-то... Я так понимаю нужно писать HTML-Parser, он у меня есть! Как мне сделать чтобы все сообщения добавлялись например в RitchEdit?
Дмитрий_05 (2005-09-06 01:54:00) [1]А ктонибудь пробовал похожее создать?
lehich (2005-08-22 13:46:00) [2]
> ХЗ на чём этот чат. Толи на CGI толи на PHP
сам движок чата кроватка написан на Си...
Piter (2005-08-22 13:33:00) [3]геспер (22.08.05 11:18) [6]
[4]
геспер (2005-08-22 11:18:00) [4]А как быть если у меня прокся ?
-=S.S=- (2005-06-02 22:10:00) [5]Хотишь поиграться ... поиграйся... Лично я не знаю точно как запросить страницу с корня сайта. Та и разбираться некогда.
procedure TForm1.ClientSocket1Write(Sender: TObject;
Socket: TCustomWinSocket);
begin
Socket.SendText('GET '+'HTTP/1.0'#10#10);
end;
procedure TForm1.ClientSocket1Read(Sender: TObject;
Socket: TCustomWinSocket);
Var
S:String;
begin
S:= Socket.ReceiveText;
If S='' then ClientSocket1.Close;
FText := FText + S;
end;
procedure TForm1.ClientSocket1Connecting(Sender: TObject;
Socket: TCustomWinSocket);
begin
FText := '';
end;
procedure TForm1.ClientSocket1Disconnect(Sender: TObject;
Socket: TCustomWinSocket);
begin
Memo1.Lines.Add(FText);
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
Clientsocket1.Host := 'znak.krovatka.ru';
ClientSocket1.Port := 80;
ClientSocket1.Open;
end;
procedure TForm1.ClientSocket1Connect(Sender: TObject;
Socket: TCustomWinSocket);
begin
Memo1.Clear;
end;
Eraser (2005-06-02 21:42:00) [6]Дмитрий_05 (02.06.05 21:36) [2]
TidHTTP
Дмитрий_05 (2005-06-02 21:36:00) [7]Это я и сам знаю... вот как мне ее запрашивать страницу? Иными словами как мне получать HTML-код страницы?
Eraser (2005-06-02 21:36:00) [8]-=S.S=- © (02.06.05 21:09) [1]
Скоро PHP и CGI чаты умрут. Так как они живут за счёт рефреша. И соответсвенно жрут много трафика.
Умрут то умрут, но не из-заа трафика, т.к. на западе и в Москве сейчас уже в основном анлим везде и на трафик всем накласть.
-=S.S=- (2005-06-02 21:09:00) [9]ХЗ на чём этот чат. Толи на CGI толи на PHP. Но это впринципе не важно ;).
Для того чтобы добавлять это всё в RitchEdit необходимо постоянно запрашивать страницу с сервера. Её парсить и добавлять в RitchEdit.
Всё понятно ?
PS : Скоро PHP и CGI чаты умрут. Так как они живут за счёт рефреша. И соответсвенно жрут много трафика.