Проблема с Ttreeview (trzchecktree в частности)

Тема в разделе "Delphi - Компоненты", создана пользователем AnthonySoprano, 8 авг 2010.

  1. AnthonySoprano

    AnthonySoprano New Member

    Регистрация:
    25 июл 2010
    Сообщения:
    4
    Симпатии:
    0
    :) Нужна помощь по RaizePack (версии не помню), хотя и в простом TTreeView я тоже с этим столкнулся.
    Ситуация такая:
    на форме присутствует TRzCheckTree (или TTreeView), подключен inifiles, нужно выполнить ReadSections и ReadStrings так, чтобы можно было добавить в список пункты по названиям секций INI-шки, а по клику на "плюсик" появлялся список "подпунктов", проименованый простыми строками из INI-шки..... при работе с StringList
    ini.ReadSections(stringlist);
    treeview.items.add(stringlist);
    идёт ругань, что, мол, дословно, несовместимы типы TTreeNode и TStringList.

    То есть что, собственно, надо-то:

    Есть INI-файл -
    [секция1]
    пункт1=...
    пункт2=...
    [секция2]
    пункт5=...
    ...

    Должно быть в Treeview -
    [+] секция1
    [+] секция2


    [-] секция1
    |---пункт1
    |---пункт2
    [-] секция2
    |--пункт5
    ...

    Ещё я не понял что за TTreeNode'ы, как их готовить и с чем их есть х)
    Объяснил хреновенько, зато наглядно)) заранее благодарен.
     
  2. Dock1100

    Dock1100 :-]

    Регистрация:
    9 ноя 2009
    Сообщения:
    678
    Симпатии:
    0
    я это тоже не понял, но код вот:
    Код (Delphi):
    var section_names,section:Tstringlist;
    i,j:integer;
    infl:Tinifile;
    begin
    infl:=Tinifile.Create('c:\1.ini'); //путь к файлу
    section_names:=TStringList.create;
    section:=TStringList.create;
    treeview1.Items.Clear; //ТрииВиев
    infl.ReadSections(section_names);
    for I := 0 to section_names.Count - 1 do
    begin
    treeview1.Items.AddChild(nil,section_names[i]);
    infl.ReadSection(section_names[i],section);
    for j := 0 to section.Count - 1 do
    begin
    if j=0 then
    treeview1.Items.AddChild(treeview1.Items[treeview1.Items.count-1],section[j])
    else
    treeview1.Items.Add(treeview1.Items[treeview1.Items.count-1],section[j]);
    end;
    end;
    infl.Free;
    section_names.Free;
    section.Free;
    end;
     
  3. AnthonySoprano

    AnthonySoprano New Member

    Регистрация:
    25 июл 2010
    Сообщения:
    4
    Симпатии:
    0
    Очень выручил ;) спасибо добрый человек)))
     
Загрузка...
Похожие Темы - Проблема Ttreeview (trzchecktree
  1. AgniXRudra
    Ответов:
    2
    Просмотров:
    50
  2. Zloikaktus
    Ответов:
    0
    Просмотров:
    28
  3. c0de3r
    Ответов:
    5
    Просмотров:
    153
  4. DobermannTT
    Ответов:
    10
    Просмотров:
    157
  5. SoulPaladin
    Ответов:
    4
    Просмотров:
    143

Поделиться этой страницей