This forum is temporaily read-only. All existing discussions remain available for reference. For new questions, bug reports or support requests, please contact us at mail@lmdsupport.com.
Fix Theming-Drawing of TElComboBox
In Unit ElCombox.pas we remove following lines in methode TCustomElComboBox.PaintText to get correct drawing:
if LMDSIWindowsVistaUp and Focused and (Style = csDropDownList) and IsThemed then
begin
LOldBkColor := FocusedSelectTextColor;
FFocusedSelectTextColor := Font.Color;
inherited;
FFocusedSelectTextColor := LOldBkColor;
end
else
if LMDSIWindowsVistaUp and Focused and (Style = csDropDownList) and IsThemed then
begin
LOldBkColor := FocusedSelectTextColor;
FFocusedSelectTextColor := Font.Color;
inherited;
FFocusedSelectTextColor := LOldBkColor;
end
else

Comments