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

📄 grxx_u.dfm

📁 delphi7.0+SQl server 2000开发的,对于初学者有较好的参考价值
💻 DFM
字号:
object frm_grxx: Tfrm_grxx
  Left = 0
  Top = 0
  Caption = #20010#20154#20449#24687
  ClientHeight = 583
  ClientWidth = 747
  Color = clBtnFace
  Font.Charset = ANSI_CHARSET
  Font.Color = clWindowText
  Font.Height = -14
  Font.Name = #23435#20307
  Font.Style = []
  FormStyle = fsMDIChild
  OldCreateOrder = False
  Position = poMainFormCenter
  Visible = True
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 14
  object GroupBox1: TGroupBox
    Left = 0
    Top = 32
    Width = 743
    Height = 289
    Caption = #22522#26412#20449#24687
    TabOrder = 0
    object Shape1: TShape
      Left = 626
      Top = 18
      Width = 105
      Height = 139
    end
    object Label1: TLabel
      Left = 15
      Top = 30
      Width = 70
      Height = 14
      Caption = #21345'    '#21495#65306
      Color = clBtnFace
      FocusControl = kh_DBEdit
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlue
      Font.Height = -14
      Font.Name = #23435#20307
      Font.Style = []
      ParentColor = False
      ParentFont = False
    end
    object Label2: TLabel
      Left = 240
      Top = 30
      Width = 35
      Height = 14
      Caption = #22995#21517':'
      FocusControl = xm_DBEdit
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlue
      Font.Height = -14
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label3: TLabel
      Left = 424
      Top = 30
      Width = 42
      Height = 14
      Caption = #24615#21035#65306
    end
    object Label4: TLabel
      Left = 15
      Top = 67
      Width = 70
      Height = 14
      Caption = #36523#20221#35777#21495#65306
      FocusControl = sfzh_DBEdit
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlue
      Font.Height = -14
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label5: TLabel
      Left = 15
      Top = 103
      Width = 70
      Height = 14
      Caption = #27665'    '#26063#65306
      FocusControl = DBEdit5
    end
    object Label6: TLabel
      Left = 15
      Top = 139
      Width = 70
      Height = 14
      Caption = #20986#29983#26085#26399#65306
      FocusControl = DBEdit6
    end
    object Label7: TLabel
      Left = 15
      Top = 175
      Width = 70
      Height = 14
      Caption = #20303'    '#22336#65306
      FocusControl = DBEdit7
    end
    object Label8: TLabel
      Left = 15
      Top = 211
      Width = 70
      Height = 14
      Caption = #24037#20316#21333#20301#65306
      FocusControl = DBEdit8
    end
    object Label9: TLabel
      Left = 15
      Top = 251
      Width = 56
      Height = 14
      Caption = #26377#25928#26399#65306
      FocusControl = DBEdit9
    end
    object Label10: TLabel
      Left = 182
      Top = 251
      Width = 28
      Height = 14
      Caption = #33267#65306
    end
    object xp_Image: TImage
      Left = 626
      Top = 18
      Width = 105
      Height = 139
      Center = True
      Stretch = True
      Transparent = True
      OnDblClick = xp_ImageDblClick
    end
    object clear_tupian: TSpeedButton
      Left = 560
      Top = 79
      Width = 60
      Height = 22
      Caption = #28165#38500#22270#29255
      OnClick = clear_tupianClick
    end
    object kh_DBEdit: TDBEdit
      Left = 83
      Top = 27
      Width = 134
      Height = 22
      DataField = 'kh'
      DataSource = DataSource2
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      TabOrder = 0
      OnExit = kh_DBEditExit
    end
    object xm_DBEdit: TDBEdit
      Left = 281
      Top = 27
      Width = 116
      Height = 22
      DataField = 'xm'
      DataSource = DataSource2
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      TabOrder = 1
      OnExit = xm_DBEditExit
    end
    object sfzh_DBEdit: TDBEdit
      Left = 83
      Top = 64
      Width = 284
      Height = 22
      DataField = 'sfzh'
      DataSource = DataSource2
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      TabOrder = 2
      OnExit = sfzh_DBEditExit
    end
    object DBEdit5: TDBEdit
      Left = 83
      Top = 99
      Width = 284
      Height = 22
      DataField = 'mz'
      DataSource = DataSource2
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      TabOrder = 3
    end
    object DBEdit6: TDBEdit
      Left = 83
      Top = 135
      Width = 93
      Height = 22
      DataField = 'csrq'
      DataSource = DataSource2
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      TabOrder = 4
    end
    object DBEdit7: TDBEdit
      Left = 83
      Top = 172
      Width = 648
      Height = 22
      DataField = 'dz'
      DataSource = DataSource2
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      TabOrder = 5
    end
    object DBEdit8: TDBEdit
      Left = 83
      Top = 208
      Width = 648
      Height = 22
      DataField = 'gzdw'
      DataSource = DataSource2
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      TabOrder = 6
    end
    object DBEdit9: TDBEdit
      Left = 83
      Top = 248
      Width = 93
      Height = 22
      DataField = 'bzrq'
      DataSource = DataSource2
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      TabOrder = 7
    end
    object DBEdit10: TDBEdit
      Left = 207
      Top = 248
      Width = 93
      Height = 22
      DataField = 'zyxq'
      DataSource = DataSource2
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      TabOrder = 8
    end
    object xb_DBComboBox: TDBComboBox
      Left = 464
      Top = 27
      Width = 49
      Height = 22
      DataField = 'xb'
      DataSource = DataSource2
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      ItemHeight = 14
      Items.Strings = (
        #30007
        #22899)
      TabOrder = 9
    end
  end
  object GroupBox2: TGroupBox
    Left = 0
    Top = 327
    Width = 743
    Height = 154
    Caption = #22791#27880
    TabOrder = 1
    object Label11: TLabel
      Left = 15
      Top = 96
      Width = 70
      Height = 14
      Caption = #22791'    '#27880#65306
    end
    object Label12: TLabel
      Left = 15
      Top = 28
      Width = 70
      Height = 14
      Caption = #20581#24247#29366#20917#65306
      FocusControl = DBEdit1
    end
    object Label24: TLabel
      Left = 297
      Top = 28
      Width = 70
      Height = 14
      Caption = #24314' '#26723' '#20154#65306
      FocusControl = DBEdit3
    end
    object Label25: TLabel
      Left = 520
      Top = 27
      Width = 70
      Height = 14
      Caption = #24314#26723#26085#26399#65306
      FocusControl = DBEdit11
    end
    object DBMemo1: TDBMemo
      Left = 83
      Top = 64
      Width = 643
      Height = 71
      DataField = 'bz'
      DataSource = DataSource2
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      ScrollBars = ssBoth
      TabOrder = 0
    end
    object DBEdit1: TDBEdit
      Left = 83
      Top = 24
      Width = 134
      Height = 22
      DataField = 'jkzk'
      DataSource = DataSource2
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      TabOrder = 1
    end
    object DBEdit3: TDBEdit
      Left = 365
      Top = 24
      Width = 116
      Height = 22
      DataField = 'jdr'
      DataSource = DataSource2
      Enabled = False
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      TabOrder = 2
    end
    object DBEdit11: TDBEdit
      Left = 589
      Top = 24
      Width = 136
      Height = 22
      DataField = 'jdrq'
      DataSource = DataSource2
      Enabled = False
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      TabOrder = 3
    end
  end
  object Panel1: TPanel
    Left = 0
    Top = 488
    Width = 743
    Height = 90
    TabOrder = 2
    object Label13: TLabel
      Left = 18
      Top = 64
      Width = 28
      Height = 14
      Caption = #39318#26465
    end
    object Label14: TLabel
      Left = 55
      Top = 64
      Width = 42
      Height = 14
      Caption = #19978#19968#26465
    end
    object Label15: TLabel
      Left = 107
      Top = 64
      Width = 42
      Height = 14
      Caption = #19979#19968#26465
    end
    object Label16: TLabel
      Left = 164
      Top = 64
      Width = 28
      Height = 14
      Caption = #26411#26465
    end
    object Label17: TLabel
      Left = 215
      Top = 64
      Width = 28
      Height = 14
      Caption = #28155#21152
    end
    object Label18: TLabel
      Left = 266
      Top = 64
      Width = 28
      Height = 14
      Caption = #21024#38500
    end
    object Label19: TLabel
      Left = 316
      Top = 64
      Width = 28
      Height = 14
      Caption = #32534#36753
    end
    object Label20: TLabel
      Left = 363
      Top = 64
      Width = 28
      Height = 14
      Caption = #20445#23384
    end
    object Label21: TLabel
      Left = 412
      Top = 64
      Width = 28
      Height = 14
      Caption = #21462#28040
    end
    object Label22: TLabel
      Left = 462
      Top = 64
      Width = 28
      Height = 14
      Caption = #21047#26032
    end
    object Label23: TLabel
      Left = 548
      Top = 13
      Width = 56
      Height = 14
      Caption = #21345#22411#20195#21495
    end
    object DBNavigator1: TDBNavigator
      Left = 4
      Top = 11
      Width = 500
      Height = 47
      DataSource = DataSource2
      TabOrder = 0
    end
    object BitBtn1: TBitBtn
      Left = 662
      Top = 14
      Width = 75
      Height = 25
      Caption = #20889#21345'(&M)'
      TabOrder = 1
      OnClick = BitBtn1Click
    end
    object BitBtn2: TBitBtn
      Left = 662
      Top = 54
      Width = 75
      Height = 25
      Caption = #20851#38381'(&C)'
      TabOrder = 2
      OnClick = BitBtn2Click
    end
    object kxdh_ComboBox: TComboBox
      Left = 510
      Top = 36
      Width = 145
      Height = 22
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      ItemHeight = 14
      TabOrder = 3
      OnChange = kxdh_ComboBoxChange
      Items.Strings = (
        'Inside 24C01A'
        'Inside 24C02'
        'Inside 24C04'
        'Inside 24C08'
        'Inside 24C16'
        'Inside 24C32'
        'Inside 24C64'
        'Inside 24C65'
        'ATMEL 88SC101'
        'ATMEL 88SC102'
        'ATMEL 88SC103'
        'ATMEL 88SC1601'
        'ATMEL 88SC1604'
        'ATMEL 88SC1604A'
        'ATMEL 24C01A'
        'ATMEL 24C02'
        'ATMEL 24C04'
        'ATMEL 24C08'
        'ATMEL 24C16'
        'ATMEL 24C32'
        'ATMEL 24C64'
        'ATMEL 45D041'
        'MICROCHIP 24LC01B'
        'MICROCHIP 24LC08B'
        'MICROCHIP 24LC16B'
        'MICROCHIP 24C65'
        'ATMEL 93C46'
        'SIEMENS 4404'
        'SIEMENS 4406'
        'SIEMENS 4442'
        'SIEMENS 4428'
        'SIEMENS 4432'
        'SIEMENS 4418'
        '')
    end
  end
  object ADOConnection1: TADOConnection
    LoginPrompt = False
    Mode = cmShareDenyNone
    Provider = 'Microsoft.Jet.OLEDB.4.0'
  end
  object ADOTable1: TADOTable
    Connection = ADOConnection1
    CursorType = ctStatic
    BeforePost = ADOTable1BeforePost
    AfterScroll = ADOTable1AfterScroll
    TableName = 'grxx'
    Left = 64
    object ADOTable1bh: TAutoIncField
      FieldName = 'bh'
      ReadOnly = True
    end
    object ADOTable1kh: TWideStringField
      FieldName = 'kh'
      Size = 7
    end
    object ADOTable1xm: TWideStringField
      FieldName = 'xm'
      Size = 8
    end
    object ADOTable1xb: TWideStringField
      FieldName = 'xb'
      Size = 4
    end
    object ADOTable1sfzh: TWideStringField
      FieldName = 'sfzh'
      Size = 18
    end
    object ADOTable1mz: TWideStringField
      FieldName = 'mz'
    end
    object ADOTable1csrq: TDateTimeField
      FieldName = 'csrq'
    end
    object ADOTable1dz: TWideStringField
      FieldName = 'dz'
      Size = 50
    end
    object ADOTable1gzdw: TWideStringField
      FieldName = 'gzdw'
      Size = 50
    end
    object ADOTable1bzrq: TDateTimeField
      FieldName = 'bzrq'
    end
    object ADOTable1zyxq: TDateTimeField
      FieldName = 'zyxq'
    end
    object ADOTable1jkzk: TWideStringField
      FieldName = 'jkzk'
      Size = 50
    end
    object ADOTable1bz: TWideMemoField
      FieldName = 'bz'
      BlobType = ftWideMemo
    end
    object ADOTable1xp: TWideStringField
      FieldName = 'xp'
      Size = 50
    end
    object ADOTable1jdr: TWideStringField
      FieldName = 'jdr'
      Size = 8
    end
    object ADOTable1jdrq: TDateTimeField
      FieldName = 'jdrq'
    end
  end
  object DataSource2: TDataSource
    DataSet = ADOTable1
    Left = 32
  end
  object OpenPictureDialog1: TOpenPictureDialog
    Left = 96
  end
end

⌨️ 快捷键说明

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