sdefaults.pas

来自「Alpha Controls 界面控件包」· PAS 代码 · 共 38 行

unit sDefaults;

interface

uses sConst, ComCtrls;

const

  // Skins
  DefSkinsDir = 'c:\Skins'; // Default directory with skins
//  DefSkinName = {''; // }'Neutral';

  // Buttons
  DefNumGlyphs = 1;              // Default number of glyphs in image
  DefDisabledGlyphKind = [dgBlended];
  DefDisabledKind = [dkBlended];
  DefDisabledBlend = 0.4;

  // Glyphs
  DefGlyphBlend = 0;

{$IFNDEF NOTFORHELP}

  // Calendar
  DefWeekends = [{dowSaturday, }dowSunday];

{$IFDEF CHANGEFORMSINDESIGN}
  ChangeFormsInDesign = True;
{$ELSE}
  ChangeFormsInDesign = False;
{$ENDIF}

{$ENDIF}

implementation

end.