[Delphinic]

Как выравнить текст заполнениями пробелами в ListBox?
Есть плейлист В нем списки песен
Если применить выравнивание с помощью Lenght(S) то нифига не получается поскольку текст графический то ширина символов разная.
Получается все равно вот криво.
1.Песня1 ................................................ 0.5.13
2.песня-песня-песня ................................................0. 13.34
Если бы ListBox возвращал длинну строки было бы замечательно, но перерыв весь CheckListBox я нифига не нашел.
Надо что то типа
CheckListBox.Items.длина строки[i]