📄 f_gzrl.dfm
字号:
object w_gzrl: Tw_gzrl
Left = 177
Top = 139
BorderStyle = bsDialog
Caption = #24037#36164#24405#20837#19982#35745#31639
ClientHeight = 322
ClientWidth = 559
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
Position = poMainFormCenter
OnClose = FormClose
OnCreate = FormCreate
OnShow = FormShow
PixelsPerInch = 94
TextHeight = 13
object Panel1: TPanel
Left = 0
Top = 0
Width = 561
Height = 321
TabOrder = 0
object StaticText1: TStaticText
Left = 184
Top = 8
Width = 156
Height = 24
BorderStyle = sbsSunken
Caption = #24037#36164#24405#20837#19982#35745#31639#31995#32479' '
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'MS Sans Serif'
Font.Style = [fsUnderline]
ParentFont = False
TabOrder = 0
end
object GroupBox1: TGroupBox
Left = 0
Top = 48
Width = 553
Height = 209
Caption = #24405#20837#25968#25454
TabOrder = 1
object Label1: TLabel
Left = 16
Top = 24
Width = 37
Height = 13
Caption = #24180#20221' '
FocusControl = DBEdit1
end
object Label2: TLabel
Left = 184
Top = 24
Width = 34
Height = 13
Caption = #26376#20221' '
FocusControl = DBEdit2
end
object Label3: TLabel
Left = 8
Top = 64
Width = 62
Height = 13
Caption = #32844#24037#32534#21495' '
FocusControl = DBEdit3
end
object Label4: TLabel
Left = 176
Top = 56
Width = 71
Height = 13
Caption = #32844#24037#22995#21517' '
FocusControl = DBEdit4
end
object Label5: TLabel
Left = 376
Top = 24
Width = 68
Height = 13
Caption = #22522#26412#24037#36164' '
FocusControl = DBEdit5
end
object Label6: TLabel
Left = 376
Top = 64
Width = 68
Height = 13
Caption = #28014#21160#24037#36164' '
FocusControl = DBEdit6
end
object Label7: TLabel
Left = 8
Top = 104
Width = 45
Height = 13
Caption = #20010#20154' '#31246
FocusControl = DBEdit7
end
object Label8: TLabel
Left = 176
Top = 96
Width = 71
Height = 13
Caption = #23703#20301#24037#36164' '
FocusControl = DBEdit8
end
object Label9: TLabel
Left = 376
Top = 96
Width = 68
Height = 13
Caption = #29983#27963#34917#21161' '
FocusControl = DBEdit9
end
object Label10: TLabel
Left = 8
Top = 136
Width = 62
Height = 13
Caption = #20445#38505#25187#38500' '
FocusControl = DBEdit10
end
object Label11: TLabel
Left = 184
Top = 136
Width = 57
Height = 13
Caption = #24635#24037#36164' '
FocusControl = DBEdit11
end
object Label12: TLabel
Left = 8
Top = 176
Width = 56
Height = 13
Caption = #23454#21457#24037#36164
FocusControl = DBEdit12
end
object Label14: TLabel
Left = 376
Top = 136
Width = 54
Height = 13
Caption = #24635#25187#38500' '
end
object DBEdit1: TDBEdit
Left = 72
Top = 24
Width = 97
Height = 21
DataField = 'g_nf'
DataSource = data_gzxt
TabOrder = 0
end
object DBEdit2: TDBEdit
Left = 248
Top = 24
Width = 113
Height = 21
DataField = 'g_yf'
DataSource = data_gzxt
TabOrder = 1
end
object DBEdit3: TDBEdit
Left = 72
Top = 56
Width = 97
Height = 21
DataField = 'rs_id'
DataSource = data_gzxt
TabOrder = 2
end
object DBEdit4: TDBEdit
Left = 248
Top = 56
Width = 113
Height = 21
DataField = 'rs_name'
DataSource = data_gzxt
TabOrder = 3
end
object DBEdit5: TDBEdit
Left = 456
Top = 24
Width = 86
Height = 21
DataField = 'g_jbgz'
DataSource = data_gzxt
TabOrder = 4
end
object DBEdit6: TDBEdit
Left = 456
Top = 64
Width = 89
Height = 21
DataField = 'g_fdgz'
DataSource = data_gzxt
TabOrder = 5
end
object DBEdit7: TDBEdit
Left = 72
Top = 96
Width = 97
Height = 21
DataField = 'g_grss'
DataSource = data_gzxt
TabOrder = 6
end
object DBEdit8: TDBEdit
Left = 248
Top = 96
Width = 113
Height = 21
DataField = 'g_gwgz'
DataSource = data_gzxt
TabOrder = 7
end
object DBEdit9: TDBEdit
Left = 456
Top = 96
Width = 89
Height = 21
DataField = 'g_shbz'
DataSource = data_gzxt
TabOrder = 8
end
object DBEdit10: TDBEdit
Left = 72
Top = 136
Width = 97
Height = 21
DataField = 'g_bxkc'
DataSource = data_gzxt
TabOrder = 9
end
object DBEdit11: TDBEdit
Left = 192
Top = -16
Width = 113
Height = 21
DataField = 'g_zgz'
DataSource = data_gzxt
TabOrder = 10
Visible = False
end
object DBEdit12: TDBEdit
Left = 464
Top = -16
Width = 89
Height = 21
DataField = 'g_sfgz'
DataSource = data_gzxt
TabOrder = 11
Visible = False
end
object Edit1: TEdit
Left = 248
Top = 136
Width = 113
Height = 21
TabOrder = 12
end
object Edit3: TEdit
Left = 72
Top = 176
Width = 129
Height = 21
TabOrder = 13
end
object DBEdit13: TDBEdit
Left = 328
Top = -16
Width = 134
Height = 21
DataField = 'g_zkc'
DataSource = data_gzxt
TabOrder = 14
Visible = False
end
object Edit2: TEdit
Left = 456
Top = 136
Width = 89
Height = 21
TabOrder = 15
end
end
object GroupBox2: TGroupBox
Left = 0
Top = 256
Width = 553
Height = 57
TabOrder = 2
object Button8: TButton
Left = 352
Top = 16
Width = 57
Height = 25
Caption = #23614#35760#24405
TabOrder = 0
OnClick = Button8Click
end
object Button1: TButton
Left = 408
Top = 16
Width = 57
Height = 25
Caption = #35745#31639#32479#35745
TabOrder = 1
OnClick = Button1Click
end
object BitBtn1: TBitBtn
Left = 464
Top = 16
Width = 57
Height = 25
Caption = #36864#20986#31995#32479
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 2
OnClick = BitBtn1Click
end
object Button6: TButton
Left = 296
Top = 16
Width = 57
Height = 25
Caption = #39318#35760#24405
TabOrder = 3
OnClick = Button6Click
end
object Button5: TButton
Left = 240
Top = 16
Width = 57
Height = 25
Caption = #19979#19968#26465
TabOrder = 4
OnClick = Button5Click
end
object Button4: TButton
Left = 184
Top = 16
Width = 57
Height = 25
Caption = #19978#19968#19979#26465
TabOrder = 5
OnClick = Button4Click
end
object Button7: TButton
Left = 128
Top = 16
Width = 57
Height = 25
Caption = #20445#23384
TabOrder = 6
OnClick = Button7Click
end
object Button3: TButton
Left = 72
Top = 16
Width = 57
Height = 25
Caption = #20462#25913
TabOrder = 7
OnClick = Button3Click
end
object Button2: TButton
Left = 16
Top = 16
Width = 57
Height = 25
Caption = #22686#21152
TabOrder = 8
OnClick = Button2Click
end
end
end
object ado_gzxt: TADOQuery
Active = True
Connection = Data1.database1
CursorType = ctStatic
OnCalcFields = ado_gzxtCalcFields
Parameters = <>
SQL.Strings = (
'select * from gzxt')
Left = 448
Top = 16
object ado_gzxtg_nf: TStringField
FieldName = 'g_nf'
FixedChar = True
Size = 8
end
object ado_gzxtg_yf: TStringField
FieldName = 'g_yf'
FixedChar = True
Size = 5
end
object ado_gzxtrs_id: TStringField
FieldName = 'rs_id'
FixedChar = True
Size = 5
end
object ado_gzxtrs_name: TStringField
FieldName = 'rs_name'
FixedChar = True
Size = 10
end
object ado_gzxtg_jbgz: TFloatField
FieldName = 'g_jbgz'
end
object ado_gzxtg_fdgz: TFloatField
FieldName = 'g_fdgz'
end
object ado_gzxtg_grss: TFloatField
FieldName = 'g_grss'
end
object ado_gzxtg_gwgz: TFloatField
FieldName = 'g_gwgz'
end
object ado_gzxtg_shbz: TFloatField
FieldName = 'g_shbz'
end
object ado_gzxtg_bxkc: TFloatField
FieldName = 'g_bxkc'
end
object ado_gzxtg_zgz: TFloatField
FieldKind = fkCalculated
FieldName = 'g_zgz'
Calculated = True
end
object ado_gzxtg_zkc: TFloatField
FieldKind = fkCalculated
FieldName = 'g_zkc'
Calculated = True
end
object ado_gzxtg_sfgz: TFloatField
FieldKind = fkCalculated
FieldName = 'g_sfgz'
Calculated = True
end
end
object data_gzxt: TDataSource
DataSet = ado_gzxt
Left = 376
Top = 32
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -