Delphi справочник - Форум программистов - Навигация  
 A  B  C  D  E  F  G  H  I  J  K  L  M  N  O  P  Q  R  S  T  U  V  W  X  Y  Z      По первой букве  
System     SysUtils     StrUtils     DateUtils     FileCtrl     ConvUtils     StdConvs     Math     Classes     Dialogs     Types     Variants    ПО Unit   Compiler directives     Directives     Keywords     Types     Variables     Constants     Functions     Procedures    По категории  
Подписаться на рассылку:
Клуб программистов


Основы Delphi
TReplaceFlags
Тип
Определяет опции для подпрограммы StringReplace SysUtils unit
  type TReplaceFlags = set of (rfReplaceAll, rfIgnoreCase);
Описание
Перечисляемые типы TReplaceFlags передают опции для подпрограммы StringReplace:

rfReplaceAll Заменяет все найденные вхождения
rfIgnoreCase Поиск без учета регистра
Похожие команды
StringReplace  Заменяет одну или несколько подстрок, найденных в заданной строке

 
Пример кода : Замена всех вхождений независимо от регистра
var
  before, after : string;
  options       : TReplaceFlags;

begin
  // Попытка заменить все вхождения A на THE
  before := 'This is a way to live A big life';

  // Установка опций замены всех вхождений независимо от регистра
  options := [rfReplaceAll, rfIgnoreCase];

  // Теперь заменяем 'a' или 'A' на 'THE' везде
  after  := StringReplace(before, ' a ', ' THE ', options);

  // Показ до и после
  ShowMessage('Before = '+before);
  ShowMessage('After  = '+after);
end;
This is a way to live A big life
This is THE way to live THE big life
 



© Блог программистов   |  Создание и продвижение сайтов - "Веб сателлит"  |  Ссылки  |     |  Английская версия