dutyinfo.dfm

物流管理系统是一个典型的数据库应用程序

inherited f_dutyinfo: Tf_dutyinfo
  Left = 328
  Top = 146
  Caption = #32844#21153#20449#24687#31649#29702
  ClientHeight = 389
  ClientWidth = 331
  OldCreateOrder = True
  OnShow = CancelClick
  PixelsPerInch = 96
  TextHeight = 13
  object DBGrid1: TDBGrid
    Left = 7
    Top = 108
    Width = 316
    Height = 274
    DataSource = DutySource
    ImeName = #20013#25991' ('#31616#20307') - '#20840#25340
    Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
    ReadOnly = True
    TabOrder = 1
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    OnDblClick = DBGrid1DblClick
    Columns = <
      item
        Expanded = False
        FieldName = 'dutyname'
        Title.Caption = #32844#21153#21517#31216
        Width = 140
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'memo'
        Title.Caption = #35828#26126
        Width = 138
        Visible = True
      end>
  end
  object Panel1: TGroupBox
    Left = 8
    Top = 3
    Width = 316
    Height = 73
    Caption = #20449#24687#65306
    TabOrder = 0
    object Label1: TLabel
      Left = 20
      Top = 21
      Width = 81
      Height = 13
      AutoSize = False
      Caption = #32844#21153#21517#31216
    end
    object Label2: TLabel
      Left = 48
      Top = 46
      Width = 53
      Height = 13
      AutoSize = False
      Caption = #35828#26126
    end
    object Dutyname: TEdit
      Left = 88
      Top = 18
      Width = 117
      Height = 21
      BevelKind = bkFlat
      BorderStyle = bsNone
      TabOrder = 0
      OnKeyDown = DutynameKeyDown
    end
    object Memo: TEdit
      Left = 87
      Top = 43
      Width = 118
      Height = 21
      BevelKind = bkFlat
      BorderStyle = bsNone
      TabOrder = 1
      Text = #31354
      OnKeyDown = DutynameKeyDown
    end
  end
  object Add: TBitBtn
    Left = 8
    Top = 82
    Width = 75
    Height = 21
    Caption = #28155#21152
    TabOrder = 2
    OnClick = AddClick
  end
  object Cancel: TBitBtn
    Left = 88
    Top = 82
    Width = 75
    Height = 21
    Caption = #21462#28040
    TabOrder = 3
    OnClick = CancelClick
  end
  object Update: TBitBtn
    Left = 168
    Top = 82
    Width = 75
    Height = 21
    Caption = #20462#25913
    TabOrder = 4
    OnClick = UpdateClick
  end
  object Delete: TBitBtn
    Left = 248
    Top = 82
    Width = 75
    Height = 21
    Caption = #21024#38500
    TabOrder = 5
    OnClick = DeleteClick
  end
  object DutySource: TDataSource
    Left = 56
    Top = 200
  end
end