GetEditorType Add ComboItems

VCL TMS VCL UI Pack
1

Hello
I load the examples ADOEditing from your examples folder and I Clear at design time
the comboitems  StringList.
I run the project and the code DBAdvGrid1GetEditorType no works
 AEditor:= edComboEdit;
      DBAdvGrid1.Combobox.Items.Add('Germany');
      DBAdvGrid1.Combobox.Items.Add('USA');
      DBAdvGrid1.Combobox.Items.Add('JAPAN');
May you explain why?
I have to do a similar things in my project. The information for combo is from database..but such no works
 Begin
        AEditor := TEditorType.edComboEdit;
        With fDataModuleTask.adoQ_OPERATORI Do
        Begin
          if RecordCount > 0 then
          Begin
            First;
            while Not Eof do
            Begin
              dbgTASK.Combobox.Items.Add(FieldByName('RES').AsString);
              Next;
            End;
          End;
        End;
      End;
Thanks

2

Please move the code:


 With fDataModuleTask.adoQ_OPERATORI Do
        Begin
          if RecordCount > 0 then
          Begin
            First;
            while Not Eof do
            Begin
              dbgTASK.Combobox.Items.Add(FieldByName('RES').AsString);
              Next;
            End;
          End;
        End;
      End;

to the event OnGetEditorProp()