Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.05.13;
Скачать: CL | DM;

Вниз

Такой вот вот вопрос по использованию скинов   Найти похожие ветки 

 
MisterBin ©   (2002-04-28 09:30) [0]

Как можно сделать так, чтобы прога брала названия всех папок в директории SKINS и добавляла их в МЕНЮ(как у Winamp"a)?


 
Song ©   (2002-04-28 09:58) [1]

"Брать" названия - TSearchRec (FindFirst, FindNext)
Добавлять в меню - TMenuItem.Add; TMenuItem.Insert


 
Vovchik ©   (2002-04-28 11:41) [2]

var
dirinfo:Tsearchrec;
begin
if FindFirst(DirName+"\*.*", faAnyfile, DirInfo)=0 then
begin
repeat
if (DirInfo.Attr and faDirectory)=1 then
Menu.Items.Add(DirInfo.Name);
until FindNext(DirInfo)<>0;
end;
end;



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

Текущий архив: 2002.05.13;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.015 c
7-39878
KarlovAF
2001-12-21 16:26
2002.05.13
Сетевой принтер.


6-39824
zondor
2002-03-01 12:05
2002.05.13
проблемы с Telnet


1-39720
aabark
2002-04-26 09:24
2002.05.13
Service pack for Delphi6 > 1


7-39862
GydruS
2001-11-27 10:45
2002.05.13
Здравствуйте уважаемые кодеры! Проблема с сервисом! F1, плиз!!!


14-39859
Кандыль
2002-04-03 17:32
2002.05.13
Где в реестре хранится имя папки...