⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 unit_cjqk.dfm

📁 主要是介绍DELPHI三层应用以及分布式数据库的应用
💻 DFM
📖 第 1 页 / 共 3 页
字号:
            Font.Name = #23435#20307
            Font.Style = []
            ParentFont = False
            TabOrder = 5
            OnClick = btn_edit1Click
          end
          object btn_save1: TButton
            Left = 523
            Top = 9
            Width = 73
            Height = 25
            Caption = #20445#23384
            Enabled = False
            Font.Charset = ANSI_CHARSET
            Font.Color = clPurple
            Font.Height = -13
            Font.Name = #23435#20307
            Font.Style = []
            ParentFont = False
            TabOrder = 6
            OnClick = btn_save1Click
          end
          object btn_cancel1: TButton
            Left = 595
            Top = 9
            Width = 75
            Height = 25
            Caption = #21462#28040
            Enabled = False
            Font.Charset = ANSI_CHARSET
            Font.Color = clPurple
            Font.Height = -13
            Font.Name = #23435#20307
            Font.Style = []
            ParentFont = False
            TabOrder = 7
            OnClick = btn_cancel1Click
          end
          object Button1: TButton
            Left = 671
            Top = 9
            Width = 75
            Height = 25
            Caption = #36864#20986
            Font.Charset = ANSI_CHARSET
            Font.Color = clPurple
            Font.Height = -13
            Font.Name = #23435#20307
            Font.Style = []
            ParentFont = False
            TabOrder = 8
            OnClick = Button1Click
          end
          object btn_delete: TButton
            Left = 378
            Top = 9
            Width = 73
            Height = 25
            Caption = #21024#38500
            Font.Charset = ANSI_CHARSET
            Font.Color = clPurple
            Font.Height = -13
            Font.Name = #23435#20307
            Font.Style = []
            ParentFont = False
            TabOrder = 9
            OnClick = btn_deleteClick
          end
        end
      end
      object TabSheet5: TTabSheet
        Caption = #26597#30475#25152#26377#20986#26426#20449#24687
        ImageIndex = 4
        object Panel4: TPanel
          Left = 0
          Top = 448
          Width = 776
          Height = 104
          Align = alBottom
          BevelOuter = bvNone
          TabOrder = 0
          object Button8: TButton
            Left = 125
            Top = 8
            Width = 75
            Height = 25
            Caption = #26597#35810
            Font.Charset = ANSI_CHARSET
            Font.Color = clWindowText
            Font.Height = -13
            Font.Name = #23435#20307
            Font.Style = []
            ParentFont = False
            TabOrder = 0
            OnClick = Button8Click
          end
          object Button10: TButton
            Left = 312
            Top = 8
            Width = 75
            Height = 25
            Caption = #25171#21360
            Font.Charset = ANSI_CHARSET
            Font.Color = clWindowText
            Font.Height = -13
            Font.Name = #23435#20307
            Font.Style = []
            ParentFont = False
            TabOrder = 1
            OnClick = Button10Click
          end
          object Button9: TButton
            Left = 216
            Top = 8
            Width = 75
            Height = 25
            Caption = #25152#26377#35760#24405
            Font.Charset = ANSI_CHARSET
            Font.Color = clWindowText
            Font.Height = -13
            Font.Name = #23435#20307
            Font.Style = []
            ParentFont = False
            TabOrder = 2
            OnClick = Button9Click
          end
        end
        object DBGrid1: TDBGrid
          Left = 8
          Top = 16
          Width = 753
          Height = 426
          Color = clInfoBk
          DataSource = DataSource1
          Font.Charset = ANSI_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = #23435#20307
          Font.Style = []
          ParentFont = False
          ReadOnly = True
          TabOrder = 1
          TitleFont.Charset = DEFAULT_CHARSET
          TitleFont.Color = clWindowText
          TitleFont.Height = -11
          TitleFont.Name = 'MS Sans Serif'
          TitleFont.Style = []
          Columns = <
            item
              Expanded = False
              FieldName = #21512#21516#21495
              Width = 96
              Visible = True
            end
            item
              Expanded = False
              FieldName = #23458#25143#21517#31216
              Width = 142
              Visible = True
            end
            item
              Expanded = False
              FieldName = #26426#22411
              Width = 121
              Visible = True
            end
            item
              Expanded = False
              FieldName = #25968#37327
              Visible = True
            end
            item
              Expanded = False
              FieldName = #21333#20215
              Width = 74
              Visible = True
            end
            item
              Expanded = False
              FieldName = #21512#35745
              Width = 91
              Visible = True
            end
            item
              Expanded = False
              FieldName = #21457#26426#26085#26399
              Visible = True
            end
            item
              Expanded = False
              FieldName = #36141#36135#21512#21516#21495
              Visible = True
            end
            item
              Expanded = False
              FieldName = #21378#23478#21517#31216
              Visible = True
            end
            item
              Expanded = False
              FieldName = #21457#26426#26426#22411
              Visible = True
            end
            item
              Expanded = False
              FieldName = #21457#26426#25968#37327
              Visible = True
            end
            item
              Expanded = False
              FieldName = #39564#25910#21333#21495#30721
              Visible = True
            end
            item
              Expanded = False
              FieldName = #36816#36755#21333#20301#21517#31216
              Visible = True
            end
            item
              Expanded = False
              FieldName = #36816#36755#21457#31080#21495
              Visible = True
            end
            item
              Expanded = False
              FieldName = #20986#24211#21333
              Visible = True
            end
            item
              Expanded = False
              FieldName = #24405#20837#26102#38388
              Visible = True
            end
            item
              Expanded = False
              FieldName = #32534#21046#21333#20301
              Visible = True
            end
            item
              Expanded = False
              FieldName = #26376#20221
              Visible = True
            end
            item
              Expanded = False
              FieldName = #23457#25209
              Visible = True
            end
            item
              Expanded = False
              FieldName = #22797#26680
              Visible = True
            end
            item
              Expanded = False
              FieldName = #21046#21333
              Visible = True
            end
            item
              Expanded = False
              FieldName = #22791#27880#35828#26126
              Visible = True
            end>
        end
        object Panel6: TPanel
          Left = 0
          Top = 0
          Width = 776
          Height = 3
          Align = alTop
          BevelOuter = bvNone
          TabOrder = 2
        end
      end
    end
    object Panel3: TPanel
      Left = 1
      Top = 1
      Width = 786
      Height = 3
      Align = alTop
      BevelOuter = bvNone
      TabOrder = 1
    end
  end
  object Query1: TADOQuery
    Connection = dm_wxp.ADOConnection1
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select * from pub_z_cjqk')
    Left = 20
    Top = 12
    object Query1DSDesigner: TAutoIncField
      FieldName = #24207#21495
      ReadOnly = True
    end
    object Query1DSDesigner2: TStringField
      FieldName = #21512#21516#21495
      Size = 50
    end
    object Query1DSDesigner3: TStringField
      FieldName = #23458#25143#21517#31216
      Size = 50
    end
    object Query1DSDesigner4: TStringField
      FieldName = #26426#22411
      Size = 40
    end
    object Query1DSDesigner5: TIntegerField
      FieldName = #25968#37327
    end
    object Query1DSDesigner6: TBCDField
      FieldName = #21333#20215
      Precision = 19
    end
    object Query1DSDesigner7: TBCDField
      FieldName = #21512#35745
      Precision = 19
    end
    object Query1DSDesigner8: TDateTimeField
      FieldName = #21457#26426#26085#26399
    end
    object Query1DSDesigner9: TStringField
      FieldName = #36141#36135#21512#21516#21495
      Size = 40
    end
    object Query1DSDesigner10: TStringField
      FieldName = #21378#23478#21517#31216
      Size = 40
    end
    object Query1DSDesigner11: TStringField
      FieldName = #21457#26426#26426#22411
      Size = 40
    end
    object Query1DSDesigner12: TIntegerField
      FieldName = #21457#26426#25968#37327
    end
    object Query1DSDesigner13: TStringField
      FieldName = #39564#25910#21333#21495#30721
      Size = 40
    end
    object Query1DSDesigner14: TStringField
      FieldName = #36816#36755#21333#20301#21517#31216
      Size = 40
    end
    object Query1DSDesigner15: TStringField
      FieldName = #36816#36755#21457#31080#21495
      Size = 40
    end
    object Query1DSDesigner16: TStringField
      FieldName = #20986#24211#21333
      Size = 40
    end
    object Query1DSDesigner17: TDateTimeField
      FieldName = #24405#20837#26102#38388
    end
    object Query1DSDesigner18: TStringField
      FieldName = #32534#21046#21333#20301
      Size = 50
    end
    object Query1DSDesigner19: TStringField
      FieldName = #26376#20221
    end
    object Query1DSDesigner20: TStringField
      FieldName = #23457#25209
    end
    object Query1DSDesigner21: TStringField
      FieldName = #22797#26680
    end
    object Query1DSDesigner22: TStringField
      FieldName = #21046#21333
    end
    object Query1DSDesigner23: TStringField
      FieldName = #22791#27880#35828#26126
      Size = 100
    end
    object Query1DSDesigner24: TStringField
      FieldName = #21150#20107#22788
      Size = 40
    end
    object Query1DSDesigner25: TDateTimeField
      FieldName = #19978#25253#26102#38388
    end
  end
  object DataSource1: TDataSource
    DataSet = Query1
    Left = 52
    Top = 36
  end
  object Query_contract_client: TQuery
    DatabaseName = 'zxjx'
    SQL.Strings = (
      'select * from pub_z_contract_machine '
      '')
    Left = 555
    Top = 158
  end
end

⌨️ 快捷键说明

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