Вопрос знатокам HTML

← →
aka (2011-02-08 10:13) [0]

Вот строю дерево в TreeView
PFile = ^TFile; TFile = record attr: Integer; name: WideString; fullpath: WideString; end; var MainF: TMainF; implementation {$R *.dfm} procedure ScanDir(Dir: string; PerNode: TTreeNode); var SearchRec: TSearchRec; Node: TTreeNode; Files: PFile; begin if Dir <> "" then if Dir[length(Dir)] <> "\" then Dir := Dir + "\"; if FindFirst(Dir + "*.*", faAnyFile, SearchRec) = 0 then repeat if (SearchRec.name = ".") or (SearchRec.name = "..") then continue; New(Files); Files^.attr := SearchRec.attr; Files^.name := SearchRec.name; Files^.fullpath := Dir + SearchRec.name; if (SearchRec.Attr and faDirectory) <> 0 then begin Node := MainF.TreeView.Items.AddChild(PerNode,SearchRec.name); Node.Data := Pointer(Files); ScanDir(Dir + SearchRec.name, Node); end else begin Node := MainF.TreeView.Items.AddChild(PerNode,SearchRec.name); Node.Data := Pointer(Files); end; until FindNext(SearchRec) <> 0; FindClose(SearchRec); end; procedure TMainF.Button1Click(Sender: TObject); begin ScanDir("Z:", nil); end;

Как бы его оформить в виде HTML кода меню с выпадающими подменю следующего Level?

← →
И. Павел © (2011-02-08 10:22) [1]

Вот примерчик: http://habrahabr.ru/blogs/css/55753/
А так есть и другие: http://www.google.ru/#hl=ru&source=hp&biw=1280&bih=812&q=html+%D0%B4%D0%B5%D1%80%D0%B5%D0%B2%D0%BE&aq=0&aqi=g1&aql=&oq=HTML+%D0%B4%D0%B5%D1%80%D0%B5&fp=b9369cba5b6f7f22

← →
aka (2011-02-08 13:58) [2]

Да с плюсами, как тривью в виде html я сделаю без проблем для это достаточно пробежаться циклом во всем Items и в зависимости от Level двигать правей следующий уровень, они то и расположены в тривью с верху -> вниз в нужном порядке
А вот подобно строке меню как в виндовых окнах с подменю, это конечно нужно подумать как это свормировать(строка меню это Level=0)

← →
И. Павел © (2011-02-08 14:19) [3]

> Да с плюсами, как тривью в виде html я сделаю без проблем

А чем "с плюсами" отличается от выпадающего меню? Нажимаете на плюс - выпадает подменю (в первом примере это делает css). Не хотите "плюс" - сделайте ссылкой все строки TreeView. Суть все равно одна. Или же вам нужно что-то другое?

← →
aka (2011-02-09 17:50) [4]

пример
<UL>
<LI> Кpупные гоpода России
<UL>
<LI> Москва
<LI> Санкт-Петеpбуpг
</UL>
<LI> Кpупные гоpода Укpаины
<UL>
<LI> Киев
<LI> Хаpьков
</UL>
</UL>

Не совсем получается из примера, который я писал в вопросе, сформировать рекурсивно список из примера.

Вопрос знатокам HTML Найти похожие ветки