[Lazarus] Break in 'case...of' block.

[patspiper]

> You should use Else. But if you insist on break, you can insert a 
> dummy repeat/until loop:
>
One more thing, since you are creating a TStringList, it is recommended 
to enclose your code anyway in a try/finally block irrespective whether 
you use the dummy loop or not. This guarantees the freeing of the list 
in case of an exception.