DevExpress - получить список скинов программно

uses LookAndFeelPainters;
...procedure GetSkins(comboSkins: TcxCombobox);Var
 PaintersManager : TcxCustomLookAndFeelPainter;
 i: integer;begin//загружаем список скинов
  comboSkins.Properties.Items.Clear;
  comboSkins.Properties.Items.Add('');//пустую строку тоже нужно добавить, чтобы пользоватtль мог отменять выбор скинаfor i := 0 to Pred(cxLookAndFeelPaintersManager.Count) do
    comboSkins.Properties.Items.Add(cxLookAndFeelPaintersManager.Items[i].LookAndFeelName);end;

uses LookAndFeelPainters;
...Var
 PaintersManager : TcxCustomLookAndFeelPainter;
 i: integer;begin//загружаем список скинов
  TcxComboBoxProperties(comboSkins.Properties).Items.Clear;
  TcxComboBoxProperties(comboSkins.Properties).Items.Add('');//пустую строку тоже нужно добавить, чтобы пользоватtль мог отменять выбор скинаfor i := 0 to Pred( cxLookAndFeelPaintersManager.Count ) do
    TcxComboBoxProperties(comboSkins.Properties).Items.Add(cxLookAndFeelPaintersManager.Items[i].LookAndFeelName);