Delphi. URI Encoding для кириллицы.

Необходим алгоритм который транслирует URL с кириллицей в понятную для сервера форму (например: РУССКИЕ БУКВЫ в %D0%A0%D0%A3%D0%A1%D0%A1%D0%9A%D0%98%D0%95%20%D0%91%D0%A3%D0%9A%D0%92%D0%AB ).

С вас: программа с двумя текстовыми полями и кнопокой "Encode" по нажатию на кнопку значение поля 1 кодируется в понятную для Web сервера форму (не знаю как это называется, пример я привёл...