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, соответственно. Отчество может быть пропущено. В этом случае в параметр AMiddleName передается пустая строка. Во втором -- строка вида "Фамилия Имя Отчество" передается в первом параметре функции. AGivenName и AMiddleName не используются, переданные через эти параметры значения игнорируются.
Булевский параметр ALeading определяет местоположение инициалов относительно фамилии. True -- инициалы идут перед фамилией, False -- после.
Строковый параметр ASpace задает разделитель (как правило, пробел или пустая строка) между сокращениями имени и отчества.
Функция способна переставить инициалы в уже сформированной строке с сокращениями, в соответствии с заданным параметром ALeading. Исходная строка передается в первом параметре (AFamilyName) функции.
Примеры использования
GetNameInitials('Каліноўскі', 'Кастусь', 'Сямёнавіч', True, '') => 'К.С. Каліноўскі' GetNameInitials('Каліноўскі', 'Кастусь', 'Сямёнавіч', False, ' ') => 'Каліноўскі К. С.' GetNameInitials('Каліноўскі Кастусь Сямёнавіч', '', '', False, '') => 'Каліноўскі К.С.' GetNameInitials('Каліноўскі К.С.', '', '', True, '') => 'К.С. Каліноўскі' GetNameInitials('Каліноўскі К', '', '', True, '') => 'К. Каліноўскі' GetNameInitials('Каліноўскі', 'Кастусь', '', False, '') => 'Каліноўскі К.'
