Creating simplest Web Server using Delphi

Simple Web server that serves one HTTP command (GET) and send the result.

Category:

Education

Tags:

• delphi
• web
• server
• http
• get
• socket
• port
• browser

[TrueVitaly]

Спасибо! Очень помогли ))

Но остался один вопрос, не могу понять, почему когда проверяю localhost:7777 со своего компьютера все работает, а когда проверяю свой с чужого, 192.168.1.35:7777 - нет. Адрес 192.168.1.35 беру из свойства LocalHostAddr. Не подскажете, что может быть не так?

[bagyev]

@TrueVitaly

Дело в том, что сокет принимает соединения только с того адреса, который указан в поле TcpServer1.LocalHost. В данном видео это "localhost". Для того, чтобы сокет принимал соединения с любого адреса, нужно в этом поле выставить значение "0.0.0.0".

[chaebur]

@bagyev у сервера не может быть другого адреса кроме локалхост. публичный адрес зависит только от провайдера. возможно он с адресами намудрил.

[ace4dsl]

very nice.

[darvin939]

@TrueVitaly

192.168.1.35 - это локальный адрес, а тебе нужен IP, который дал тебе провайдер. Узнать его можно на 2ip.ru

[PLOBEXRIME]

Hi, but how to receive POST data from HTML forms ?

[NoShit12]

FIX: To all those who receive an empty page, do this (Win7):

netsh winsock reset catalog (resets winsock entries)

netsh int ip reset reset.log hit (resets TCP/IP stack)

run them BOTH in CMD (With admin priv) and reboot.

[duminicad]

@lukegw are you sure the server was active when you tried to connect via browser?! sometimes you can get a port bind error if another application has binded the port...

[Sonnerick2k]

Спасибо!

Отличный пример, очень помог :)

[TrueVitaly]

@bagyev Спасибо! Работает!! Час голову ломал :)