TCellComboBoxInfo

type TCellComboBoxInfo = packed record

  Index: Integer;

  case Integer of

    0: (

        St: ShortString;

      );

    1: (

        RTItems: TStrings;

        RTSt: ShortString;

      );

end;