dvdbhfrm.dfm

来自「该系统实现了对DVD租赁过程的管理,功能完善,方便实用.」· DFM 代码 · 共 862 行 · 第 1/4 页

      item
        Width = 50
      end>
  end
  object Panel1: TPanel
    Left = 380
    Top = 48
    Width = 213
    Height = 397
    BevelOuter = bvNone
    BorderStyle = bsSingle
    Ctl3D = False
    ParentCtl3D = False
    TabOrder = 2
    object Label2: TLabel
      Left = 7
      Top = 24
      Width = 48
      Height = 12
      Caption = #20809#30424#21495#65306
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object lbCD_NameCn: TLabel
      Left = 18
      Top = 52
      Width = 185
      Height = 13
      AutoSize = False
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object edCD_ID: TEdit
      Left = 62
      Top = 20
      Width = 141
      Height = 22
      Ctl3D = True
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = 'Tahoma'
      Font.Style = []
      MaxLength = 10
      ParentCtl3D = False
      ParentFont = False
      TabOrder = 0
      OnExit = edCD_IDExit
    end
    object GroupBox1: TGroupBox
      Left = 2
      Top = 82
      Width = 205
      Height = 241
      BiDiMode = bdLeftToRight
      Caption = #26032#22686#20809#30424#24215#20869#32534#21495
      Ctl3D = True
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentBackground = False
      ParentBiDiMode = False
      ParentCtl3D = False
      ParentFont = False
      TabOrder = 1
      object Label1: TLabel
        Left = 12
        Top = 214
        Width = 60
        Height = 12
        Caption = #24215#20869#32534#21495#65306
      end
      object lbCDNum: TLabel
        Left = 12
        Top = 180
        Width = 181
        Height = 21
        Alignment = taCenter
        AutoSize = False
        Font.Charset = ANSI_CHARSET
        Font.Color = clRed
        Font.Height = -12
        Font.Name = 'Tahoma'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object ListBox1: TListBox
        Left = 12
        Top = 24
        Width = 181
        Height = 145
        Font.Charset = ANSI_CHARSET
        Font.Color = clNavy
        Font.Height = -12
        Font.Name = 'Tahoma'
        Font.Style = []
        ItemHeight = 14
        ParentFont = False
        PopupMenu = PopupMenu1
        TabOrder = 0
      end
      object edStore_ID: TEdit
        Left = 80
        Top = 208
        Width = 109
        Height = 22
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = 'Tahoma'
        Font.Style = []
        MaxLength = 10
        ParentFont = False
        TabOrder = 1
        OnKeyPress = edStore_IDKeyPress
      end
    end
    object bbtnSave: TBitBtn
      Left = 60
      Top = 344
      Width = 107
      Height = 25
      Caption = #20445' '#23384'(&S)'
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 2
      OnClick = bbtnSaveClick
      Glyph.Data = {
        36030000424D3603000000000000360000002800000010000000100000000100
        18000000000000030000750A0000750A00000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000541700
        541700D5986C541700FFFFFFFFD0A4FFD0A4FFD0A4FFD0A4FFD0A4541700B77A
        4E541700AE7145000000000000AE7145D6996DE9AC80541700FFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFD0A4541700C6895D541700AE7145000000000000AE7145
        E9AC80E9AC80541700642700642700642700642700642700642700541700C689
        5D541700AE7145000000000000AE7145FCBF93FCBF93D6996DD6996DD6996DD6
        996DD6996DD6996DD6996DD6996DD6996D541700AE7145000000000000AE7145
        F7BA8EFCBF93FCBF93FCBF93FCBF93FCBF93FCBF93FCBF93FCBF93FCBF93F7BA
        8E541700AE7145000000000000AE7145F7BA8E8E51258E51258E51258E51258E
        51258E51258E51258E51258E512596592D541700AE7145000000000000AE7145
        FFCB9F541700FFFFFFFFD7ABFFD7ABFFD7ABFFD7ABFFD7ABFFD7ABFFD7AB9659
        2D541700AE7145000000000000AE7145FFDAAE541700FFFFFFFFFFF7FFFFF7FF
        FFF7FFFFF7FFFFF7FFFFF7FFD7AB8C4F23541700AE7145000000000000AE7145
        FFEABE541700FFFFFFFFFFF7FFFFF7FFFFF7FFFFF7FFFFF7FFFFF7FFD7AB8C4F
        23541700AE7145000000000000AE7145FFF3C7541700FFFFFFFFFFF7FFFFF7FF
        FFF7FFFFF7FFFFF7FFFFF7FFD7AB85481C541700AE7145000000000000AE7145
        FFFFF0541700FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFCCA08548
        1CAE7145AE714500000000000000000054170054170054170054170054170054
        1700541700541700541700541700541700541700AE7145000000000000000000
        AE7145AE7145AE7145AE7145AE7145AE7145AE7145AE7145AE7145AE7145AE71
        45AE7145AE714500000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000}
      Spacing = 8
    end
  end
  object ADOQuery1: TADOQuery
    Connection = FrmMain.ADOConnection1
    Parameters = <>
    Left = 124
    Top = 100
  end
  object DataSource1: TDataSource
    DataSet = ADOQuery1
    Left = 52
    Top = 100
  end
  object PopupMenu1: TPopupMenu
    Images = FrmMain.ImageList1
    Left = 88
    Top = 100
    object popDel: TMenuItem
      Caption = #21024#38500#35813#24215#20869#32534#21495'...(&D)'
      ImageIndex = 2
      OnClick = popDelClick
    end
    object N1: TMenuItem
      Caption = '-'
    end
    object popRef: TMenuItem
      Caption = #21047#26032#35760#24405'(&R)'
      ImageIndex = 3
      OnClick = popRefClick
    end
  end
  object ADOQuery2: TADOQuery
    Connection = FrmMain.ADOConnection1
    Parameters = <>
    Left = 160
    Top = 100
  end
  object ADOQuery3: TADOQuery
    Connection = FrmMain.ADOConnection1
    Parameters = <>
    Left = 192
    Top = 100
  end
end