📄 inesiiscontinue.dfm
字号:
Font.Name = #23435#20307
Font.Style = []
MaxLength = 18
ParentFont = False
ReadOnly = True
TabOrder = 9
Visible = False
end
object FlatEdit9: TFlatEdit
Left = 282
Top = 103
Width = 145
Height = 18
TabStop = False
ColorFocused = clBtnFace
ColorBorder = clWhite
ColorFlat = clBtnFace
ParentColor = True
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
MaxLength = 18
ParentFont = False
ReadOnly = True
TabOrder = 10
end
object FlatEdit11: TFlatEdit
Left = 498
Top = 105
Width = 173
Height = 18
TabStop = False
ColorFocused = clBtnFace
ColorBorder = clWhite
ColorFlat = clBtnFace
ParentColor = True
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
MaxLength = 18
ParentFont = False
ReadOnly = True
TabOrder = 11
end
object DateEdit1: TDateEdit
Tag = 4
Left = 83
Top = 72
Width = 132
Height = 21
Color = clMoneyGreen
NumGlyphs = 2
TabOrder = 12
OnChange = DateEdit1Change
end
object DateEdit2: TDateEdit
Tag = 4
Left = 83
Top = 100
Width = 132
Height = 21
Color = clMoneyGreen
NumGlyphs = 2
TabOrder = 13
OnChange = DateEdit1Change
end
object FlatEdit4: TFlatEdit
Left = 108
Top = 133
Width = 120
Height = 18
TabStop = False
ColorFocused = clBtnFace
ColorBorder = clWhite
ColorFlat = clBtnFace
ParentColor = True
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
MaxLength = 18
ParentFont = False
ReadOnly = True
TabOrder = 14
end
end
object GroupBox1: TGroupBox
Left = 0
Top = 202
Width = 790
Height = 110
Align = alClient
Caption = #36716#20837#26412#31038#20445#26426#26500#32564#36153#35760#24405':'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 2
object DBGrid1: TDBGrid
Left = 2
Top = 14
Width = 786
Height = 94
Align = alClient
DataSource = DataSource1
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 0
TitleFont.Charset = ANSI_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -12
TitleFont.Name = #23435#20307
TitleFont.Style = []
OnCellClick = DBGrid1CellClick
OnKeyPress = DBGrid1KeyPress
Columns = <
item
Expanded = False
FieldName = 'iscode'
ReadOnly = True
Title.Caption = #31038#20250#20445#38556#21495
Width = 126
Visible = True
end
item
Expanded = False
FieldName = 'psname'
ReadOnly = True
Title.Caption = #32844#24037#22995#21517
Width = 80
Visible = True
end
item
Expanded = False
FieldName = 'psseno'
ReadOnly = True
Title.Caption = #20154#21592#20869#30721
Width = 91
Visible = True
end
item
Color = clWhite
Expanded = False
FieldName = 'yearno'
ReadOnly = True
Title.Alignment = taCenter
Title.Caption = #24180' '#20221
Visible = True
end
item
Color = clMoneyGreen
Expanded = False
FieldName = 'cpsum'
ReadOnly = True
Title.Alignment = taCenter
Title.Caption = #26412#24180#32564#36153#22522#25968#24635#39069
Width = 125
Visible = True
end
item
Color = clMoneyGreen
Expanded = False
FieldName = 'cymonths'
ReadOnly = True
Title.Caption = #26412#24180#32564#36153#24635#26376#25968
Width = 104
Visible = True
end
item
Expanded = False
FieldName = 'cypj'
ReadOnly = True
Title.Caption = #26376#32564#36153#22522#25968
Width = 65
Visible = True
end
item
Color = clMoneyGreen
Expanded = False
FieldName = 'nextyearjs'
Title.Caption = #19979#21322#24180#26376#22522#25968
Visible = False
end>
end
end
object Panel2: TPanel
Left = 0
Top = 469
Width = 790
Height = 41
Align = alBottom
BevelOuter = bvNone
TabOrder = 3
object Panel3: TPanel
Left = 334
Top = 0
Width = 456
Height = 41
Align = alRight
BevelOuter = bvNone
TabOrder = 0
object FlatButton1: TFlatButton
Left = 291
Top = 6
Width = 73
Height = 27
Caption = #20445' '#23384' '
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabStop = True
TabOrder = 3
OnClick = FlatButton1Click
end
object FlatButton2: TFlatButton
Left = 202
Top = 6
Width = 73
Height = 27
Caption = #22686#21152#35760#24405
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabStop = True
TabOrder = 2
OnClick = FlatButton2Click
end
object FlatButton5: TFlatButton
Left = 8
Top = 6
Width = 73
Height = 27
Caption = #20010#20154#23545#24080#21333
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabStop = True
TabOrder = 0
OnClick = FlatButton5Click
end
object FlatButton6: TFlatButton
Left = 97
Top = 6
Width = 92
Height = 27
Caption = #21024#38500#24403#21069#35760#24405
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabStop = True
TabOrder = 1
OnClick = FlatButton6Click
end
object FlatButton7: TFlatButton
Left = 379
Top = 6
Width = 73
Height = 27
Caption = #25918' '#24323' '
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabStop = True
TabOrder = 4
OnClick = FlatButton7Click
end
end
end
object GroupBox3: TGroupBox
Left = 0
Top = 312
Width = 790
Height = 157
Align = alBottom
Caption = #36716#20837#26412#31038#20445#26426#26500#20449#24687':'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 4
object Label11: TLabel
Left = 85
Top = 37
Width = 58
Height = 12
AutoSize = False
Caption = #36716#20837#26102#38388#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label15: TLabel
Left = 349
Top = 36
Width = 69
Height = 12
AutoSize = False
Caption = #36716#20837#24635#37329#39069#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label18: TLabel
Left = 86
Top = 82
Width = 57
Height = 12
AutoSize = False
Caption = #35843#25972#37329#39069#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label21: TLabel
Left = 336
Top = 78
Width = 82
Height = 12
AutoSize = False
Caption = #20854#20013#20010#20154#37096#20998#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label12: TLabel
Left = 14
Top = 122
Width = 130
Height = 12
AutoSize = False
Caption = #36716#20837#19978#24180#26411#32047#35745#20648#23384#39069#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label16: TLabel
Left = 336
Top = 119
Width = 82
Height = 12
AutoSize = False
Caption = #20854#20013#20010#20154#37096#20998#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object DateEdit3: TDateEdit
Tag = 13
Left = 146
Top = 32
Width = 120
Height = 21
Color = clMoneyGreen
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #23435#20307
Font.Style = []
NumGlyphs = 2
ParentFont = False
TabOrder = 0
end
object FlatEdit14: TFlatEdit
Tag = 7
Left = 420
Top = 32
Width = 120
Height = 20
ColorFlat = clMoneyGreen
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #23435#20307
Font.Style = []
MaxLength = 18
ParentFont = False
TabOrder = 1
end
object FlatEdit15: TFlatEdit
Tag = 7
Left = 146
Top = 78
Width = 120
Height = 20
ColorFlat = clMoneyGreen
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #23435#20307
Font.Style = []
MaxLength = 18
ParentFont = False
TabOrder = 2
end
object FlatEdit16: TFlatEdit
Tag = 7
Left = 420
Top = 75
Width = 120
Height = 20
ColorFlat = clMoneyGreen
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #23435#20307
Font.Style = []
MaxLength = 18
ParentFont = False
TabOrder = 3
end
object FlatEdit17: TFlatEdit
Tag = 7
Left = 146
Top = 118
Width = 120
Height = 20
ColorFlat = clMoneyGreen
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #23435#20307
Font.Style = []
MaxLength = 18
ParentFont = False
TabOrder = 4
end
object FlatEdit18: TFlatEdit
Tag = 7
Left = 420
Top = 115
Width = 120
Height = 20
ColorFlat = clMoneyGreen
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #23435#20307
Font.Style = []
MaxLength = 18
ParentFont = False
TabOrder = 5
end
end
end
inherited Panel10: TPanel
Width = 790
inherited Bevel1: TBevel
Width = 790
end
inherited Panel11: TPanel
Left = 768
end
end
object RMD: TRxMemoryData
FieldDefs = <>
Left = 496
Top = 8
object RMDiscode: TStringField
FieldName = 'iscode'
end
object RMDpsname: TStringField
FieldName = 'psname'
end
object RMDpsseno: TIntegerField
FieldName = 'psseno'
end
object RMDyearno: TIntegerField
FieldName = 'yearno'
end
object RMDcpsum: TFloatField
FieldName = 'cpsum'
end
object RMDcymonths: TIntegerField
FieldName = 'cymonths'
end
object RMDcypj: TFloatField
FieldName = 'cypj'
end
object RMDnextyearjs: TFloatField
FieldName = 'nextyearjs'
end
object RMDindustry: TIntegerField
FieldName = 'industry'
end
end
object DataSource1: TDataSource
DataSet = RMD
Left = 408
Top = 8
end
object ADD_Record: TRxMemoryData
FieldDefs = <>
Left = 312
Top = 8
object StringField3: TStringField
FieldName = 'iscode'
end
object StringField4: TStringField
FieldName = 'psname'
end
object IntegerField4: TIntegerField
FieldName = 'psseno'
end
object IntegerField5: TIntegerField
FieldName = 'yearno'
end
object FloatField21: TFloatField
FieldName = 'cpsum'
end
object IntegerField6: TIntegerField
FieldName = 'cymonths'
end
object FloatField22: TFloatField
FieldName = 'cypj'
end
object ADD_Recordnextyearjs: TFloatField
FieldName = 'nextyearjs'
end
object ADD_Recordindustry: TIntegerField
FieldName = 'industry'
end
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -