안녕하세요. 최용일입니다.

델파이의 TIniFile을 이용하세요...

ReadSections으로 경기도, 서울시, ... 등등의 섹션이름을 읽고
ReadSection으로 위 섹션안에 있는 파주시, 고양시, 등등의 키이름을 읽고,
ReadString으로 위 키이름의 값들을 읽어서 넣으시면 됩니다...

^^ 항상 즐코하세요...

감사합니다...!! 간단하게 테스트로 하니...
====================================================================
경기도

서울시

====================================================================
까지는 나왔습니다..!! 소스는 아래꺼구요..!!
근데 여기서 자식노드 그러니까  ReadSection 써서 파주시, 고양시.등
각 맞게 넣을려구 햇는데 잘 안되는 군요.!! ㅜ.ㅜ
죄송하지만 한번만 더 봐주시면 감사하겠습니다..!!^__^

procedure TForm1.Button2Click(Sender: TObject);
var
  i, j : integer;
  MyIni : TIniFile;
  node1 : TTreeNode;
begin
    MyIni := TiniFile.Create('c:TestTests.ini');
    try
      MyIni.ReadSections(ListBox1.Items);

      for i := 0 to ListBox1.Items.Count-1 do
      begin
          node1 :=Form1.TreeView1.Items.AddChild(Form1.TreeView1.Selected,ListBox1.Items[i]);
//          MyIni.ReadSection(ListBox1.Items[i], ListBox2.Items);
--> 윗줄대로 하니 ListBox2에 고양시..파주시 등이 뿌려지는데....
      맨마지막 노드의 자식아이템들만 보여주는군요..어캐된 상황인지..      
      end;
    finally
      MyIni.Free;
    end;
end;
=====================================================================

안녕하세요. 최용일입니다.

쩝~ 책보시구 트리뷰에 대한 부분을 잘 공부하세요... 동넣는건 쫌만 분석하시면 하실수 있을겁니다...

procedure TForm1.Button1Click(Sender: TObject);
var
    FileName: string;
    IniFile: TIniFile;
    RootNode: TTreeNode;
    Sections, KeyNames: TStringList;
    SectionCount, KeyCount: Integer;
begin
    FileName := 'D:DelphiProjectTesttest.ini';
    IniFile := TIniFile.Create(FileName);
    Sections := TStringList.Create;
    KeyNames := TStringList.Create;
    try
        IniFile.ReadSections(Sections);
        for SectionCount := 0 to Sections.Count - 1 do
        begin
            RootNode := TreeView1.Items.Add(nil, Sections[SectionCount]);
            KeyNames.Clear;
            IniFile.ReadSection(Sections[SectionCount], KeyNames);
            for KeyCount := 0 to KeyNames.Count - 1 do
                TreeView1.Items.AddChild(RootNode, KeyNames[KeyCount]);
        end;
    finally
        IniFile.Free;
        Sections.Free;
        KeyNames.Free;
    end;
end;

^^ 항상 즐코하세요...

넵 명심하겠습니다..!! ^^

감사합니다..!!^^