title: ComboBox On DrawItem does'nt work
body: <p>I want the comboBox Item to change color if the object associated has a certain value.
  I did the following:</p>
  
  <pre><code>with Control as TComboBox do
    begin
       Canvas.Font.Color:=clBlack;
       Canvas.Brush.Color := clWhite ;
       if TMyObj(MyCb.Items.Objects[MyCb.ItemIndex]).C = 'C' then
          Canvas.Brush.Color := clred ;
       Canvas.FillRect(Rect);
       Canvas.TextOut(Rect.Left, Rect.Top, Items[Index])
   end;
  </code></pre>
  
  <p>I can see all of the Combo items black on White. When I hover with the mouse, all of the items on wich I hover are painted red (even if the C value is not 'C'</p>
  
  <p>Do you understand why ?</p>