вопрос по common dialog

[v-adix]

Моя программа требует от Common Dialog вызвать окно выбора файлов (ShowOpen), в котором необходимо выбрать более чем один файл. Мои действия:

1) ставил флаг cdlOFNAllowMultiselect . Этот вариант меня не устраивает т.к. окно выбора файлов ужасно некрасивое и никак не вписывается в мою прогу. Нужно обычное окно ShowOpen с возможностью выбора нескольких файлов.
2) флаги cdlOFNAllowMultiselect + cdlOFNExplorer . Это то, что мне нужно, но Common Dialog не возвращает имена выбранных файлов (если выбираю 1 файл, возвращает, а если более одного, то просто даёт папку в которой файлы находятся).

Оба варианта пробовал с компонентом Common Dialog и напрямую, вызывая API - результат тот же. Есть другие способы?

[Cyrax]

он возвращает строку с разделителями, содержащую выбранные файлы
разделителем является либо пробел, либо Null-символ (Chr$(0))
по этому

Код: Выделить всё

Dim strFileNames() As String ' массив имен файлов
strFileNames = Split(cdl.FileName, Chr$(0)) ' cdl - CommonDialogControl
' при установленном флаге cdlOFNExplorer используется
' Null-символ в качестве разделителя
' нулевым элементом массива будет папка
' в которой лежат выбранные файлы
' последующие элементы - имена файлов