[Lazarus] try finally exit

Junior lazarus.linux at gmail.com
Fri Jun 28 15:59:26 CEST 2013


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

finally
    strList.Free;
end;

Adding "Exit", the finally is executed?

thanks




More information about the Lazarus mailing list