strList.TStringList.Create;
try
  if Pos('blablabla',strList.Text) = 0 then
    Exit;

finally
   strList.Free;
end;

Adding "Exit", the finally is executed?

thanks

--
_______________________________________________
Lazarus mailing list
[email protected]
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus

Reply via email to