borrow_return.~dfm

档案管理系统源码

inherited F_BReturn: TF_BReturn
  Tag = 4
  Left = 146
  Top = 129
  ActiveControl = DBEdit5
  Caption = #26723#26696#20511#29992#21644#24402#36824#31649#29702
  OldCreateOrder = True
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  inherited ToolBar1: TToolBar
    inherited ToolButton1: TToolButton
      OnClick = ToolButton1Click
    end
    inherited ToolButton2: TToolButton
      OnClick = ToolButton2Click
    end
    inherited ToolButton3: TToolButton
      OnClick = ToolButton3Click
    end
    inherited ToolButton4: TToolButton
      OnClick = ToolButton4Click
    end
    inherited ToolButton6: TToolButton
      OnClick = ToolButton6Click
    end
    inherited ToolButton5: TToolButton
      OnClick = ToolButton5Click
    end
    inherited ToolButton7: TToolButton
      OnClick = ToolButton7Click
    end
    inherited ToolButton8: TToolButton
      OnClick = ToolButton8Click
    end
    inherited ToolButton9: TToolButton
      OnClick = ToolButton9Click
    end
    inherited ToolButton10: TToolButton
      Enabled = False
    end
    inherited ToolButton11: TToolButton
      Enabled = False
    end
    inherited ToolButton12: TToolButton
      OnClick = ToolButton12Click
    end
  end
  object PageControl1: TPageControl [1]
    Left = 0
    Top = 37
    Width = 592
    Height = 314
    ActivePage = TabSheet2
    Align = alClient
    TabIndex = 1
    TabOrder = 1
    OnChange = PageControl1Change
    object TabSheet1: TTabSheet
      Caption = #26723#26696#20511#29992#31649#29702
      object GroupBox1: TGroupBox
        Left = 0
        Top = 0
        Width = 508
        Height = 89
        TabOrder = 0
        object Label1: TLabel
          Left = 139
          Top = 8
          Width = 70
          Height = 13
          Caption = #26723#26696#21517#31216#65306
          FocusControl = DBEdit1
        end
        object Label2: TLabel
          Left = 9
          Top = 47
          Width = 70
          Height = 13
          Caption = #20511#29992#20154#21592#65306
          FocusControl = DBEdit2
        end
        object Label3: TLabel
          Left = 112
          Top = 47
          Width = 70
          Height = 13
          Caption = #20511#29992#26085#26399#65306
          FocusControl = DBEdit3
        end
        object Label4: TLabel
          Left = 268
          Top = 47
          Width = 42
          Height = 13
          Caption = #22791#27880#65306
          FocusControl = DBEdit4
        end
        object Label5: TLabel
          Left = 10
          Top = 8
          Width = 70
          Height = 13
          Caption = #26723#26696#32534#21495#65306
          FocusControl = DBEdit2
        end
        object DBEdit1: TDBEdit
          Left = 140
          Top = 24
          Width = 361
          Height = 21
          DataField = 'Borrow_Name'
          DataSource = DM.DS_Borrow
          TabOrder = 0
        end
        object DBEdit2: TDBEdit
          Left = 9
          Top = 63
          Width = 93
          Height = 21
          DataField = 'Borrow_Person'
          DataSource = DM.DS_Borrow
          TabOrder = 1
        end
        object DBEdit3: TDBEdit
          Left = 112
          Top = 63
          Width = 145
          Height = 21
          DataField = 'Borrow_Date'
          DataSource = DM.DS_Borrow
          TabOrder = 2
        end
        object DBEdit4: TDBEdit
          Left = 268
          Top = 63
          Width = 233
          Height = 21
          DataField = 'Borrow_Memo'
          DataSource = DM.DS_Borrow
          TabOrder = 3
        end
        object ME_Borrow: TMaskEdit
          Left = 9
          Top = 24
          Width = 118
          Height = 21
          Enabled = False
          EditMask = '!999999;1;_'
          MaxLength = 6
          TabOrder = 4
          Text = '      '
          OnChange = ME_BorrowChange
        end
      end
      object DBGrid1: TDBGrid
        Left = 0
        Top = 96
        Width = 584
        Height = 190
        Align = alBottom
        DataSource = DM.DS_Borrow
        TabOrder = 1
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = []
        Columns = <
          item
            Expanded = False
            FieldName = 'Borrow_ID'
            Title.Alignment = taCenter
            Title.Caption = #26723#26696#32534#21495
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'Borrow_Name'
            Title.Alignment = taCenter
            Title.Caption = #26723#26696#21517#31216
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'Borrow_Person'
            Title.Alignment = taCenter
            Title.Caption = #20511#29992#20154#21592
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'Borrow_Date'
            Title.Alignment = taCenter
            Title.Caption = #20511#29992#26085#26399
            Width = 89
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'Borrow_Memo'
            Title.Alignment = taCenter
            Title.Caption = #22791#27880
            Width = 146
            Visible = True
          end>
      end
    end
    object TabSheet2: TTabSheet
      Caption = #26723#26696#24402#36824#31649#29702
      ImageIndex = 1
      object GroupBox2: TGroupBox
        Left = 0
        Top = 0
        Width = 508
        Height = 89
        TabOrder = 0
        object Label6: TLabel
          Left = 139
          Top = 8
          Width = 70
          Height = 13
          Caption = #26723#26696#21517#31216#65306
          FocusControl = DBEdit5
        end
        object Label7: TLabel
          Left = 9
          Top = 47
          Width = 70
          Height = 13
          Caption = #24402#36824#20154#21592#65306
          FocusControl = DBEdit6
        end
        object Label8: TLabel
          Left = 112
          Top = 47
          Width = 70
          Height = 13
          Caption = #24402#36824#26085#26399#65306
          FocusControl = DBEdit7
        end
        object Label9: TLabel
          Left = 268
          Top = 47
          Width = 42
          Height = 13
          Caption = #22791#27880#65306
          FocusControl = DBEdit8
        end
        object Label10: TLabel
          Left = 10
          Top = 8
          Width = 70
          Height = 13
          Caption = #26723#26696#32534#21495#65306
          FocusControl = DBEdit6
        end
        object DBEdit5: TDBEdit
          Left = 140
          Top = 24
          Width = 361
          Height = 21
          DataField = 'Return_Name'
          DataSource = DM.DS_Return
          TabOrder = 0
        end
        object DBEdit6: TDBEdit
          Left = 9
          Top = 63
          Width = 93
          Height = 21
          DataField = 'Return_Person'
          DataSource = DM.DS_Return
          TabOrder = 1
        end
        object DBEdit7: TDBEdit
          Left = 112
          Top = 63
          Width = 145
          Height = 21
          DataField = 'Return_Date'
          DataSource = DM.DS_Return
          TabOrder = 2
        end
        object DBEdit8: TDBEdit
          Left = 268
          Top = 63
          Width = 233
          Height = 21
          DataField = 'Return_Memo'
          DataSource = DM.DS_Return
          TabOrder = 3
        end
        object ME_Return: TMaskEdit
          Left = 9
          Top = 24
          Width = 118
          Height = 21
          Enabled = False
          EditMask = '!999999;1;_'
          MaxLength = 6
          TabOrder = 4
          Text = '      '
          OnChange = ME_ReturnChange
        end
      end
      object DBGrid2: TDBGrid
        Left = 0
        Top = 96
        Width = 584
        Height = 190
        Align = alBottom
        DataSource = DM.DS_Return
        TabOrder = 1
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = []
        Columns = <
          item
            Expanded = False
            FieldName = 'Return_ID'
            Title.Alignment = taCenter
            Title.Caption = #26723#26696#32534#21495
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'Return_Name'
            Title.Alignment = taCenter
            Title.Caption = #26723#26696#21517#31216
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'Return_Person'
            Title.Alignment = taCenter
            Title.Caption = #24402#36824#20154#21592
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'Return_Date'
            Title.Alignment = taCenter
            Title.Caption = #24402#36824#26085#26399
            Width = 90
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'Return_Memo'
            Title.Alignment = taCenter
            Title.Caption = #22791#27880
            Width = 144
            Visible = True
          end>
      end
    end
  end
  object DBNavigator: TDBNavigator [2]
    Left = 275
    Top = 36
    Width = 240
    Height = 25
    DataSource = DM.DS_Borrow
    TabOrder = 2
    Visible = False
  end
  inherited ImageList1: TImageList
    Left = 232
    Top = 32
  end
end