Работа с OpenDialog

Вопросы программирования и использования среды Lazarus.

Модератор: Модераторы

Ответить
Alex_Gordon1
новенький
Сообщения: 18
Зарегистрирован: 09.02.2011 19:41:12

Работа с OpenDialog

Сообщение Alex_Gordon1 »

У меня опендиалог настроен на мультиселект.
Так же есть компонент ListBox
Если мы диалогом выбираем, например, 3 файла (за раз):
file1.txt
file2.txt
file3.txt
То как сделать чтобы они все записались в ListBox?
Mr.Smart
долгожитель
Сообщения: 1796
Зарегистрирован: 29.03.2008 00:01:11
Откуда: из леса!

Сообщение Mr.Smart »

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

  if OpenDialog1.Execute then
   ComboBox1.Items.Assign(OpenDialog1.Files); 
Alex_Gordon1
новенький
Сообщения: 18
Зарегистрирован: 09.02.2011 19:41:12

Сообщение Alex_Gordon1 »

Спасибо! А как ее обработать (убрать путь(оставить только имя и расширение)) и добавить кавычки?
Mr.Smart
долгожитель
Сообщения: 1796
Зарегистрирован: 29.03.2008 00:01:11
Откуда: из леса!

Сообщение Mr.Smart »

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

  for j:=0 to OpenDialog1.Files.Count-1 do
   ComboBox1.Items.Add('"'+ExtractFileName(OpenDialog1.Files[j])+'"');

Прочтите какую нибудь книжку! По Делфи тоже подойдёт!
Ответить