aj aj aj, my bad...
$key = ReadProfileString($SWProd,"","")
For Each $Keys In Split($key,Chr(10))
If $Keys
$lsvList1.Sorted = "True"
$Name = ReadProfileString($SWProd,$Keys,"SWName")+@CRLF
$Item = $lsvList1.Items.Add($Name)
$Item.Subitems(0).Text = $Name
...and it works!
_________________________
I will always look out from behind these eyes...
