[kenshi245]

Доброй ночи, есть скрипт, который при помощи регулярных выражений ищет буквы t в тексте 'test', но если поставить modifier i чтобы не реагировал на регистр, то при запуске будет выводить ошибку (не при компиляции, а уже в работе):

Код:

uses
Regexpr;

var
RegExp: TRegExpr;
s:string;

begin
    RegExp := TRegExpr.Create;

    //Если поставить true пишет ошибку!
    RegExp.ModifierI := true;
    
    RegExp.Expression := 't';
    s:='test';
    if RegExp.Exec(s) then
    begin
      repeat
        Print(RegExp.Match[0]);
      until not RegExp.ExecNext;
    end
    else Print('Не Найдено');
    RegExp.Free;
end.

Скрипт:t
Script Error: Module: "Tutorial1", Line: 19, Message: Access violation at address 00000000. Read of address 00000000