(Fertigen) Code bekommst du von mir nicht, aber Tipps:
Entweder du parst den Inhalt der Stringliste neu oder du baust das Menü während der Belegung der Stringlist gleich mit auf.
Wie auch immer, hier ein wenig Pseudocode:
Delphi-Quellcode:
for i:=0 to Zeilenanzahl-1 do begin
WähleWurzelknotenAus; // In diesem Fall ist das der Menüpunkt "Inhalte"
for k:=0 to ItemAnzahl do begin // ItemAnzahl ist die Anzahl aller A1 bis Zx
if Vorhanden(Item[0]) then
GeheZu(Item[0])
else
LegeAn(Item[0]);
end;
end;
War doch gar nicht so schwer.
LG;
Xong
PS: Willkommen bei
DP!
