Rp FR4Functions.TFR4Functions.GetNameInitials

From rp FR4Functions.pas

 function GetNameInitials(AFamilyName, AGivenName, AMiddleName: String; const ALeading: Boolean; const ASpace: String): String;

Unit: rp FR4Functions

Type: function

Visibility: private

Member Of: TFR4Functions

Описание

Возвращает строку вида "Фамилия И.О." или "И.О. Фамилия". Возможны два варианта использования. В первом случае фамилия, имя и отчество передаются раздельно через три строковых параметра AFamilyName, AGivenName и AMiddleName соответственно. Во втором -- строка вида "Фамилия Имя Отчество" передается в первом параметре функции. Параметры AGivenName и AMiddleName в этом случае не используются. Булевский параметр ALeading определяет местоположение инициалов относительно фамилии. Параметр ASpace задает разделитель (как правило, пробел или пустая строка) между сокращением имени и отчества.

Функция способна переставить инициалы в уже сформированной строке с сокращениями в соответствии с параметром ALeading.

Отчество может быть опущено. В этом случае в параметр AMiddleName передается пустая строка.

Примеры использования

 GetNameInitials('Каліноўскі', 'Кастусь', 'Сямёнавіч', True, ) => 'К.С. Каліноўскі'
 GetNameInitials('Каліноўскі', 'Кастусь', 'Сямёнавіч', False, ' ') => 'Каліноўскі К. С.'
 GetNameInitials('Каліноўскі Кастусь Сямёнавіч', , , False, ) => 'Каліноўскі К.С.'
 GetNameInitials('Каліноўскі К.С.', , , True, ) => 'К.С. Каліноўскі'