PHP DM Gate v0.9 » Ответ для браузера <span class="vd">[D7]</span>

asker (28.12.07 01:29) [0]

Подскажите, что написать для ответа браузеру. Объясняю:
Есть TServerSocket -> порт 80, запускаем. Потом в браузере открываем http://АЙПИ:80/ и что в этот момент нужно Socket.SendText() чтобы браузер вывел скажем
<h1>Hello world</h1>
Вопрос наверно глупый, но всеже попрошу ответить. Спасибо.

<Цитата>
Сергей М. © (28.12.07 08:29) [1]

Описание http ты уже изучил ?

<Цитата>
BillyJeans (28.12.07 09:48) [2]

мда...

<Цитата>
Свой (06.01.08 17:11) [3]

шли ему ответ, что пошлеш то он и получит

<Цитата>
maxistent © (06.01.08 17:53) [4]

После коннекта ServerSocket получит "текст" от браузера. потом можно чо-нить ответить:

procedure TForm1.ServerSocket1ClientRead(Sender: TObject;
Socket: TCustomWinSocket);
var
s:string;
begin
s:=
'HTTP/1.1 200 OK'+#13#10+
'Date: Sun, 06 Jan 2008 14:33:18 GMT'+#13#10+
'Server: Apache'+#13#10+
'X-Powered-By: PHP/5.2.5-pl0-gentoo'+#13#10+
'Content-Length: 1198'+#13#10+
'Keep-Alive: timeout=15, max=100'+#13#10+
'Connection: Keep-Alive'+#13#10+
'Content-Type: text/html'+#13#10#13#10+
'<HTML> <TITLE> Заголовок </TITLE> TEKCT </HTML>';
ServerSocket1.Socket.Connections[0].SendText(s);
sleep(1000);
ServerSocket1.Active:=false;
end;

это не совсем правильно, но работает вроде...

<Цитата>