[Lazarus] try finally exit

Junior lazarus.linux at gmail.com
Sat Jun 29 10:30:55 CEST 2013


this code was just one example, I have of putting all the code for ask this?

Em 28-06-2013 20:52, John Meyer escreveu:
> pray tell what does using a production machine have to do with testing 
> a trivial section of code?
> Junior wrote:
>> because I use a production machine
>>
>> plese  be patiente!
>>
>> Em 28-06-2013 17:34, Bart escreveu:
>> On 6/28/13, Junior <lazarus.linux at gmail.com> wrote:
>>>> strList.TStringList.Create;
>>>> try
>>>>     if Pos('blablabla',strList.Text) = 0 then
>>>>       Exit;
>>>>
>>>> finally
>>>>      strList.Free;
>>>> end;
>>>>
>>>> Adding "Exit", the finally is executed?
>>>>
>>> Just wondering. Why couldn't you test that yourself?
>>>
>>> Bart
>>>
>>> -- 
>>> _______________________________________________
>>> Lazarus mailing list
>>> Lazarus at lists.lazarus.freepascal.org
>>> http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus
>>>
>>
>>
>> -- 
>> _______________________________________________
>> Lazarus mailing list
>> Lazarus at lists.lazarus.freepascal.org
>> http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus
>
>
> -- 
> _______________________________________________
> Lazarus mailing list
> Lazarus at lists.lazarus.freepascal.org
> http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus
>





More information about the Lazarus mailing list