Показать сообщение отдельно
  #2  
Старый 24.07.2008, 11:18
Аватар для M.A.D.M.A.N.
M.A.D.M.A.N. M.A.D.M.A.N. вне форума
Sir Richard Abramson
 
Регистрация: 05.04.2008
Сообщения: 5,505
Версия Delphi: XE10
Репутация: выкл
Восклицание

Цитата:
Сообщение от SERЖant
Помогите , пожалуйста, сделать следующее : в OpenDialog выбираем несколько файлов, нажимаем Открыть и чтоб все эти файлы, которые я выделил, добавились в ListBox. Я пробовал делать, но из всех файлов которые я выделил , добавляется только последний.
В TOpenDialog нумерация файлов идет с 0.
Вот пример
Код:
var Index:LongWord;
begin
  If Not OpenDialog.Execute Then Exit;
  For Index:=0 To OpenDialog1.Files.Count-1 Do
    ListBox.Items.Add(OpenDialog.Files.Strings[Index]);
end;
__________________
— Как тебя понимать?
— Понимать меня не обязательно. Обязательно меня любить и кормить вовремя.


На Delphi, увы, больше не программирую.
Рекомендуемая литература по программированию
Ответить с цитированием