Hi,
für meinen Editor wollte ich dem Benutzer einen Seitenassistenten mit auf den Weg geben, über den dieser auch auf einfache Weise eine Navigation für seine Website erstellen kann. Das ist bis zu den Hauptpunkten kein Problem, doch nun hänge ich an den eventuellen Unterpunkten fest.
Das ganze läuft über eine Listbox: Add-Button -> EditFeld -> Wert des Editfelds wird in die Listbox eingtragen.
Beispiel:
Über Uns
Über Uns - Philosophie
Der Code für das sieht bisher folgendermaßen aus:
Delphi-Quellcode:
if(Assistent.Navigationsknoten.Items.Count>0) then begin
Editor.SynEdit1.Lines.Add('<ul>');
for i:=0 to Assistent.Navigationsknoten.Items.Count-1 do
Editor.SynEdit1.Lines.Add('<li><a title="" href="">'+Assistent.Navigationsknoten.Items[i]+'</a></li>');
end;
i := i+1;
Editor.SynEdit1.Lines.Add('</ul>');
end;
"Navigationsknoten" ist die ListBox mit den eingetragenen Werten.
Wie gehe ich jetzt aber am besten das Erstellen der Liste mit den Unterpunkten an, sodass diese beim richtigen Hauptpunkt angefügt wird?