IdHTTP не хочет парсить русскую ссылку

[neong]

Привет всем товарищи, вот пишу парсер мониторинга, для саморазвитияю
И столкнулся с такой проблемой: не хочет программа парсить ссылку http://samp-rp.ru/Мониторинг (Не реклама!).

Тут кода и не нужно, просто Idhttp.get(ссылка).
Выдает ошибку которая во вложениях.
Что неправильного сделал?

[Alex11223]

Наверно надо каким-то образом в Punycode (xn--c1ajaofcdcss) преобразовать.

upd: ой, это не про то. Точнее это: http://ru.wikipedia.org/wiki/URL#.D0...0.B8.D0.B5_URL
http://samp-rp.ru/%D0%BC%D0%BE%D0%BD...B8%D0%BD%D0%B3

[Человек_Борща]

не хочет потосму что в Delphi 7, ANSI строки. И русский там будет не читаем. Переводить строку в utf-8 а патом уже работайте с ней.

[neong]

Напишите пожалуйста кто-то как переобразовать чтоб потом я написал idhttp1.get() ну и внутри ссылка которая уже переведена но работающая?

[eval]

http://samp-rp.ru/%D0%BC%D0%BE%D0%BD...B8%D0%BD%D0%B3
а так?

[alextrof94]

Ты вывести то пытался то, что тебе idhttp выдает? Верно, вместо русских букв кракозябры.

Если бы ты загуглил, прежде чем сюда писать в первой же ссылке нашел, как я неделю назад...
Тот текст, что получает idhttp пропускай через эту функцию.

function RussianToUnicode(S: String): String;
var Wrd:Word;
  pW,pR:PWord;
  len:Integer;
begin
  pW:=@S[1];
  len:=Length(S);
  SetLength(Result,len);
  pR:=@Result[1];
  while Len<>0 do begin
    Wrd:=pW^;
    case Wrd of
      $C0..$DF,$E0..$FF:pR^:=Wrd+$0350;
      else pR^:=Wrd;
    end;
    inc(pW);
    inc(pR);
    dec(Len);
  end;
end;

[Человек_Борща]

alextrof94, че издеваешься? UTF8Decode...

[alextrof94]

Сообщение от Человек_Борща

alextrof94, че издеваешься? UTF8Decode...

Ну, знаешь, загуглил - выдало, хотя бы своими силами такую простую фигню решил...