Форум: "Начинающим";
Текущий архив: 2009.04.12;
Скачать: [xml.tar.bz2];
ВнизShellListView вместо FileListBox Найти похожие ветки
← →
Zheksonz (2009-02-26 12:24) [0]имеется, следующий ниже, несложный код, который перебирает и обрабатывает выделенные файлы.
for n := 0 to (FileListBox1.Items.Count - 1) do begin
try
if FileListBox1.Selected[n] then
begin
if not FileExists(FileListBox1.Items.Strings[n]) then begin
MessageDlg("File: " + FileListBox1.Items.Strings[n] +
" not found", mtError, [mbOk], 0);
Continue;
end;
ShowMessage(FileListBox1.Items.Strings[n]);
end;
finally
{ do something here }
end;
end;
ShowMessage("Обработка завершена!");
end;
Хотелось бы использовать для этих же целей компонентShellListView
, но справки по нему я не нашёл, использования в дэмосах тоже нет((
Количество выделенных -ShellListView1.SelCount-1
, а вот как перевести остальные ф-ции???
Johnman и Сергей М., прошу не беспокоить.
← →
Zheksonz (2009-02-26 12:28) [1]
ShowMessage(FileListBox1.Items.Strings[n]);
упс, вот эта строчка лишняя и не несёт смысловой нагрузки...
← →
Zheksonz (2009-02-26 17:29) [2]Встретил множество подобных вопросов в интернете, но ответа нигде нет.
Вариант о вселенском заговоре рассматривается, но он не основной. Остаётся вариант с не изученностью подобного вопроса. Но если он и здесь не изучен, то придется обращаться в корпорацию Борланд.
Страницы: 1 вся ветка
Форум: "Начинающим";
Текущий архив: 2009.04.12;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.005 c