Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "KOL";
Текущий архив: 2005.10.16;
Скачать: [xml.tar.bz2];

Вниз

Немножко в KOLLISTBOX ;)   Найти похожие ветки 

 
WhiteGuy ©   (2005-02-10 14:34) [0]

Пипл!
Как добавить НЕСКОЛЬКО файлов в TKolListBox?
Есть ф-ция ListBox1.Add, но ею можно добавить только ОДИН файл независимо от того, включена в OpenDialog1 (откуда и нужно добавлять файлы) опция multiselect или нет! ПАМАГИТЕ! :)


 
MTsv DN   (2005-02-10 16:54) [1]

Привет...

Типа такого вопроса уже было, сам задавал...
Посмотри тему: http://delphimaster.net/view/11-1106905612/

Когда включен multiselect, OpenDialog1.FileName в одну строчку с разделителем "#$D". Создаешь переменную PStrList,приравниваешь ее свойству Text значение OpenDialog1.FileName и потом в цикле добавляешь в TKolListBox.

С уважением MTsv DN


 
SPeller ©   (2005-02-10 16:55) [2]

От того что в opendialog стоит multiselect, в комбобоксе ничего не изменится. Это как стучать молотком в стену чтобы чайник закипел.


 
thaddy   (2005-02-10 18:38) [3]

My mp3 player sourcecode shows how to do multiselect. If it seems to complex email me for a smaller example. it is not difficult.


 
z007   (2005-02-10 23:25) [4]

Так и задумано:

> Создаешь переменную PStrList,приравниваешь ее свойству Text
> значение OpenDialog1.FileName и потом в цикле добавляешь
> в TKolListBox.

см.: LB_ADDSTRING - ну, не предусмотрено здесь добавление нескольких строк.
зато есть LB_DIR,DlgDirList (WinApi) и ListBox1.DlgDirList- специально для файлов.


 
WhiteGuy ©   (2005-02-12 10:50) [5]

2
> MTsv DN   (10.02.05 16:54) [1]

Три дня я думал, в каком цикле добавлять файлы :). Но так и не понял :(. Подскажите пжалста!


 
MTsv DN   (2005-02-12 11:32) [6]

Привет...
Вот рабочий код:

if od.Execute then
 if od.Filename <> "" then
  begin
   _Files := NewStrList;
   _Files.Text := od.Filename;
   for i := 0 to _Files.Count - 1 do
     ListBox.Add(_Files.Items[i]);
   _Files.Free;
  end;

С Уважением MTsv DN


 
WhiteGuy ©   (2005-02-12 14:22) [7]

Большое СпАсИбО! ;-D


 
Лёля   (2005-02-12 22:47) [8]

В свойстве OpenSaveDialog.FileName хранится список файлов, ПРИЧЕМ: если выбран один файл - в первой (и единственной)строке хранится и имя, и полный путь к нему, но если файлов выбрано несколько, то в первой строке хранится только путь, а в остальных, соответственно, только имена. Так что здесь нужно проверять, сколько строк содержит PStrList, и если несколько, то
 ListBox.Add(MyStrList[0]+MyStrList[i])
У меня это работает. Прошу прощения, что не кидаю пример, интернет не из дому.


 
WhiteGuy ©   (2005-02-13 07:18) [9]

Спасибо!



Страницы: 1 вся ветка

Форум: "KOL";
Текущий архив: 2005.10.16;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.46 MB
Время: 0.05 c
1-1127379430
VID
2005-09-22 12:57
2005.10.16
Как отключить автоцентрирование найденной записи в EhDBGrid


1-1127135046
msguns
2005-09-19 17:04
2005.10.16
Выравнивание текста внутри TRect


10-1105775800
SMT
2005-01-15 10:56
2005.10.16
Программное определение наличия Excel


2-1127111629
ZZZ
2005-09-19 10:33
2005.10.16
Сокращение времени компиляции.


2-1127113380
Гость22
2005-09-19 11:03
2005.10.16
Поскажите, как собрать всю инфу о файлах и папках на компе?





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский