mrp_enter_calendar_d.dfm

一个MRPII系统源代码版本

inherited Frm_Mrp_Enter_Calendar_D: TFrm_Mrp_Enter_Calendar_D
  Left = 252
  Top = 162
  Caption = '计划控制工作日历'
  ClientHeight = 283
  PixelsPerInch = 96
  TextHeight = 12
  object Panel1: TPanel [0]
    Left = 24
    Top = 72
    Width = 396
    Height = 153
    BevelWidth = 2
    BOrderWidth = 2
    BOrderStyle = bsSinGle
    TabOrder = 13
    object Label3: TLabel
      Left = 52
      Top = 14
      Width = 36
      Height = 12
      Caption = '星期一'
    end
    object Label4: TLabel
      Left = 52
      Top = 42
      Width = 36
      Height = 12
      Caption = '星期二'
    end
    object Label5: TLabel
      Left = 51
      Top = 70
      Width = 36
      Height = 12
      Caption = '星期三'
    end
    object Label6: TLabel
      Left = 52
      Top = 97
      Width = 36
      Height = 12
      Caption = '星期四'
    end
    object Label7: TLabel
      Left = 216
      Top = 19
      Width = 36
      Height = 12
      Caption = '星期五'
    end
    object Label8: TLabel
      Left = 216
      Top = 46
      Width = 36
      Height = 12
      Caption = '星期六'
    end
    object Label9: TLabel
      Left = 216
      Top = 72
      Width = 36
      Height = 12
      Caption = '星期日'
    end
    object Lbl_Week: TLabel
      Left = 128
      Top = 121
      Width = 6
      Height = 12
    end
  end
  object Panel2: TPanel [1]
    Left = 25
    Top = 35
    Width = 394
    Height = 36
    BevelWidth = 3
    BOrderWidth = 3
    BOrderStyle = bsSinGle
    TabOrder = 12
    object Label1: TLabel
      Left = 16
      Top = 14
      Width = 60
      Height = 12
      Caption = '开始日期：'
    end
    object Label2: TLabel
      Left = 206
      Top = 14
      Width = 60
      Height = 12
      Caption = '结束日期：'
    end
  end
  inherited btn_ok: TButton
    Left = 127
    Top = 235
  end
  inherited btn_Cancel: TButton
    Left = 271
    Top = 235
  end
  inherited Pnl_Add: TPanel
    Left = 173
    Top = 5
  end
  object MEdt_StArt_Date: TMaskEdit [5]
    Left = 116
    Top = 45
    Width = 101
    Height = 20
    AutoSelect = False
    EditMask = '!9999.99.99;1;'
    MaxLength = 10
    TabOrder = 3
    Text = '    .  .  '
    OnExit = DateCheck
  end
  object Medt_End_Date: TMaskEdit [6]
    Left = 301
    Top = 45
    Width = 101
    Height = 20
    AutoSelect = False
    EditMask = '!9999.99.99;1;'
    MaxLength = 10
    TabOrder = 4
    Text = '    .  .  '
    OnExit = DateCheck
  end
  object Ckbx_week1: TCheckBox [7]
    Left = 125
    Top = 85
    Width = 26
    Height = 16
    TabOrder = 5
  end
  object Ckbx_week2: TCheckBox [8]
    Left = 125
    Top = 113
    Width = 26
    Height = 16
    TabOrder = 6
  end
  object Ckbx_week3: TCheckBox [9]
    Left = 125
    Top = 142
    Width = 26
    Height = 16
    TabOrder = 7
  end
  object Ckbx_week4: TCheckBox [10]
    Left = 125
    Top = 170
    Width = 26
    Height = 11
    TabOrder = 8
  end
  object Ckbx_week5: TCheckBox [11]
    Left = 290
    Top = 85
    Width = 26
    Height = 21
    TabOrder = 9
  end
  object Ckbx_week6: TCheckBox [12]
    Left = 290
    Top = 115
    Width = 26
    Height = 16
    TabOrder = 10
  end
  object Ckbx_week7: TCheckBox [13]
    Left = 290
    Top = 140
    Width = 26
    Height = 21
    TabOrder = 11
  end
  inherited AdoQry_Tmp: TAdoQuery
    CacheSize = 1000
    CurSorType = ctDynamic
    Left = 27
    Top = 177
  end
  object AdoQry_Count: TAdoQuery
    CacheSize = 1000
    CurSorType = ctDynamic
    ExecuteOptions = [eoAsyncFetch, eoAsyncFetchNonBlocking]
    Parameters = <>
    Left = 74
    Top = 203
  end
end