Ignore:
Timestamp:
Jan 12, 2010, 3:30:13 PM (14 years ago)
Author:
Kevin Toppenberg
Message:

Added button to turn Colored Tabs off

File:
1 edited

Legend:

Unmodified
Added
Removed

  • cprs/branches/tmg-cprs/CPRS-Chart/Options/fOptionsOther.pas

    r541 r667  
    199199procedure TfrmOptionsOther.FormCreate(Sender: TObject);
    200200begin
     201  cbEnableTabColors.checked := uTabColorsEnabled;
    201202  FStartDT  := 0;
    202203  FStopDT   := 0;
    … …  
    351352//kt added
    352353begin
    353   uTabColorsEnabled := cbEnableTabColors.Checked;
    354   cboTabColors.Enabled    := uTabColorsEnabled;
    355   lblEditTabColor.Enabled := uTabColorsEnabled;
    356   lblTabColors.Enabled    := uTabColorsEnabled;
    357   pnlShowColor.Enabled    := uTabColorsEnabled;
     354  uTabColorsEnabled := cbEnableTabColors.Checked;          //elh 01/12/10
     355  frmFrame.tabPage.OwnerDraw := cbEnableTabColors.Checked; //elh 01/12/10
     356  //cboTabColors.Enabled    := uTabColorsEnabled;
     357  //lblEditTabColor.Enabled := uTabColorsEnabled;
     358  //lblTabColors.Enabled    := uTabColorsEnabled;
     359  //pnlShowColor.Enabled    := uTabColorsEnabled;
    358360end;
    359361
Note: See TracChangeset for help on using the changeset viewer.