medicine_form5.dfm

基于DELPHI+SQL的药品管理系统

object rep_form: Trep_form
  Left = 145
  Top = 151
  Width = 409
  Height = 236
  Caption = '报表'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object RB_medicine: TRadioButton
    Left = 56
    Top = 40
    Width = 113
    Height = 17
    Caption = '药品库存明细单'
    Checked = True
    TabOrder = 0
    TabStop = True
    OnClick = RB_medicineClick
  end
  object RB_sale: TRadioButton
    Left = 56
    Top = 91
    Width = 105
    Height = 17
    Caption = '销售统计报表'
    TabOrder = 1
    OnClick = RB_saleClick
  end
  object GroupBox1: TGroupBox
    Left = 56
    Top = 123
    Width = 257
    Height = 78
    Caption = '请选择报表类型'
    TabOrder = 2
    object lblTimeType: TLabel
      Left = 8
      Top = 32
      Width = 81
      Height = 13
      AutoSize = False
      Caption = '请选择日期：'
    end
    object dtpSumDate: TDateTimePicker
      Left = 104
      Top = 24
      Width = 147
      Height = 21
      CalAlignment = dtaLeft
      Date = 37593.5009741204
      Time = 37593.5009741204
      DateFormat = dfShort
      DateMode = dmComboBox
      Kind = dtkDate
      MaxDate = 55153
      MinDate = 36526
      ParseInput = False
      TabOrder = 5
    end
    object seYear: TSpinEdit
      Left = 104
      Top = 24
      Width = 65
      Height = 22
      MaxLength = 4
      MaxValue = 2050
      MinValue = 2000
      TabOrder = 4
      Value = 2000
    end
    object RB_year: TRadioButton
      Left = 179
      Top = 52
      Width = 49
      Height = 17
      Caption = '年报'
      TabOrder = 0
      OnClick = RB_dayClick
    end
    object RB_day: TRadioButton
      Left = 27
      Top = 52
      Width = 49
      Height = 17
      Caption = '日报'
      Checked = True
      TabOrder = 1
      TabStop = True
      OnClick = RB_dayClick
    end
    object RB_month: TRadioButton
      Left = 107
      Top = 52
      Width = 49
      Height = 17
      Caption = '月报'
      TabOrder = 2
      OnClick = RB_dayClick
    end
    object cmbMonth: TComboBox
      Left = 176
      Top = 24
      Width = 73
      Height = 21
      Style = csDropDownList
      ItemHeight = 13
      TabOrder = 3
      Items.Strings = (
        '01'
        '02'
        '03'
        '04'
        '05'
        '06'
        '07'
        '08'
        '09'
        '10'
        '11'
        '12')
    end
  end
  object Button1: TButton
    Left = 336
    Top = 32
    Width = 57
    Height = 25
    Caption = '预 览'
    TabOrder = 3
    OnClick = Button1Click
  end
  object Button2: TButton
    Left = 336
    Top = 144
    Width = 57
    Height = 25
    Caption = '退 出'
    TabOrder = 4
    OnClick = Button2Click
  end
  object Button3: TButton
    Left = 336
    Top = 72
    Width = 57
    Height = 25
    Caption = '打 印'
    TabOrder = 5
    OnClick = Button3Click
  end
end