strList.TStringList.Create; try if Pos('blablabla',strList.Text) = 0 then Exit; finally strList.Free; end; Adding "Exit", the finally is executed? thanks