unitgys.dfm

仓储系统

      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = [fsBold]
      ParentFont = False
    end
    object lblAudit: TLabel
      Left = 37
      Top = 314
      Width = 65
      Height = 12
      Caption = #35780#23450#20998#32423#65306
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = [fsBold]
      ParentFont = False
    end
    object edtGys: TEdit
      Left = 130
      Top = 12
      Width = 163
      Height = 22
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -14
      Font.Name = #23435#20307
      Font.Style = [fsBold]
      MaxLength = 4
      ParentFont = False
      TabOrder = 0
      OnExit = edtGysExit
      OnKeyPress = edtGysKeyPress
    end
    object edtZip: TEdit
      Left = 130
      Top = 199
      Width = 163
      Height = 21
      TabOrder = 5
      OnKeyPress = edtGysKeyPress
    end
    object edtLxr: TEdit
      Left = 130
      Top = 112
      Width = 163
      Height = 21
      TabOrder = 2
      OnKeyPress = edtGysKeyPress
    end
    object edtAdd: TEdit
      Left = 130
      Top = 169
      Width = 163
      Height = 21
      TabOrder = 4
      OnKeyPress = edtGysKeyPress
    end
    object edtTel: TEdit
      Left = 130
      Top = 141
      Width = 163
      Height = 21
      TabOrder = 3
      OnKeyPress = edtGysKeyPress
    end
    object edtBank: TEdit
      Left = 130
      Top = 256
      Width = 163
      Height = 21
      TabOrder = 7
      OnKeyPress = edtGysKeyPress
    end
    object edtTax: TEdit
      Left = 130
      Top = 228
      Width = 163
      Height = 21
      TabOrder = 6
      OnKeyPress = edtGysKeyPress
    end
    object edtAccount: TEdit
      Left = 130
      Top = 283
      Width = 163
      Height = 21
      TabOrder = 8
      OnKeyPress = edtGysKeyPress
    end
    object edtCredit: TEdit
      Left = 130
      Top = 351
      Width = 163
      Height = 21
      TabOrder = 10
      OnKeyPress = edtGysKeyPress
    end
    object edtBz: TEdit
      Left = 42
      Top = 408
      Width = 255
      Height = 21
      TabOrder = 11
      OnKeyPress = edtBzKeyPress
    end
    object edtAudit: TEdit
      Left = 130
      Top = 311
      Width = 163
      Height = 20
      Font.Charset = ANSI_CHARSET
      Font.Color = clRed
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 9
      Text = '1----4'#32423
      OnKeyPress = edtGysKeyPress
    end
    object edtGysName: TEdit
      Left = 131
      Top = 64
      Width = 164
      Height = 21
      MaxLength = 50
      TabOrder = 1
      OnKeyPress = edtGysKeyPress
    end
  end
  object DBGrid1: TDBGrid
    Left = 0
    Top = 0
    Width = 247
    Height = 434
    Align = alClient
    DataSource = dsGys
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgConfirmDelete, dgCancelOnExit]
    ParentFont = False
    TabOrder = 2
    TitleFont.Charset = GB2312_CHARSET
    TitleFont.Color = clMaroon
    TitleFont.Height = -14
    TitleFont.Name = #23435#20307
    TitleFont.Style = [fsBold]
    Columns = <
      item
        Expanded = False
        FieldName = 'Gys_code'
        Title.Alignment = taCenter
        Title.Caption = #20379#24212#21830#20195#30721
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clMaroon
        Title.Font.Height = -12
        Title.Font.Name = #23435#20307
        Title.Font.Style = [fsBold]
        Width = 80
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'Gys_name'
        Title.Alignment = taCenter
        Title.Caption = #20379#24212#21830#21517#31216
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clMaroon
        Title.Font.Height = -12
        Title.Font.Name = #23435#20307
        Title.Font.Style = [fsBold]
        Width = 150
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'Gys_Lxr'
        Title.Alignment = taCenter
        Title.Caption = #32852#31995#20154
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clMaroon
        Title.Font.Height = -12
        Title.Font.Name = #23435#20307
        Title.Font.Style = [fsBold]
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'Gys_Tel'
        Title.Alignment = taCenter
        Title.Caption = #30005' '#35805
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clMaroon
        Title.Font.Height = -12
        Title.Font.Name = #23435#20307
        Title.Font.Style = [fsBold]
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'Gys_Zip'
        Title.Alignment = taCenter
        Title.Caption = #37038' '#32534
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clMaroon
        Title.Font.Height = -12
        Title.Font.Name = #23435#20307
        Title.Font.Style = [fsBold]
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'Gys_Tax'
        Title.Alignment = taCenter
        Title.Caption = #31246' '#21495
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clMaroon
        Title.Font.Height = -12
        Title.Font.Name = #23435#20307
        Title.Font.Style = [fsBold]
        Width = 80
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'Gys_Khbank'
        Title.Alignment = taCenter
        Title.Caption = #24320#25143#34892
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clMaroon
        Title.Font.Height = -12
        Title.Font.Name = #23435#20307
        Title.Font.Style = [fsBold]
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'Gys_Account'
        Title.Alignment = taCenter
        Title.Caption = #24320#25143#24080#21495
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clMaroon
        Title.Font.Height = -12
        Title.Font.Name = #23435#20307
        Title.Font.Style = [fsBold]
        Width = 80
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'Gys_Credit'
        Title.Alignment = taCenter
        Title.Caption = #20449#35465#24230
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clMaroon
        Title.Font.Height = -12
        Title.Font.Name = #23435#20307
        Title.Font.Style = [fsBold]
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'Gys_Add'
        Title.Alignment = taCenter
        Title.Caption = #36890#20449#22320#22336
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clMaroon
        Title.Font.Height = -12
        Title.Font.Name = #23435#20307
        Title.Font.Style = [fsBold]
        Width = 200
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'Gys_memo'
        Title.Alignment = taCenter
        Title.Caption = #22791#27880
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clMaroon
        Title.Font.Height = -12
        Title.Font.Name = #23435#20307
        Title.Font.Style = [fsBold]
        Width = 200
        Visible = True
      end>
  end
  object dsGys: TDataSource
    DataSet = DM.qry_Gys
    OnDataChange = dsGysDataChange
    Left = 32
    Top = 64
  end
end