ОБСУЖДЕНИЕ

Вернуть инициалы

6 ответов 4,6 тыс.
AI-выжимка обсуждения скоро

Краткие тезисы обсуждения со ссылками на ключевые ответы появятся здесь.

Статус
Закрыто для дальнейших ответов.
Автор темы
Есть Пупкин Иван Петрович как можно в другое поле вернуть Пупкин И.П.
 
@Word( MyField; " " ; 1 ) + " " + @SubSet( @Word( MyField; " " ; 2 ); 1 ) + ". " + @SubSet( @Word( MyField; " " ; 3 ) ; 1 )+ "."
 
Да, таким же образом. Разбираешь имя как угодно) примерно теже функции, хелп в помощь.
 
dimat
@Word = StrToken
@Left = StrLeft
и т.д. сматри хэлп

ConstantinВ AВ Chervonenko
угу, абшибся ;)
 
я так делаю, тоже самое..
Код:
n:=@Name([CN];@UserName(1));
Ln:=@Word(n;" ";1);
Fn:=" " +@Middle(@Word(n;" ";2);0;1) +".";
Mn:=@Middle(@Word(n;" ";3);0;1);
@If(Mn!="";Mn:=Mn+".";Mn);
Ln+Fn+Mn
 
Статус
Закрыто для дальнейших ответов.

Статистика тем

Создано
Kron,
Последний ответ от
Kee_Keekkenen,
Ответы
6
Просмотры
4 638