Показать сообщение отдельно
  #1  
Старый 19.11.2012, 23:04
Аватар для sariman
sariman sariman вне форума
Активный
 
Регистрация: 19.11.2011
Адрес: Украина, Луганская обл.
Сообщения: 244
Версия Delphi: 7, XE, Lazarus
Репутация: выкл
По умолчанию Диалог выбора папки и добавление файлов ListBox

Собственно как реализовать помощью SelectDirectory?
Пытаюсь:
Код:
var
  Directory: string;
begin
  if SelectDirectory('Выбери папку:', '', Directory) then
    SendMessage(PlayList.Handle, LB_DIR, DDL_DIRECTORY, Integer(Directory));
Однако при выборе папки в плэйлист добавляется только имя, подскажите..
Ах да, еще желательно бы чтобы подпапки учитывались.
Ответить с цитированием