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

← →
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;

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