Changeset 515 for Common/UTheme.pas


Ignore:
Timestamp:
Jun 5, 2018, 11:02:54 AM (6 years ago)
Author:
chronos
Message:
File:
1 edited

Legend:

Unmodified
Added
Removed
  • Common/UTheme.pas

    r509 r515  
    158158        ApplyTheme(TPageControl(Component).Pages[I]);
    159159    end;
     160
     161    if Control is TCoolBar then begin
     162      (Control as TCoolBar).Themed := False;
     163    end;
    160164  end;
    161165end;
Note: See TracChangeset for help on using the changeset viewer.