📄 frm_1001.dfm
字号:
object frmgongneng: Tfrmgongneng
Left = 219
Top = 226
Width = 754
Height = 434
Caption = #36890#35759#24405
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
FormStyle = fsMDIChild
OldCreateOrder = False
Position = poDefault
Visible = True
WindowState = wsMaximized
OnClose = FormClose
OnCreate = FormCreate
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object Panel1: TPanel
Left = 0
Top = 0
Width = 746
Height = 41
Align = alTop
Caption = #36890' '#35759' '#24405
Color = 8421440
Font.Charset = GB2312_CHARSET
Font.Color = clYellow
Font.Height = -37
Font.Name = #38582#20070
Font.Style = [fsBold]
ParentFont = False
TabOrder = 0
end
object Panel2: TPanel
Left = 0
Top = 41
Width = 746
Height = 325
Align = alClient
TabOrder = 1
object Panel4: TPanel
Left = 1
Top = 1
Width = 185
Height = 323
Align = alLeft
TabOrder = 0
object SGxml: TStringGrid
Left = 1
Top = 1
Width = 183
Height = 321
Align = alClient
ColCount = 2
DefaultRowHeight = 18
FixedCols = 0
RowCount = 2
Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRangeSelect, goRowSelect]
TabOrder = 0
OnClick = SGxmlClick
end
end
object Panel5: TPanel
Left = 186
Top = 1
Width = 559
Height = 323
Align = alClient
TabOrder = 1
object Label1: TLabel
Left = 72
Top = 16
Width = 42
Height = 13
Caption = #32534' '#21495#65306
end
object Label2: TLabel
Left = 72
Top = 50
Width = 42
Height = 13
Caption = #22995' '#21517#65306
end
object Label3: TLabel
Left = 72
Top = 84
Width = 42
Height = 13
Caption = #24615' '#21035#65306
end
object Label4: TLabel
Left = 72
Top = 118
Width = 42
Height = 13
Caption = #27665' '#26063#65306
end
object Label5: TLabel
Left = 72
Top = 152
Width = 42
Height = 13
Caption = #20998' '#31867#65306
end
object Label6: TLabel
Left = 72
Top = 186
Width = 42
Height = 13
Caption = #22320' '#22336#65306
end
object Label7: TLabel
Left = 72
Top = 220
Width = 42
Height = 13
Caption = #29983' '#26085#65306
end
object Label8: TLabel
Left = 72
Top = 254
Width = 42
Height = 13
Caption = #30005' '#35805#65306
end
object Label9: TLabel
Left = 72
Top = 288
Width = 42
Height = 13
Caption = #22791' '#27880#65306
end
object PNLbh: TPanel
Left = 120
Top = 11
Width = 122
Height = 22
TabOrder = 0
end
object EDTxm: TEdit
Left = 120
Top = 45
Width = 121
Height = 21
MaxLength = 8
TabOrder = 1
end
object RDBxbn: TRadioButton
Left = 120
Top = 79
Width = 40
Height = 17
Caption = #30007
Checked = True
TabOrder = 2
TabStop = True
end
object RDBxbv: TRadioButton
Left = 184
Top = 79
Width = 53
Height = 17
Caption = #22899
TabOrder = 3
end
object CBXmz: TComboBox
Left = 120
Top = 113
Width = 123
Height = 21
Style = csDropDownList
ItemHeight = 13
ItemIndex = 0
TabOrder = 4
Text = #27721#26063
Items.Strings = (
#27721#26063
#26397#40092#26063
#28385#26063
#33945#21476#26063
#22238#26063)
end
object CBXfl: TComboBox
Left = 120
Top = 148
Width = 123
Height = 21
Style = csDropDownList
ItemHeight = 13
ItemIndex = 0
TabOrder = 5
Text = #23478#24237
Items.Strings = (
#23478#24237
#21516#20107
#26379#21451
#20854#20182)
end
object EDTdz: TEdit
Left = 120
Top = 182
Width = 121
Height = 21
MaxLength = 30
TabOrder = 6
end
object DDTPsr: TDateTimePicker
Left = 120
Top = 216
Width = 122
Height = 21
CalAlignment = dtaLeft
Date = 38409.4977936343
Time = 38409.4977936343
DateFormat = dfShort
DateMode = dmComboBox
Kind = dtkDate
ParseInput = False
TabOrder = 7
end
object EDTdh: TEdit
Left = 120
Top = 250
Width = 121
Height = 21
MaxLength = 12
TabOrder = 8
end
object EDTbz: TEdit
Left = 120
Top = 285
Width = 121
Height = 21
MaxLength = 100
TabOrder = 9
end
object Button1: TButton
Left = 352
Top = 208
Width = 75
Height = 25
Caption = 'Button1'
TabOrder = 10
OnClick = Button1Click
end
end
end
object Panel3: TPanel
Left = 0
Top = 366
Width = 746
Height = 41
Align = alBottom
TabOrder = 2
object BTNins: TBitBtn
Left = 72
Top = 8
Width = 75
Height = 25
Caption = #28155' '#21152
TabOrder = 0
OnClick = BTNinsClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000130B0000130B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF003333330B7FFF
FFB0333333777F3333773333330B7FFFFFB0333333777F3333773333330B7FFF
FFB0333333777F3333773333330B7FFFFFB03FFFFF777FFFFF77000000000077
007077777777777777770FFFFFFFF00077B07F33333337FFFF770FFFFFFFF000
7BB07F3FF3FFF77FF7770F00F000F00090077F77377737777F770FFFFFFFF039
99337F3FFFF3F7F777FF0F0000F0F09999937F7777373777777F0FFFFFFFF999
99997F3FF3FFF77777770F00F000003999337F773777773777F30FFFF0FF0339
99337F3FF7F3733777F30F08F0F0337999337F7737F73F7777330FFFF0039999
93337FFFF7737777733300000033333333337777773333333333}
NumGlyphs = 2
end
object BTNupt: TBitBtn
Left = 192
Top = 8
Width = 75
Height = 25
Caption = #20462' '#25913
TabOrder = 1
OnClick = BTNuptClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
333333FFFFFFFFFFFFF33000077777770033377777777777773F000007888888
00037F3337F3FF37F37F00000780088800037F3337F77F37F37F000007800888
00037F3337F77FF7F37F00000788888800037F3337777777337F000000000000
00037F3FFFFFFFFFFF7F00000000000000037F77777777777F7F000FFFFFFFFF
00037F7F333333337F7F000FFFFFFFFF00037F7F333333337F7F000FFFFFFFFF
00037F7F333333337F7F000FFFFFFFFF00037F7F333333337F7F000FFFFFFFFF
00037F7F333333337F7F000FFFFFFFFF07037F7F33333333777F000FFFFFFFFF
0003737FFFFFFFFF7F7330099999999900333777777777777733}
NumGlyphs = 2
end
object BTNdel: TBitBtn
Left = 312
Top = 8
Width = 75
Height = 25
Caption = #21024' '#38500
TabOrder = 2
OnClick = BTNdelClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000130B0000130B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
333333333333333333FF33333333333330003333333333333777333333333333
300033FFFFFF3333377739999993333333333777777F3333333F399999933333
3300377777733333337733333333333333003333333333333377333333333333
3333333333333333333F333333333333330033333F33333333773333C3333333
330033337F3333333377333CC3333333333333F77FFFFFFF3FF33CCCCCCCCCC3
993337777777777F77F33CCCCCCCCCC399333777777777737733333CC3333333
333333377F33333333FF3333C333333330003333733333333777333333333333
3000333333333333377733333333333333333333333333333333}
NumGlyphs = 2
end
object BTNexit: TBitBtn
Left = 607
Top = 8
Width = 75
Height = 25
Caption = #36864' '#20986
TabOrder = 3
OnClick = BTNexitClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00330000000000
03333377777777777F333301BBBBBBBB033333773F3333337F3333011BBBBBBB
0333337F73F333337F33330111BBBBBB0333337F373F33337F333301110BBBBB
0333337F337F33337F333301110BBBBB0333337F337F33337F333301110BBBBB
0333337F337F33337F333301110BBBBB0333337F337F33337F333301110BBBBB
0333337F337F33337F333301110BBBBB0333337F337FF3337F33330111B0BBBB
0333337F337733337F333301110BBBBB0333337F337F33337F333301110BBBBB
0333337F3F7F33337F333301E10BBBBB0333337F7F7F33337F333301EE0BBBBB
0333337F777FFFFF7F3333000000000003333377777777777333}
NumGlyphs = 2
end
end
object ADOCNtxl: TADOConnection
ConnectionString =
'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=G:\txl\TXL.mdb;Pers' +
'ist Security Info=False'
Provider = 'Microsoft.Jet.OLEDB.4.0'
Left = 544
Top = 64
end
object ADOQRtxl: TADOQuery
Connection = ADOCNtxl
Parameters = <>
Left = 592
Top = 144
end
object ADOCMtxl: TADOCommand
Connection = ADOCNtxl
Parameters = <>
Left = 456
Top = 200
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -