📄 breakinfo.~dfm
字号:
object DateEdit2: TDateEdit
Tag = 10
Left = 85
Top = 112
Width = 132
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 = 9
OnChange = FlatEdit1Change
end
object DateEdit3: TDateEdit
Tag = 13
Left = 86
Top = 144
Width = 131
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 = 12
OnChange = FlatEdit1Change
end
object FlatComboBox8: TFlatComboBox
Tag = 11
Left = 291
Top = 111
Width = 160
Height = 20
Color = clMoneyGreen
ItemHeight = 12
Items.Strings = (
#22266#23450#24037
#21512#21516#24037
#20020#26102#24037
#20892#27665#24037)
TabOrder = 10
Visible = False
ItemIndex = -1
OnChange = FlatEdit1Change
end
object FlatComboBox10: TFlatComboBox
Tag = 12
Left = 536
Top = 112
Width = 160
Height = 20
Color = clWindow
ItemHeight = 12
Items.Strings = (
#22312#20445
#20013#26029
#32456#27490
#31163#36864#20241#36864#32844
#24322#22320#36716#20986
#24037#20260#36864#20241
#24037#20260#36716#27491#24120#36864#20241
#20859#32769#27515#20129
#24037#20260#27515#20129)
TabOrder = 16
Visible = False
ItemIndex = -1
OnChange = FlatEdit1Change
end
object DateEdit1: TDateEdit
Tag = 4
Left = 85
Top = 53
Width = 132
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 = 3
OnChange = FlatEdit1Change
end
object FlatEdit3: TFlatEdit
Tag = 15
Left = 536
Top = 112
Width = 160
Height = 20
TabStop = False
ColorBorder = clWhite
ColorFlat = clBtnFace
ParentColor = True
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #23435#20307
Font.Style = []
MaxLength = 18
ParentFont = False
ReadOnly = True
TabOrder = 11
OnChange = FlatEdit1Change
end
object FlatEdit8: TFlatEdit
Tag = 15
Left = 99
Top = 173
Width = 121
Height = 20
TabStop = False
ColorBorder = clWhite
ColorFlat = clBtnFace
ParentColor = True
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #23435#20307
Font.Style = []
MaxLength = 18
ParentFont = False
ReadOnly = True
TabOrder = 15
OnChange = FlatEdit1Change
end
object FlatEdit10: TFlatEdit
Tag = 2
Left = 535
Top = 19
Width = 161
Height = 20
TabStop = False
ColorFocused = clBtnFace
ColorBorder = clWhite
ColorFlat = clBtnFace
ParentColor = True
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #23435#20307
Font.Style = []
MaxLength = 10
ParentFont = False
ReadOnly = True
TabOrder = 17
OnChange = FlatEdit1Change
end
object FlatEdit11: TFlatEdit
Tag = 5
Left = 536
Top = 50
Width = 160
Height = 20
TabStop = False
ColorFocused = clBtnFace
ColorBorder = clWhite
ColorFlat = clBtnFace
ParentColor = True
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #23435#20307
Font.Style = []
MaxLength = 18
ParentFont = False
ReadOnly = True
TabOrder = 18
OnChange = FlatEdit1Change
end
object FlatEdit12: TFlatEdit
Tag = 8
Left = 291
Top = 111
Width = 160
Height = 20
TabStop = False
ColorBorder = clWhite
ColorFlat = clBtnFace
ParentColor = True
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #23435#20307
Font.Style = []
MaxLength = 18
ParentFont = False
TabOrder = 19
OnChange = FlatEdit1Change
end
object FlatEdit13: TFlatEdit
Tag = 8
Left = 291
Top = 144
Width = 160
Height = 20
TabStop = False
ColorBorder = clWhite
ColorFlat = clBtnFace
ParentColor = True
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #23435#20307
Font.Style = []
MaxLength = 18
ParentFont = False
TabOrder = 20
OnChange = FlatEdit1Change
end
end
end
inherited Panel10: TPanel
Width = 792
inherited Bevel1: TBevel
Width = 792
end
inherited Panel11: TPanel
Left = 770
end
end
inherited ImageList1: TImageList
Left = 472
Top = 8
end
inherited ActionList1: TActionList
Left = 504
Top = 8
end
inherited PopupMenu1: TPopupMenu
Left = 536
Top = 8
end
inherited XPMenu1: TXPMenu
Left = 440
Top = 8
end
object RMD0: TRxMemoryData
FieldDefs = <>
Left = 440
Top = 8
object RMD0iscode: TStringField
FieldName = 'iscode'
end
object RMD0psname: TStringField
FieldName = 'psname'
end
object RMD0psseno: TIntegerField
FieldName = 'psseno'
end
object RMD0yearno: TIntegerField
FieldName = 'yearno'
end
object RMD0cpsum: TFloatField
FieldName = 'cpsum'
end
object RMD0cymonths: TIntegerField
FieldName = 'cymonths'
end
object RMD0cypj: TFloatField
FieldName = 'cypj'
end
object RMD0cyints: TFloatField
FieldName = 'cyints'
end
object RMD0lysum: TFloatField
FieldName = 'lysum'
end
object RMD0lyints: TFloatField
FieldName = 'lyints'
end
end
object DataSource1: TDataSource
DataSet = RMD
Left = 440
Top = 8
end
object RMD00: TRxMemoryData
FieldDefs = <>
Left = 440
Top = 8
object RMD00iscode: TStringField
FieldName = 'iscode'
end
object RMD00psname: TStringField
FieldName = 'psname'
end
object RMD00psseno: TIntegerField
FieldName = 'psseno'
end
object RMD00yearno: TIntegerField
FieldName = 'yearno'
end
object RMD00cpsum: TFloatField
FieldName = 'cpsum'
end
object RMD00cymonths: TIntegerField
FieldName = 'cymonths'
end
object RMD00cypj: TFloatField
FieldName = 'cypj'
end
object RMD00cyints: TFloatField
FieldName = 'cyints'
end
object RMD00lysum: TFloatField
FieldName = 'lysum'
end
object RMD00lyints: TFloatField
FieldName = 'lyints'
end
object RMD00cyActual: TFloatField
FieldName = 'cyActual'
end
object RMD00cyrely: TFloatField
FieldName = 'cyrely'
end
object RMD00cycpints: TFloatField
FieldName = 'cycpints'
end
object RMD00cypsints: TFloatField
FieldName = 'cypsints'
end
object RMD00lycpints: TFloatField
FieldName = 'lycpints'
end
object RMD00lypsints: TFloatField
FieldName = 'lypsints'
end
object RMD00lycpprin: TFloatField
FieldName = 'lycpprin'
end
object RMD00lypsprin: TFloatField
FieldName = 'lypsprin'
end
object RMD00cyftcpfd: TFloatField
FieldName = 'cyftcpfd'
end
object RMD00cypsarac: TFloatField
FieldName = 'cypsarac'
end
object RMD00cyrelycpfd: TFloatField
FieldName = 'cyrelycpfd'
end
object RMD00cyrelypsfd: TFloatField
FieldName = 'cyrelypsfd'
end
object RMD00siinter: TFloatField
FieldName = 'siinter'
end
object RMD00lycycpints: TFloatField
FieldName = 'lycycpints'
end
object RMD00lycypsints: TFloatField
FieldName = 'lycypsints'
end
end
object RMD: TRxMemoryData
FieldDefs = <>
Left = 440
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 Add_Record: TRxMemoryData
FieldDefs = <>
Left = 472
Top = 8
object StringField1: TStringField
FieldName = 'iscode'
end
object StringField2: TStringField
FieldName = 'psname'
end
object IntegerField1: TIntegerField
FieldName = 'psseno'
end
object IntegerField2: TIntegerField
FieldName = 'yearno'
end
object FloatField1: TFloatField
FieldName = 'cpsum'
end
object IntegerField3: TIntegerField
FieldName = 'cymonths'
end
object FloatField2: TFloatField
FieldName = 'cypj'
end
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -