Галактика в вопросах и ответах

Ламерство.
Есть стандартная функция:

//фамилия и инициалы
function GetSurnameWithInitials(string): string; external;

Требуется из стандартного ФИО
получить фамилию с инициалами.
Пример: "Иванов Иван Иванович" -> "Иванов И.И."
Нехотелось бы изобретать велосипед.
Есть ли в Галактике стандартные средства для этого или кто как решал эту проблему?