📄 personalaccount.~dfm
字号:
object FlatComboBox2: TFlatComboBox
Left = 325
Top = 14
Width = 145
Height = 21
Color = clWindow
ItemHeight = 13
TabOrder = 3
TabStop = False
Visible = False
ItemIndex = -1
end
object FlatComboBox4: TFlatComboBox
Left = 324
Top = 14
Width = 145
Height = 21
Color = clWindow
ItemHeight = 13
TabOrder = 4
TabStop = False
Visible = False
ItemIndex = -1
end
object FlatComboBox5: TFlatComboBox
Left = 64
Top = 13
Width = 145
Height = 21
Color = clWindow
ItemHeight = 13
TabOrder = 5
TabStop = False
Visible = False
ItemIndex = -1
end
object FlatComboBox3: TFlatComboBox
Left = 64
Top = 14
Width = 193
Height = 22
Color = clWindow
DropDownCount = 30
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #23435#20307
Font.Style = []
ItemHeight = 14
ParentFont = False
TabOrder = 0
ItemIndex = -1
OnChange = FlatComboBox3Change
end
end
inherited Panel10: TPanel
Width = 792
TabOrder = 2
inherited Bevel1: TBevel
Width = 792
end
inherited Panel11: TPanel
Left = 770
end
end
inherited ImageList1: TImageList
Left = 272
Top = 0
end
inherited ActionList1: TActionList
Left = 224
Top = 0
end
inherited PopupMenu1: TPopupMenu
Left = 248
Top = 0
end
inherited XPMenu1: TXPMenu
Left = 272
Top = 0
end
object RMD0: TRxMemoryData
FieldDefs = <>
AfterEdit = RMD0AfterEdit
Left = 168
Top = 10
object RMD0iscode: TStringField
FieldName = 'iscode'
end
object RMD0psname: TStringField
FieldName = 'psname'
Size = 10
end
object RMD0cypj: TFloatField
FieldName = 'cypj'
end
object RMD0cyints: TFloatField
FieldName = 'cyints'
end
object RMD0lyrewg: TFloatField
FieldName = 'lyrewg'
end
object RMD0lyints: TFloatField
FieldName = 'lyints'
end
object RMD0prseno: TStringField
FieldName = 'prseno'
end
object RMD0psseno: TIntegerField
FieldName = 'psseno'
end
object RMD0yearno: TIntegerField
FieldName = 'yearno'
end
object RMD0lycpprin: TFloatField
FieldName = 'lycpprin'
end
object RMD0lypsprin: TFloatField
FieldName = 'lypsprin'
end
object RMD0lycpints: TFloatField
FieldName = 'lycpints'
end
object RMD0lypsints: TFloatField
FieldName = 'lypsints'
end
object RMD0cyrewg2: TFloatField
FieldName = 'cyrewg'
end
object RMD0months: TIntegerField
FieldName = 'months'
end
object RMD0cymonths: TIntegerField
FieldName = 'cymonths'
end
object RMD0payidx: TFloatField
FieldName = 'payidx'
end
object RMD0lymonths: TIntegerField
FieldName = 'lymonths'
end
object RMD0lyremonths: TIntegerField
FieldName = 'lyremonths'
end
object RMD0cyarcpfd: TFloatField
FieldName = 'cyarcpfd'
end
object RMD0cyrelycpfd: TFloatField
FieldName = 'cyrelycpfd'
end
object RMD0cyarpsfd: TFloatField
FieldName = 'cyarpsfd'
end
object RMD0cyrelypsfd: TFloatField
FieldName = 'cyrelypsfd'
end
object RMD0cyftcpfd: TFloatField
FieldName = 'cyftcpfd'
end
object RMD0cyrelycpac: TFloatField
FieldName = 'cyrelycpac'
end
object RMD0splycpfd: TFloatField
FieldName = 'splycpfd'
end
object RMD0cycpacmons: TFloatField
FieldName = 'cycpacmons'
end
object RMD0cypsarac: TFloatField
FieldName = 'cypsarac'
end
object RMD0cyrelypsarac: TFloatField
FieldName = 'cyrelypsarac'
end
object RMD0cyrelypsac: TFloatField
FieldName = 'cyrelypsac'
end
object RMD0cypsacmons: TFloatField
FieldName = 'cypsacmons'
end
object RMD0cpcpints: TFloatField
FieldName = 'cpcpints'
end
object RMD0cypsints: TFloatField
FieldName = 'cypsints'
end
object RMD0accpinup: TFloatField
FieldName = 'accpinup'
end
object RMD0accpinupints: TFloatField
FieldName = 'accpinupints'
end
object RMD0acpswginupints: TFloatField
FieldName = 'acpswginupints'
end
object RMD0wgmonup: TFloatField
FieldName = 'wgmonup'
end
object RMD0dbcpfd: TFloatField
FieldName = 'dbcpfd'
end
object RMD0dbpsfd: TFloatField
FieldName = 'dbpsfd'
end
object RMD0cydate: TDateField
FieldName = 'cydate'
end
object RMD0pflag: TStringField
FieldName = 'pflag'
Size = 0
end
object RMD0dbfd: TFloatField
FieldName = 'dbfd'
end
object RMD0wgnotes: TStringField
FieldName = 'wgnotes'
end
object RMD0ftnotes: TStringField
FieldName = 'ftnotes'
end
object RMD0totfd: TFloatField
FieldName = 'totfd'
end
object RMD0totpsfd: TFloatField
FieldName = 'totpsfd'
end
object RMD0lycycpints: TFloatField
FieldName = 'lycycpints'
end
object RMD0lycypsints: TFloatField
FieldName = 'lycypsints'
end
object RMD0notes: TStringField
FieldName = 'notes'
end
object RMD0cyacmons: TIntegerField
FieldName = 'cyacmons'
end
object RMD0psrate: TFloatField
FieldName = 'psrate'
end
object RMD0cprate: TFloatField
FieldName = 'cprate'
end
object RMD0siinter: TFloatField
FieldName = 'siinter'
end
end
object DataSource1: TDataSource
DataSet = RMD
Left = 264
Top = 16
end
object RMD: TRxMemoryData
FieldDefs = <>
Left = 304
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 RMD000: TRxMemoryData
FieldDefs = <>
Left = 168
Top = 8
object RMD000iscode: TStringField
FieldName = 'iscode'
end
object RMD000psname: TStringField
FieldName = 'psname'
end
object RMD000psseno: TIntegerField
FieldName = 'psseno'
end
object RMD000yearno: TIntegerField
FieldName = 'yearno'
end
object RMD000cpsum: TFloatField
FieldName = 'cpsum'
end
object RMD000cymonths: TIntegerField
FieldName = 'cymonths'
end
object RMD000cypj: TFloatField
FieldName = 'cypj'
end
object RMD000cyints: TFloatField
FieldName = 'cyints'
end
object RMD000lysum: TFloatField
FieldName = 'lysum'
end
object RMD000lyints: TFloatField
FieldName = 'lyints'
end
end
object RMD00: TRxMemoryData
FieldDefs = <>
Left = 168
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
object FloatField3: TFloatField
FieldName = 'cyints'
end
object FloatField4: TFloatField
FieldName = 'lysum'
end
object FloatField5: TFloatField
FieldName = 'lyints'
end
object FloatField6: TFloatField
FieldName = 'cyActual'
end
object FloatField7: TFloatField
FieldName = 'cyrely'
end
object FloatField8: TFloatField
FieldName = 'cycpints'
end
object FloatField9: TFloatField
FieldName = 'cypsints'
end
object FloatField10: TFloatField
FieldName = 'lycpints'
end
object FloatField11: TFloatField
FieldName = 'lypsints'
end
object FloatField12: TFloatField
FieldName = 'lycpprin'
end
object FloatField13: TFloatField
FieldName = 'lypsprin'
end
object FloatField14: TFloatField
FieldName = 'cyftcpfd'
end
object FloatField15: TFloatField
FieldName = 'cypsarac'
end
object FloatField16: TFloatField
FieldName = 'cyrelycpfd'
end
object FloatField17: TFloatField
FieldName = 'cyrelypsfd'
end
object FloatField18: TFloatField
FieldName = 'siinter'
end
object FloatField19: TFloatField
FieldName = 'lycycpints'
end
object FloatField20: TFloatField
FieldName = 'lycypsints'
end
end
object ADD_Record: TRxMemoryData
FieldDefs = <>
Left = 336
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
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -