stdtable.dfm

大型分布式销售管理系统,DELPHI编写,商业源代码,现在已经商用,下载者严禁出售该代码,只可以自己学习,包含数据库文件

          FieldName = #22870#37329#27604#20363
          Width = 168
          Visible = True
        end>
    end
    object btnsave_headoffice: TButton
      Left = 286
      Top = 136
      Width = 75
      Height = 25
      Caption = #20445#23384
      TabOrder = 1
      OnClick = btnsave_headofficeClick
    end
  end
  object Pan_ostation: TPanel
    Left = 177
    Top = 66
    Width = 380
    Height = 161
    BevelOuter = bvLowered
    TabOrder = 1
    object DBGostation: TDBGrid
      Left = 7
      Top = 7
      Width = 364
      Height = 120
      Color = clInfoBk
      DataSource = dsostation
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      TabOrder = 0
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -11
      TitleFont.Name = 'MS Sans Serif'
      TitleFont.Style = []
      Columns = <
        item
          Expanded = False
          FieldName = #32844#20301
          Width = 326
          Visible = True
        end>
    end
    object btnsave_ostation: TButton
      Left = 290
      Top = 131
      Width = 75
      Height = 25
      Caption = #20445#23384
      TabOrder = 1
      OnClick = btnsave_ostationClick
    end
  end
  object Pan_coefficient: TPanel
    Left = 178
    Top = 59
    Width = 383
    Height = 169
    BevelOuter = bvLowered
    TabOrder = 2
    object btnsave_coefficient: TButton
      Left = 291
      Top = 142
      Width = 75
      Height = 25
      Caption = #20445#23384
      TabOrder = 0
      OnClick = btnsave_coefficientClick
    end
    object DBGcoefficient: TDBGrid
      Left = 11
      Top = 7
      Width = 359
      Height = 132
      Color = clInfoBk
      DataSource = dscoefficient
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      TabOrder = 1
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -11
      TitleFont.Name = 'MS Sans Serif'
      TitleFont.Style = []
      OnKeyUp = DBGcoefficientKeyUp
      Columns = <
        item
          Expanded = False
          FieldName = #36135#27454#22238#31548#29575
          Width = 86
          Visible = True
        end
        item
          Expanded = False
          FieldName = #35843#25972#31995#25968
          Width = 103
          Visible = True
        end>
    end
  end
  object Pan_office: TPanel
    Left = 179
    Top = 61
    Width = 379
    Height = 169
    BevelOuter = bvLowered
    TabOrder = 7
    object btnsave_office: TButton
      Left = 294
      Top = 141
      Width = 75
      Height = 25
      Caption = #20445#23384
      TabOrder = 0
      OnClick = btnsave_officeClick
    end
    object DBGoffice: TDBGrid
      Left = 8
      Top = 5
      Width = 364
      Height = 133
      Color = clInfoBk
      DataSource = dsoffice
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      TabOrder = 1
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -11
      TitleFont.Name = 'MS Sans Serif'
      TitleFont.Style = []
      OnKeyDown = DBGofficeKeyDown
      OnKeyUp = DBGofficeKeyUp
      Columns = <
        item
          Expanded = False
          FieldName = #21150#20107#22788#21517#31216
          Width = 102
          Visible = True
        end
        item
          Expanded = False
          FieldName = #32463#29702#20323#37329#29575
          Width = 96
          Visible = True
        end
        item
          Expanded = False
          FieldName = #19994#21153#21592#20323#37329#29575
          Width = 126
          Visible = True
        end>
    end
  end
  object Pan_upper: TPanel
    Left = 178
    Top = 59
    Width = 380
    Height = 169
    BevelOuter = bvLowered
    TabOrder = 8
    object btnsave_upper: TButton
      Left = 295
      Top = 142
      Width = 75
      Height = 25
      Caption = #20445#23384
      TabOrder = 0
      OnClick = btnsave_upperClick
    end
    object DBGupper: TDBGrid
      Left = 5
      Top = 4
      Width = 368
      Height = 136
      Color = clInfoBk
      DataSource = dsupper
      TabOrder = 1
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -11
      TitleFont.Name = 'MS Sans Serif'
      TitleFont.Style = []
      OnKeyUp = DBGupperKeyUp
      Columns = <
        item
          Expanded = False
          FieldName = #32844#21153
          Width = 87
          Visible = True
        end
        item
          Expanded = False
          FieldName = #26376#21457#25918#20323#37329#19978#38480
          Width = 106
          Visible = True
        end>
    end
  end
  object ostation: TTable
    CachedUpdates = True
    AutoRefresh = True
    DatabaseName = 'zxjx_jxw'
    TableName = 'dbo.std_office_station'
    Left = 181
    Top = 65523
    object ostationBDEDesigner2: TStringField
      FieldName = #32844#20301
    end
  end
  object dsostation: TDataSource
    DataSet = ostation
    Left = 224
    Top = 65522
  end
  object dscoefficient: TDataSource
    DataSet = coefficient
    Left = 400
    Top = 65522
  end
  object coefficient: TTable
    CachedUpdates = True
    AutoRefresh = True
    DatabaseName = 'zxjx_jxw'
    Filtered = True
    TableName = 'dbo.std_pay_coefficient'
    Left = 366
    Top = 65522
    object coefficientBDEDesigner2: TFloatField
      FieldName = #36135#27454#22238#31548#29575
    end
    object coefficientBDEDesigner3: TFloatField
      FieldName = #35843#25972#31995#25968
    end
  end
  object dsdeduct: TDataSource
    DataSet = deduct
    Left = 503
    Top = 65524
  end
  object deduct: TTable
    CachedUpdates = True
    AutoRefresh = True
    DatabaseName = 'zxjx_jxw'
    Filtered = True
    TableName = 'dbo.std_pay_deduct'
    Left = 462
    Top = 65524
    object deductBDEDesigner2: TFloatField
      FieldName = #22238#27454#29575
    end
    object deductBDEDesigner3: TFloatField
      FieldName = #38646#37197#20214#35745#25552#29575
    end
  end
  object float: TTable
    CachedUpdates = True
    AutoRefresh = True
    DatabaseName = 'zxjx_jxw'
    Filtered = True
    TableName = 'dbo.std_pay_float'
    Left = 541
    Top = 65526
    object floatBDEDesigner: TFloatField
      FieldName = #28014#21160#29575
    end
    object floatBDEDesigner2: TFloatField
      FieldName = #32500#20462#20154#21592#19982#19994#21153#21592#30340#20323#37329#27604#29575
    end
    object floatBDEDesigner3: TFloatField
      FieldName = #19994#21153#37096#20323#37329#27604#29575
    end
    object floatBDEDesigner4: TFloatField
      FieldName = #23458#25143#26381#21153#37096#20323#37329#27604#29575
    end
  end
  object dsfloat: TDataSource
    DataSet = float
    Left = 573
    Top = 65525
  end
  object headoffice: TTable
    CachedUpdates = True
    AutoRefresh = True
    DatabaseName = 'zxjx_jxw'
    TableName = 'dbo.std_pay_headoffice'
    Left = 217
    Top = 209
    object headofficeBDEDesigner2: TFloatField
      FieldName = #38144#21806#39069
    end
    object headofficeBDEDesigner3: TFloatField
      FieldName = #22870#37329#27604#20363
    end
  end
  object dsheadoffice: TDataSource
    DataSet = headoffice
    Left = 250
    Top = 208
  end
  object dsmaintain: TDataSource
    DataSet = maintain
    Left = 347
    Top = 206
  end
  object maintain: TTable
    CachedUpdates = True
    AutoRefresh = True
    DatabaseName = 'zxjx_jxw'
    Filtered = True
    TableName = 'dbo.std_pay_maintain'
    Left = 316
    Top = 207
  end
  object dsoffice: TDataSource
    DataSet = office
    Left = 420
    Top = 207
  end
  object office: TTable
    CachedUpdates = True
    AutoRefresh = True
    DatabaseName = 'zxjx_jxw'
    Filtered = True
    TableName = 'dbo.std_pay_office'
    Left = 392
    Top = 207
    object officeBDEDesigner: TStringField
      FieldName = #21150#20107#22788#21517#31216
      FixedChar = True
      Size = 10
    end
    object officeBDEDesigner2: TStringField
      FieldName = #32463#29702#20323#37329#29575
      FixedChar = True
      Size = 10
    end
    object officeBDEDesigner3: TStringField
      FieldName = #19994#21153#21592#20323#37329#29575
      FixedChar = True
      Size = 10
    end
  end
  object dsupper: TDataSource
    DataSet = upper
    Left = 503
    Top = 208
  end
  object upper: TTable
    CachedUpdates = True
    AutoRefresh = True
    DatabaseName = 'zxjx_jxw'
    Filtered = True
    TableName = 'dbo.std_pay_upper'
    Left = 463
    Top = 209
    object upperBDEDesigner2: TStringField
      FieldName = #32844#21153
      Size = 30
    end
    object upperBDEDesigner3: TCurrencyField
      FieldName = #26376#21457#25918#20323#37329#19978#38480
    end
  end
  object sstation: TTable
    CachedUpdates = True
    AutoRefresh = True
    DatabaseName = 'zxjx_jxw'
    Filtered = True
    TableName = 'dbo.std_stuff_station'
    Left = 545
    Top = 207
  end
  object dssstation: TDataSource
    DataSet = sstation
    Left = 562
    Top = 166
  end
  object bonus: TQuery
    CachedUpdates = True
    AutoRefresh = True
    DatabaseName = 'zxjx_jxw'
    Constrained = True
    Left = 278
    Top = 65521
  end
  object Query1: TQuery
    CachedUpdates = True
    AutoRefresh = True
    DatabaseName = 'zxjx_jxw'
    Constrained = True
    SQL.Strings = (
      
        'insert into [dbo].[std_pay_upper] select [dbo].[std_office_stati' +
        'on].'#32844#20301',5000 from [dbo].[std_office_station] where ([dbo].[std_of' +
        'fice_station].'#32844#20301' not in (select [dbo].[std_pay_upper].'#32844#21153' from [d' +
        'bo].[std_pay_upper]))')
    Left = 49
    Top = 201
  end
end