[arxlex]

Пробовал вот так:

Код:

var
i,n1: integer;
o1,ot1: OleVariant;
begin
  ComboBox1.Clear;
  o1:=WebBrowser1.OleObject.Document.getElementsByTagName('ul').item(0);
  ot1:=o1.getElementsByTagName('li');
  n1:=ot1.Length;
  if n1>0 then
  begin
    for i:=0 to n1-1 do
    begin
      self.ComboBox1.Items.Add(ot1.item(i).InnerText);
      ComboBox1.ItemIndex := 0;
    end;
  end;
end;

Но тут никак не получается получить содержание <ul> с помощью свойства data-property="Цвет"