Доработка функции транслитерации (Delphi)

Сергей19 лет в сервисе
Данные заказчика будут вам доступны после подачи заявки
07.09.2009

Доработать функцию транслитерации. См. вложение.

Сама функция тоже в файле.