huifeifrm.dfm

该系统实现了对DVD租赁过程的管理,功能完善,方便实用.

    TabOrder = 0
    object Label1: TLabel
      Left = 72
      Top = 48
      Width = 190
      Height = 20
      Caption = #36755#20837#20250#21592'/'#31199#20511#21345#21495#65306
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -20
      Font.Name = #40657#20307
      Font.Style = []
      ParentFont = False
    end
    object edMem_ID: TEdit
      Left = 256
      Top = 44
      Width = 101
      Height = 32
      CharCase = ecUpperCase
      Ctl3D = True
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -20
      Font.Name = 'Tahoma'
      Font.Style = [fsBold]
      MaxLength = 6
      ParentCtl3D = False
      ParentFont = False
      TabOrder = 0
      OnKeyPress = edMem_IDKeyPress
    end
    object pnMen_Name: TPanel
      Left = 356
      Top = 43
      Width = 117
      Height = 33
      BevelInner = bvLowered
      BiDiMode = bdLeftToRight
      Ctl3D = True
      Font.Charset = GB2312_CHARSET
      Font.Color = 5592405
      Font.Height = -19
      Font.Name = #26999#20307'_GB2312'
      Font.Style = [fsBold]
      Locked = True
      ParentBiDiMode = False
      ParentCtl3D = False
      ParentFont = False
      TabOrder = 1
    end
    object Panel3: TPanel
      Left = 12
      Top = 188
      Width = 541
      Height = 121
      BevelInner = bvSpace
      BevelOuter = bvNone
      BorderStyle = bsSingle
      Ctl3D = True
      ParentCtl3D = False
      TabOrder = 2
      object Label6: TLabel
        Left = 92
        Top = 50
        Width = 84
        Height = 27
        Caption = #23454#25910#65306
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -27
        Font.Name = #23435#20307
        Font.Style = [fsBold]
        ParentFont = False
      end
      object Label7: TLabel
        Left = 256
        Top = 50
        Width = 84
        Height = 27
        Caption = #25214#38646#65306
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -27
        Font.Name = #23435#20307
        Font.Style = [fsBold]
        ParentFont = False
      end
      object lbreturn: TLabel
        Left = 328
        Top = 46
        Width = 77
        Height = 35
        Alignment = taCenter
        AutoSize = False
        Font.Charset = ANSI_CHARSET
        Font.Color = clMaroon
        Font.Height = -29
        Font.Name = 'Tahoma'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object Label9: TLabel
        Left = 408
        Top = 50
        Width = 28
        Height = 27
        Caption = #20803
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -27
        Font.Name = #23435#20307
        Font.Style = [fsBold]
        ParentFont = False
      end
      object edIncome: TEdit
        Left = 168
        Top = 45
        Width = 73
        Height = 32
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -20
        Font.Name = 'Tahoma'
        Font.Style = [fsBold]
        MaxLength = 6
        ParentFont = False
        TabOrder = 0
        OnKeyPress = edIncomeKeyPress
      end
    end
    object Panel2: TPanel
      Left = 36
      Top = 84
      Width = 497
      Height = 93
      BevelOuter = bvNone
      TabOrder = 3
      object lbMem_Class: TLabel
        Left = 88
        Top = 15
        Width = 41
        Height = 58
        Alignment = taCenter
        AutoSize = False
        Caption = 'A'
        Font.Charset = ANSI_CHARSET
        Font.Color = clMaroon
        Font.Height = -48
        Font.Name = 'Tahoma'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object Label2: TLabel
        Left = 136
        Top = 40
        Width = 132
        Height = 21
        Alignment = taRightJustify
        AutoSize = False
        Caption = #31867#20250#21592#65292#20250#36153
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -21
        Font.Name = #23435#20307
        Font.Style = [fsBold]
        ParentFont = False
      end
      object lbMoney: TLabel
        Left = 272
        Top = 30
        Width = 89
        Height = 39
        Alignment = taCenter
        AutoSize = False
        Caption = '100'
        Font.Charset = ANSI_CHARSET
        Font.Color = clMaroon
        Font.Height = -32
        Font.Name = 'Tahoma'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object Label3: TLabel
        Left = 364
        Top = 40
        Width = 56
        Height = 21
        Caption = #20803'/'#24180
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -21
        Font.Name = #23435#20307
        Font.Style = [fsBold]
        ParentFont = False
      end
    end
  end
  object Panel1: TPanel
    Left = 20
    Top = 56
    Width = 565
    Height = 41
    BevelOuter = bvNone
    BorderStyle = bsSingle
    Ctl3D = False
    ParentCtl3D = False
    TabOrder = 1
    object RadioButton1: TRadioButton
      Left = 136
      Top = 12
      Width = 145
      Height = 17
      Caption = #20250#36153'/'#25276#37329#32564#20184
      Checked = True
      Font.Charset = GB2312_CHARSET
      Font.Color = 4194304
      Font.Height = -16
      Font.Name = #40657#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 0
      TabStop = True
      OnClick = RadioButton1Click
    end
    object RadioButton2: TRadioButton
      Left = 348
      Top = 12
      Width = 113
      Height = 17
      Caption = #36864#36824#25276#37329
      Font.Charset = GB2312_CHARSET
      Font.Color = 4194304
      Font.Height = -16
      Font.Name = #40657#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 1
      OnClick = RadioButton2Click
    end
  end
  object ADOQuery1: TADOQuery
    Connection = FrmMain.ADOConnection1
    Parameters = <>
    Left = 48
    Top = 20
  end
  object ADOQuery2: TADOQuery
    Connection = FrmMain.ADOConnection1
    Parameters = <>
    Left = 80
    Top = 20
  end
end