Delphi тип TReplaceFlags визначає опції для підпрограми StringReplace.
SysUtils unit
type TReplaceFlags = set of (rfReplaceAll, rfIgnoreCase);
Перераховувані типи TReplaceFlags передають опції для підпрограми StringReplace:
- rfReplaceAll Замінює всі знайдені входження.
- rfIgnoreCase – пошук без врахування регістру.
Тип TReplaceFlags в Delphi: Заміна всіх входжень незалежно від регістру
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
Подібні функції, процедури та команди
StringReplace – замінює один або кілька підрядків, знайдених у заданому рядку.
