Delphi-Help

TReplaceFlags

Печать
Рейтинг пользователей: / 2
ХудшийЛучший 

TReplaceFlags

Описание

type TReplaceFlags = set of (rfReplaceAll, rfIgnoreCase);

Перечисляемые типы TReplaceFlags передают опции для подпрограммы StringReplace:

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

Пример кода

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

Примечание

 

 

Авторизация



Счетчики