Thanks for the code Richard.

Don't forget to set the other options though

 
Code:
Break On
Dim $SO
$SO=SetOption('Explicit','On')
$SO=SetOption('NoVarsInStrings','On')
$SO=SetOption('NoMacrosInStrings','On')
$SO=SetOption("WrapAtEOL","ON")
 
Dim $sLine,$sHandle,$sLev,$sPID,$sStatus,$sImage,$sCaption