TCp Server respond

I have a Component, called TTCPServer, and would simply like to know how I answer a question from a WebBrowser, that connects to my TTCpServer Application at a given port. It (The WebBrowser) peeks, GET /index.html /HTTP 1.0, or something like that, and I would like to know how I respond to this and redirect or refer it to a file on my harddrive, called index.html, so it loads it. By the way this only seems to work in Netscape, (not that it really matters).

Check this out


procedure TForm1.OnData(Socket: TSockets);
var
   S : String;
Begin
With TTCpServer1 Do
Begin
   S := Peek(Socket);
    // If everything works as it should, S now //contains perhaps, GET /index.html / HTTP 1.0 and I'd like to know how I respond to this and give it the address, 'C:\index.html' for instance, so it loads it


Hope someone can help me....