Issue #8: convert system colors applied by code into their theme color

This commit is contained in:
Ansgar Becker
2018-10-27 17:47:16 +02:00
parent 8f85cc01c6
commit 3759611c34
13 changed files with 44 additions and 36 deletions

View File

@ -333,7 +333,7 @@ procedure TfrmRoutineEditor.listParametersPaintText(Sender: TBaseVirtualTree;
TextType: TVSTTextType);
begin
if (Column = 3) and (comboType.ItemIndex = 1) then
TargetCanvas.Font.Color := clBtnShadow;
TargetCanvas.Font.Color := GetThemeColor(clBtnShadow);
end;