Помогите с IdHTTPServer!!!

[NeoNiks]

Здравствуйте!

У меня такой вопрос. Я делаю http сервер на дельфи. всё вроде нормально но только не могу перезватить такой запрос!

Например:
http://www.test.ru?str=1

В PHP чтоб перехватить str можно написать так

$slovo=$_GET['str'];

и переменная $slovo=1

как это сделать в дельфи??

СПАСИБО!

[NeoNiks]

Спасибо уже не надо! А для тех кому интересно!

Код: Выделить всё

procedure TForm1.IdHTTPServer1CommandGet(AThread: TIdPeerThread;
  ARequestInfo: TIdHTTPRequestInfo; AResponseInfo: TIdHTTPResponseInfo);
var
  slovo:string;
begin
   slovo:=ARequestInfo.Params.Values['str'];
end;           

[gray-82]

А как обработать HTTP-запрос multipart/form-data? Нужно обрабатывать закачку файлов.