自定义TListBox，从ini文件中有效加载

Question

我必须将Ini文件中的预定义值加载到Listbox中，假设我的ini文件看起来像这样

  [MyValues]
  a=test1,test2,test3,test4
  b=val1,val2
  c=bla1,bla2
  .....

目前的代码理念是这样的

   TMyValues = Class()
      aKeyChar : Char;      //  search the list based on this Char
      Values : TStringList;
      ....
      end;



  MyCompleteData =classe (TObjectList)
        ....

        procedure add (TMyValues);
        procedure get (TMyValues);

        end;



  //  create the list of stringList  

  AMyCompleteData  :=TMyCompleteData .Create;


  //  create Ini file String Lists //  or List of List 

  .....

  //    Load this stuff from Ini file 

  .....

  if aValue = 'a' then
           begin

           //   Search for the List, with a as Key Char 

           //   load values inti the ListBox
           ThisListBox.Items := AValueStrList;

           end;

我可以使用DELPHI语法功能ATTRIBUTES编写非常高效的代码吗？我可以在使用属性实现时搜索Key Char吗？