Merhaba,
Bir iş planlandıktan sonra ister istemez üzerine başka işler yıkılabiliyor.
Yani, Siz az kodla ağacı oluşturmak yerine alt alta sorgularla, ağacı memo nesnesi üzerinden hazırlayıp, oluşturabilirsiniz.
Memo1.Clear;
Memo1.Lines.Add('1|0|1|AnaMenü 1');
Memo1.Lines.Add(' 1|0|2|AnaMenü 1, Alt Menü 1');
Memo1.Lines.Add(' 1|0|3|AnaMenü 1, Alt Menü 2');
Memo1.Lines.Add(' 1|0|4|AnaMenü 1, Alt Menü 3');
Memo1.Lines.Add('1|0|5|AnaMenü 2');
Memo1.Lines.Add(' 1|0|6|AnaMenü 2, Alt Menü 1');
Memo1.Lines.Add(' 1|0|7|AnaMenü 2, Alt Menü 2');
Memo1.Lines.Add(' 1|0|8|AnaMenü 2, Alt Menü 3');
Memo1.Lines.SaveToFile('c:\agac.txt');
Treewiev1.LoadFromFile('c:\agac.txt');
Memo nesnesinin wordwrap özelliği false olmalıdır.
Değişik bir bakış açısı ile ağacımızı bu şekilde de ücretsiz oluşturabilirsiniz.
Son tipe önünde verilen numaraları ise click olayında
If Treewiev1.Items[Treewiev1.Selected.AbsoluteIndex].SelectedIndex=5 Then
begin
....
end;
kodlaması ile kontrollerinizi artırabilirsiniz.