Вниз
Скачать: CL | DM;

Загрузка имен файлов в Combobox   Найти похожие ветки 

← →
dimonka   (2004-11-25 22:58) [0]

Подскажите, как можно загрузить в Combobox или Listbox список файлов текущего каталога


← →
Игорь Шевченко ©   (2004-11-25 23:18) [1]

An application sends a CB_DIR message to a combo box to add names to the list displayed by the combo box. The message adds the names of directories and files that match a specified string and set of file attributes. CB_DIR can also add mapped drive letters to the list.

LB_DIR для ListBox


← →
Vvika-sim   (2004-11-26 14:16) [2]

используй FindFirst с отребутами и FindNext чтоб перебрать все файлы в каталоге ну  и дабовляй методом Add
для указания Path Например ".\мой коталог\*.*"


← →
GanibalLector ©   (2004-11-26 23:56) [3]


procedure TMainForm.ComboBox1DropDown(Sender: TObject);
var sr:Tsearchrec;dd1:string;
i:integer;
begin
combobox1.Items.Clear;
if findfirst("*.*",faanyfile,sr)=0 then
repeat
combobox1.Items.Add(sr.name);
until findnext(sr)<>0;
findclose(sr);
end;


← →
Игорь Шевченко ©   (2004-11-27 01:38) [4]

GanibalLector ©   (26.11.04 23:56) [3]

Я сильно не завидую пользователю твоего кода. При каждом открытии ComboBoxа заполнение его списком файлов вряд ли ускорит работу программы.


← →
GanibalLector ©   (2004-11-27 01:47) [5]

2 Игорь Шевченко
Согласен.Ну а кто сказал,что я этот код использую?Это так...для примера.dimonka попросил я показал.



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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.024 c
14-1104005982
Piter
2004-12-25 23:19
2005.01.16
Что такое engine.awaps.net ?


1-1104017321
AGAMEMNUM
2004-12-26 02:28
2005.01.16
InstallShield


4-1101717711
NazGul
2004-11-29 11:41
2005.01.16
Как добавить новый сервис Winsows NT&amp;?


14-1100975235
vuk
2004-11-20 21:27
2005.01.16
Народ! Borland выложил триал Delphi2005!


11-1084974886
Terminus
2004-05-19 17:54
2005.01.16
KOLTabControl это еще не PageControl :). Есть вопрос...




   Наверх