📄 stuff.dfm

📁 主要是介绍DELPHI三层应用以及分布式数据库的应用
💻 DFM
📖 第 1 页 / 共 3 页
字号:
上一页 1 23
        Height = 41
        Caption = #25353#23703#20301
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 0
        object cbgw: TComboBox
          Left = 8
          Top = 14
          Width = 145
          Height = 21
          Color = clInfoBk
          Ctl3D = False
          ItemHeight = 13
          ParentCtl3D = False
          TabOrder = 0
        end
      end
      object GroupBox3: TGroupBox
        Left = 300
        Top = -2
        Width = 161
        Height = 41
        Caption = #25353#22995#21517
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 1
        object cbxm: TComboBox
          Left = 7
          Top = 14
          Width = 145
          Height = 21
          Color = clInfoBk
          Ctl3D = False
          ItemHeight = 13
          ParentCtl3D = False
          TabOrder = 0
        end
      end
      object GroupBox4: TGroupBox
        Left = 579
        Top = -2
        Width = 172
        Height = 41
        Caption = #25353#21150#20107#22788
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 2
        object cbbsc: TComboBox
          Left = 15
          Top = 14
          Width = 145
          Height = 21
          Color = clInfoBk
          Ctl3D = False
          ItemHeight = 13
          ParentCtl3D = False
          TabOrder = 0
        end
      end
      object Panel3: TPanel
        Left = 0
        Top = 51
        Width = 770
        Height = 41
        TabOrder = 3
        object btn_brs: TButton
          Left = 215
          Top = 6
          Width = 75
          Height = 30
          Caption = #20840#35272
          Font.Charset = ANSI_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = #23435#20307
          Font.Style = []
          ParentFont = False
          TabOrder = 0
          OnClick = btn_brsClick
        end
        object btn_qry: TButton
          Left = 290
          Top = 6
          Width = 75
          Height = 30
          Caption = #26597#35810
          Font.Charset = ANSI_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = #23435#20307
          Font.Style = []
          ParentFont = False
          TabOrder = 1
          OnClick = btn_qryClick
        end
        object btn_clr: TButton
          Left = 365
          Top = 6
          Width = 75
          Height = 30
          Caption = #28165#31354
          Font.Charset = ANSI_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = #23435#20307
          Font.Style = []
          ParentFont = False
          TabOrder = 2
          OnClick = btn_clrClick
        end
        object btn_prt: TButton
          Left = 440
          Top = 6
          Width = 75
          Height = 30
          Caption = #25171#21360#32467#26524
          Font.Charset = ANSI_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = #23435#20307
          Font.Style = []
          ParentFont = False
          TabOrder = 3
          OnClick = btn_prtClick
        end
      end
      object GroupBox6: TGroupBox
        Left = 0
        Top = 93
        Width = 770
        Height = 293
        Align = alBottom
        Caption = #25968#25454#26597#30475#31383#21475
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 4
        object DBGrid1: TDBGrid
          Left = 5
          Top = 13
          Width = 760
          Height = 271
          Color = clInfoBk
          Ctl3D = False
          DataSource = dsstuff
          ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
          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 = #22995#21517
              Visible = True
            end
            item
              Expanded = False
              FieldName = #24037#21495
              Visible = True
            end
            item
              Expanded = False
              FieldName = #23703#20301
              Visible = True
            end
            item
              Expanded = False
              FieldName = #37096#38376
              Visible = True
            end
            item
              Expanded = False
              FieldName = #21150#20107#22788#21517#31216
              Visible = True
            end
            item
              Expanded = False
              FieldName = #24615#21035
              Visible = True
            end
            item
              Expanded = False
              FieldName = #32852#31995#30005#35805
              Visible = True
            end
            item
              Expanded = False
              FieldName = #24180#40836
              Visible = True
            end
            item
              Expanded = False
              FieldName = #23398#21382
              Visible = True
            end
            item
              Expanded = False
              FieldName = #35797#29992#26399
              Visible = True
            end
            item
              Expanded = False
              FieldName = #36523#20221#35777#21495
              Visible = True
            end
            item
              Expanded = False
              FieldName = #23478#24237#20303#22336
              Visible = True
            end
            item
              Expanded = False
              FieldName = #25163#26426#21495#30721
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'EMAIL'
              Visible = True
            end
            item
              Expanded = False
              FieldName = #36827#21333#20301#26102#38388
              Visible = True
            end
            item
              Expanded = False
              FieldName = #27491#24335#24405#29992#26102#38388
              Visible = True
            end
            item
              Expanded = False
              FieldName = #31163#32844#26102#38388
              Visible = True
            end>
        end
      end
    end
  end
  object qstuff: TQuery
    CachedUpdates = True
    AutoRefresh = True
    DatabaseName = 'zxjx_jxw'
    RequestLive = True
    SQL.Strings = (
      'select * from pub_z_stuff')
    UpdateObject = upstuff
    Left = 241
    Top = 3
    object qstuffBDEDesigner2: TStringField
      FieldName = #22995#21517
      Origin = 'ZXJX_JXW.pub_z_stuff.'#22995#21517
      FixedChar = True
    end
    object qstuffBDEDesigner3: TStringField
      FieldName = #24037#21495
      Origin = 'ZXJX_JXW.pub_z_stuff.'#24037#21495
      FixedChar = True
    end
    object qstuffBDEDesigner4: TStringField
      FieldName = #23703#20301
      Origin = 'ZXJX_JXW.pub_z_stuff.'#23703#20301
      FixedChar = True
    end
    object qstuffBDEDesigner5: TStringField
      FieldName = #21150#20107#22788#21517#31216
      Origin = 'ZXJX_JXW.pub_z_stuff.'#21150#20107#22788#21517#31216
      FixedChar = True
    end
    object qstuffBDEDesigner6: TDateTimeField
      FieldName = #36827#21333#20301#26102#38388
      Origin = 'ZXJX_JXW.pub_z_stuff.'#36827#21333#20301#26102#38388
    end
    object qstuffBDEDesigner7: TDateTimeField
      FieldName = #27491#24335#24405#29992#26102#38388
      Origin = 'ZXJX_JXW.pub_z_stuff.'#27491#24335#24405#29992#26102#38388
    end
    object qstuffBDEDesigner8: TDateTimeField
      FieldName = #31163#32844#26102#38388
      Origin = 'ZXJX_JXW.pub_z_stuff.'#31163#32844#26102#38388
    end
    object qstuffBDEDesigner9: TStringField
      FieldName = #35797#29992#26399
      Origin = 'ZXJX_JXW.pub_z_stuff.'#35797#29992#26399
      FixedChar = True
      Size = 2
    end
    object qstuffBDEDesigner10: TStringField
      FieldName = #24615#21035
      Origin = 'ZXJX_JXW.pub_z_stuff.'#24615#21035
      FixedChar = True
      Size = 4
    end
    object qstuffBDEDesigner11: TStringField
      FieldName = #24180#40836
      Origin = 'ZXJX_JXW.pub_z_stuff.'#24180#40836
      FixedChar = True
      Size = 3
    end
    object qstuffBDEDesigner12: TStringField
      FieldName = #23398#21382
      Origin = 'ZXJX_JXW.pub_z_stuff.'#23398#21382
      FixedChar = True
      Size = 10
    end
    object qstuffBDEDesigner13: TStringField
      FieldName = #36523#20221#35777#21495
      Origin = 'ZXJX_JXW.pub_z_stuff.'#36523#20221#35777#21495
      FixedChar = True
      Size = 30
    end
    object qstuffBDEDesigner14: TStringField
      FieldName = #37096#38376
      Origin = 'ZXJX_JXW.pub_z_stuff.'#37096#38376
      FixedChar = True
    end
    object qstuffBDEDesigner15: TMemoField
      FieldName = #24037#20316#21382#31243
      Origin = 'ZXJX_JXW.pub_z_stuff.'#24037#20316#21382#31243
      BlobType = ftMemo
    end
    object qstuffBDEDesigner16: TStringField
      FieldName = #23478#24237#20303#22336
      Origin = 'ZXJX_JXW.pub_z_stuff.'#23478#24237#20303#22336
      FixedChar = True
      Size = 40
    end
    object qstuffBDEDesigner17: TStringField
      FieldName = #32852#31995#30005#35805
      Origin = 'ZXJX_JXW.pub_z_stuff.'#32852#31995#30005#35805
      FixedChar = True
    end
    object qstuffBDEDesigner18: TStringField
      FieldName = #25163#26426#21495#30721
      Origin = 'ZXJX_JXW.pub_z_stuff.'#25163#26426#21495#30721
      FixedChar = True
    end
    object qstuffEMAIL: TStringField
      FieldName = 'EMAIL'
      Origin = 'ZXJX_JXW.pub_z_stuff.EMAIL'
      FixedChar = True
    end
    object qstuffBDEDesigner19: TMemoField
      FieldName = #22791#27880
      Origin = 'ZXJX_JXW.pub_z_stuff.'#22791#27880
      BlobType = ftMemo
    end
    object qstuffBDEDesigner20: TStringField
      FieldName = #20027#31649
      Origin = 'ZXJX_JXW.pub_z_stuff.'#20027#31649
      FixedChar = True
    end
    object qstuffBDEDesigner21: TStringField
      FieldName = #23457#26680
      Origin = 'ZXJX_JXW.pub_z_stuff.'#23457#26680
      FixedChar = True
    end
    object qstuffBDEDesigner22: TStringField
      FieldName = #24405#20837
      Origin = 'ZXJX_JXW.pub_z_stuff.'#24405#20837
      FixedChar = True
    end
    object qstuffBDEDesigner23: TDateTimeField
      FieldName = #24405#20837#26085#26399
      Origin = 'ZXJX_JXW.pub_z_stuff.'#24405#20837#26085#26399
    end
  end
  object dsstuff: TDataSource
    DataSet = qstuff
    Left = 197
    Top = 3
  end
  object quse: TQuery
    CachedUpdates = True
    AutoRefresh = True
    DatabaseName = 'zxjx_jxw'
    Constrained = True
    RequestLive = True
    Left = 498
    Top = 5
  end
  object qforuse: TQuery
    CachedUpdates = True
    AutoRefresh = True
    DatabaseName = 'zxjx_jxw'
    Constrained = True
    RequestLive = True
    Left = 549
    Top = 6
  end
  object upstuff: TUpdateSQL
    ModifySQL.Strings = (
      'update pub_z_stuff'
      'set'
      '  '#22995#21517' = :'#22995#21517','
      '  '#24037#21495' = :'#24037#21495','
      '  '#23703#20301' = :'#23703#20301','
      '  '#21150#20107#22788#21517#31216' = :'#21150#20107#22788#21517#31216','
      '  '#36827#21333#20301#26102#38388' = :'#36827#21333#20301#26102#38388','
      '  '#27491#24335#24405#29992#26102#38388' = :'#27491#24335#24405#29992#26102#38388','
      '  '#31163#32844#26102#38388' = :'#31163#32844#26102#38388','
      '  '#35797#29992#26399' = :'#35797#29992#26399','
      '  '#24615#21035' = :'#24615#21035','
      '  '#24180#40836' = :'#24180#40836','
      '  '#23398#21382' = :'#23398#21382','
      '  '#36523#20221#35777#21495' = :'#36523#20221#35777#21495','
      '  '#37096#38376' = :'#37096#38376','
      '  '#24037#20316#21382#31243' = :'#24037#20316#21382#31243','
      '  '#23478#24237#20303#22336' = :'#23478#24237#20303#22336','
      '  '#32852#31995#30005#35805' = :'#32852#31995#30005#35805','
      '  '#25163#26426#21495#30721' = :'#25163#26426#21495#30721','
      '  EMAIL = :EMAIL,'
      '  '#22791#27880' = :'#22791#27880','
      '  '#20027#31649' = :'#20027#31649','
      '  '#23457#26680' = :'#23457#26680','
      '  '#24405#20837' = :'#24405#20837','
      '  '#24405#20837#26085#26399' = :'#24405#20837#26085#26399
      'where'
      '  '#24037#21495' = :OLD_'#24037#21495' and'
      '  '#24405#20837#26085#26399' = :OLD_'#24405#20837#26085#26399)
    InsertSQL.Strings = (
      'insert into pub_z_stuff'
      '  ('#22995#21517', '#24037#21495', '#23703#20301', '#21150#20107#22788#21517#31216', '#36827#21333#20301#26102#38388', '#27491#24335#24405#29992#26102#38388', '#31163#32844#26102#38388', '#35797#29992#26399', '
      '   '#24615#21035', '#24180#40836', '#23398#21382', '#36523#20221#35777#21495', '#37096#38376', '#24037#20316#21382#31243', '#23478#24237#20303#22336', '#32852#31995#30005#35805', '#25163#26426#21495#30721', '
      '   EMAIL, '#22791#27880', '#20027#31649', '#23457#26680', '#24405#20837', '#24405#20837#26085#26399')'
      'values'
      '  (:'#22995#21517', :'#24037#21495', :'#23703#20301', :'#21150#20107#22788#21517#31216', :'#36827#21333#20301#26102#38388', :'#27491#24335#24405#29992#26102#38388', :'#31163#32844#26102#38388', '
      '   :'#35797#29992#26399', :'#24615#21035', :'#24180#40836', :'#23398#21382', :'#36523#20221#35777#21495', :'#37096#38376', :'#24037#20316#21382#31243', :'#23478#24237#20303#22336', '
      '   :'#32852#31995#30005#35805', :'#25163#26426#21495#30721', :EMAIL, :'#22791#27880', :'#20027#31649', :'#23457#26680', :'#24405#20837', :'#24405#20837#26085#26399')')
    DeleteSQL.Strings = (
      'delete from pub_z_stuff'
      'where'
      '  '#24037#21495' = :OLD_'#24037#21495' and'
      '  '#24405#20837#26085#26399' = :OLD_'#24405#20837#26085#26399)
    Left = 285
    Top = 6
  end
end
上一页 1 23
⌨️ 快捷键说明

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