📄 office.dfm

📁 主要是介绍DELPHI三层应用以及分布式数据库的应用
💻 DFM
📖 第 1 页 / 共 3 页
字号:
上一页 1 23
        TabOrder = 3
        object DBGrid1: TDBGrid
          Left = 5
          Top = 14
          Width = 758
          Height = 275
          Color = clInfoBk
          Ctl3D = False
          DataSource = dsoffice
          ParentCtl3D = False
          TabOrder = 0
          TitleFont.Charset = ANSI_CHARSET
          TitleFont.Color = clWindowText
          TitleFont.Height = -13
          TitleFont.Name = #23435#20307
          TitleFont.Style = []
          Columns = <
            item
              Expanded = False
              FieldName = #21150#20107#22788#21517#31216
              Font.Charset = ANSI_CHARSET
              Font.Color = clWindowText
              Font.Height = -13
              Font.Name = #23435#20307
              Font.Style = []
              Visible = True
            end
            item
              Expanded = False
              FieldName = #21150#20107#22788#21495
              Font.Charset = ANSI_CHARSET
              Font.Color = clWindowText
              Font.Height = -13
              Font.Name = #23435#20307
              Font.Style = []
              Visible = True
            end
            item
              Expanded = False
              FieldName = #22320#22336
              Font.Charset = ANSI_CHARSET
              Font.Color = clWindowText
              Font.Height = -13
              Font.Name = #23435#20307
              Font.Style = []
              Visible = True
            end
            item
              Expanded = False
              FieldName = #30005#35805
              Font.Charset = ANSI_CHARSET
              Font.Color = clWindowText
              Font.Height = -13
              Font.Name = #23435#20307
              Font.Style = []
              Visible = True
            end
            item
              Expanded = False
              FieldName = #20256#30495
              Font.Charset = ANSI_CHARSET
              Font.Color = clWindowText
              Font.Height = -13
              Font.Name = #23435#20307
              Font.Style = []
              Visible = True
            end
            item
              Expanded = False
              FieldName = #32463#29702#22995#21517
              Font.Charset = ANSI_CHARSET
              Font.Color = clWindowText
              Font.Height = -13
              Font.Name = #23435#20307
              Font.Style = []
              Visible = True
            end
            item
              Expanded = False
              FieldName = #38754#31215
              Font.Charset = ANSI_CHARSET
              Font.Color = clWindowText
              Font.Height = -13
              Font.Name = #23435#20307
              Font.Style = []
              Visible = True
            end
            item
              Expanded = False
              FieldName = #26412#24180#24230#19994#21153#39069
              Font.Charset = ANSI_CHARSET
              Font.Color = clWindowText
              Font.Height = -13
              Font.Name = #23435#20307
              Font.Style = []
              Visible = True
            end
            item
              Expanded = False
              FieldName = #32047#35745#19994#21153#39069
              Font.Charset = ANSI_CHARSET
              Font.Color = clWindowText
              Font.Height = -13
              Font.Name = #23435#20307
              Font.Style = []
              Visible = True
            end
            item
              Expanded = False
              FieldName = #26412#24180#24230#24212#25910#27454
              Font.Charset = ANSI_CHARSET
              Font.Color = clWindowText
              Font.Height = -13
              Font.Name = #23435#20307
              Font.Style = []
              Visible = True
            end
            item
              Expanded = False
              FieldName = #32047#35745#24212#25910#27454
              Font.Charset = ANSI_CHARSET
              Font.Color = clWindowText
              Font.Height = -13
              Font.Name = #23435#20307
              Font.Style = []
              Visible = True
            end
            item
              Expanded = False
              FieldName = #19994#21153#21592#20154#25968
              Font.Charset = ANSI_CHARSET
              Font.Color = clWindowText
              Font.Height = -13
              Font.Name = #23435#20307
              Font.Style = []
              Visible = True
            end
            item
              Expanded = False
              FieldName = #32500#20462#20154#21592#25968
              Font.Charset = ANSI_CHARSET
              Font.Color = clWindowText
              Font.Height = -13
              Font.Name = #23435#20307
              Font.Style = []
              Visible = True
            end
            item
              Expanded = False
              FieldName = #38144#21806#20154#21592#25968
              Font.Charset = ANSI_CHARSET
              Font.Color = clWindowText
              Font.Height = -13
              Font.Name = #23435#20307
              Font.Style = []
              Title.Caption = #20854#20182#20154#21592#25968
              Width = 112
              Visible = True
            end
            item
              Expanded = False
              FieldName = #24635#20154#25968
              Font.Charset = ANSI_CHARSET
              Font.Color = clWindowText
              Font.Height = -13
              Font.Name = #23435#20307
              Font.Style = []
              Visible = True
            end
            item
              Expanded = False
              FieldName = #24050#38144#26426#22120#21488#25968
              Font.Charset = ANSI_CHARSET
              Font.Color = clWindowText
              Font.Height = -13
              Font.Name = #23435#20307
              Font.Style = []
              Visible = True
            end
            item
              Expanded = False
              FieldName = #20027#31649
              Font.Charset = ANSI_CHARSET
              Font.Color = clWindowText
              Font.Height = -13
              Font.Name = #23435#20307
              Font.Style = []
              Visible = True
            end
            item
              Expanded = False
              FieldName = #23457#26680
              Font.Charset = ANSI_CHARSET
              Font.Color = clWindowText
              Font.Height = -13
              Font.Name = #23435#20307
              Font.Style = []
              Visible = True
            end
            item
              Expanded = False
              FieldName = #24405#20837
              Font.Charset = ANSI_CHARSET
              Font.Color = clWindowText
              Font.Height = -13
              Font.Name = #23435#20307
              Font.Style = []
              Visible = True
            end
            item
              Expanded = False
              FieldName = #24405#20837#26085#26399
              Font.Charset = ANSI_CHARSET
              Font.Color = clWindowText
              Font.Height = -13
              Font.Name = #23435#20307
              Font.Style = []
              Width = 92
              Visible = True
            end>
        end
        object Panel4: TPanel
          Left = 102
          Top = 299
          Width = 164
          Height = 26
          Caption = #32500#20462#20154#21592#25968
          TabOrder = 1
        end
        object Panel6: TPanel
          Left = 267
          Top = 299
          Width = 164
          Height = 26
          Caption = #19994#21153#21592#20154#25968
          TabOrder = 2
        end
        object Panel7: TPanel
          Left = 594
          Top = 299
          Width = 164
          Height = 26
          Caption = #24635#20154#25968
          TabOrder = 3
        end
        object Panel8: TPanel
          Left = 13
          Top = 325
          Width = 89
          Height = 26
          Caption = #21512#35745
          TabOrder = 4
        end
        object Panel9: TPanel
          Left = 13
          Top = 299
          Width = 89
          Height = 26
          TabOrder = 5
        end
        object Edit1: TEdit
          Left = 102
          Top = 325
          Width = 164
          Height = 21
          ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
          TabOrder = 6
          Text = 'Edit1'
        end
        object Edit2: TEdit
          Left = 431
          Top = 325
          Width = 164
          Height = 21
          ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
          TabOrder = 7
          Text = 'Edit2'
        end
        object Edit3: TEdit
          Left = 266
          Top = 325
          Width = 164
          Height = 21
          ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
          TabOrder = 8
          Text = 'Edit3'
        end
        object Edit4: TEdit
          Left = 594
          Top = 325
          Width = 164
          Height = 21
          ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
          TabOrder = 9
          Text = 'Edit4'
        end
        object Panel5: TPanel
          Left = 431
          Top = 299
          Width = 164
          Height = 26
          Caption = #20854#20182#20154#21592#25968
          TabOrder = 10
        end
      end
    end
  end
  object qoffice: TQuery
    CachedUpdates = True
    AfterOpen = qofficeAfterOpen
    AutoRefresh = True
    DatabaseName = 'zxjx_jxw'
    RequestLive = True
    SQL.Strings = (
      'select * from pub_z_office')
    UpdateObject = Updateoffice
    Left = 455
    Top = 2
  end
  object dsoffice: TDataSource
    DataSet = qoffice
    Left = 408
    Top = 4
  end
  object quse: TQuery
    CachedUpdates = True
    AutoRefresh = True
    DatabaseName = 'zxjx_jxw'
    RequestLive = True
    Left = 573
    Top = 8
  end
  object Updateoffice: TUpdateSQL
    ModifySQL.Strings = (
      'update pub_z_office'
      'set'
      '  '#21150#20107#22788#21517#31216' = :'#21150#20107#22788#21517#31216','
      '  '#21150#20107#22788#21495' = :'#21150#20107#22788#21495','
      '  '#22320#22336' = :'#22320#22336','
      '  '#30005#35805' = :'#30005#35805','
      '  '#20256#30495' = :'#20256#30495','
      '  '#32463#29702#22995#21517' = :'#32463#29702#22995#21517','
      '  '#38754#31215' = :'#38754#31215','
      '  '#26412#24180#24230#19994#21153#39069' = :'#26412#24180#24230#19994#21153#39069','
      '  '#32047#35745#19994#21153#39069' = :'#32047#35745#19994#21153#39069','
      '  '#26412#24180#24230#24212#25910#27454' = :'#26412#24180#24230#24212#25910#27454','
      '  '#32047#35745#24212#25910#27454' = :'#32047#35745#24212#25910#27454','
      '  '#19994#21153#21592#20154#25968' = :'#19994#21153#21592#20154#25968','
      '  '#20854#20182#20154#21592#25968' = :'#20854#20182#20154#21592#25968','
      '  '#32500#20462#20154#21592#25968' = :'#32500#20462#20154#21592#25968','
      '  '#24635#20154#25968' = :'#24635#20154#25968','
      '  '#24050#38144#26426#22120#21488#25968' = :'#24050#38144#26426#22120#21488#25968','
      '  '#20027#31649' = :'#20027#31649','
      '  '#23457#26680' = :'#23457#26680','
      '  '#24405#20837' = :'#24405#20837','
      '  '#24405#20837#26085#26399' = :'#24405#20837#26085#26399
      'where'
      '  '#21150#20107#22788#21517#31216' = :OLD_'#21150#20107#22788#21517#31216' and'
      '  '#21150#20107#22788#21495' = :OLD_'#21150#20107#22788#21495)
    InsertSQL.Strings = (
      'insert into pub_z_office'
      '  ('#21150#20107#22788#21517#31216', '#21150#20107#22788#21495', '#22320#22336', '#30005#35805', '#20256#30495', '#32463#29702#22995#21517', '#38754#31215', '#26412#24180#24230#19994#21153#39069', '
      '   '#32047#35745#19994#21153#39069', '#26412#24180#24230#24212#25910#27454', '#32047#35745#24212#25910#27454', '#19994#21153#21592#20154#25968', '#20854#20182#20154#21592#25968', '#32500#20462#20154#21592#25968', '
      '   '#24635#20154#25968', '#24050#38144#26426#22120#21488#25968', '#20027#31649', '#23457#26680', '#24405#20837', '#24405#20837#26085#26399')'
      'values'
      '  (:'#21150#20107#22788#21517#31216', :'#21150#20107#22788#21495', :'#22320#22336', :'#30005#35805', :'#20256#30495', :'#32463#29702#22995#21517', :'#38754#31215', :'#26412#24180#24230#19994#21153#39069', '
      '   :'#32047#35745#19994#21153#39069', :'#26412#24180#24230#24212#25910#27454', :'#32047#35745#24212#25910#27454', :'#19994#21153#21592#20154#25968', :'#20854#20182#20154#21592#25968', :'#32500#20462#20154#21592#25968', '
      '   :'#24635#20154#25968', :'#24050#38144#26426#22120#21488#25968', :'#20027#31649', :'#23457#26680', :'#24405#20837', :'#24405#20837#26085#26399')')
    DeleteSQL.Strings = (
      'delete from pub_z_office'
      'where'
      '  '#21150#20107#22788#21517#31216' = :OLD_'#21150#20107#22788#21517#31216' and'
      '  '#21150#20107#22788#21495' = :OLD_'#21150#20107#22788#21495)
    Left = 507
    Top = 2
  end
end
上一页 1 23
⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -