📄 fjrc_un.dfm
字号:
Font.Color = clBlack
Font.Height = -13
Font.Name = #26032#23435#20307
Font.Style = []
Caption = #25163#26426#21378#21830#65306
ParentFont = False
end
object bsSkinStdLabel11: TbsSkinStdLabel
Left = 2
Top = 28
Width = 70
Height = 13
UseSkinFont = True
DefaultFont.Charset = DEFAULT_CHARSET
DefaultFont.Color = clWindowText
DefaultFont.Height = -11
DefaultFont.Name = 'MS Sans Serif'
DefaultFont.Style = []
SkinData = bsSkinData1
SkinDataName = 'stdlabel'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -13
Font.Name = #26032#23435#20307
Font.Style = []
Caption = #25163#26426#22411#21495#65306
ParentFont = False
end
object bsSkinDBLookupComboBox10: TbsSkinDBLookupComboBox
Left = 72
Top = 0
Width = 73
Height = 20
TabOrder = 0
SkinData = bsSkinData1
SkinDataName = 'combobox'
DefaultFont.Charset = DEFAULT_CHARSET
DefaultFont.Color = clWindowText
DefaultFont.Height = 14
DefaultFont.Name = 'Arial'
DefaultFont.Style = []
DefaultWidth = 0
DefaultHeight = 20
UseSkinFont = True
ListBoxDefaultItemHeight = 20
ListBoxUseSkinFont = True
ListBoxUseSkinItemHeight = True
KeyField = 'fid'
ListField = 'fna'
ListSource = ds_sjcs
end
object bsSkinDBLookupComboBox11: TbsSkinDBLookupComboBox
Left = 72
Top = 21
Width = 73
Height = 20
TabOrder = 1
SkinData = bsSkinData1
SkinDataName = 'combobox'
DefaultFont.Charset = DEFAULT_CHARSET
DefaultFont.Color = clWindowText
DefaultFont.Height = 14
DefaultFont.Name = 'Arial'
DefaultFont.Style = []
DefaultWidth = 0
DefaultHeight = 20
UseSkinFont = True
ListBoxDefaultItemHeight = 20
ListBoxUseSkinFont = True
ListBoxUseSkinItemHeight = True
KeyField = 'fid'
ListField = 'fmodel'
ListSource = ds_sjxh
end
end
end
object bsSkinDateEdit1: TbsSkinDateEdit
Tag = 6
Left = 328
Top = 152
Width = 113
Height = 20
EditMask = '!0000/99/99;1; '
Text = '2005- 9-17'
AlphaBlend = False
AlphaBlendAnimation = False
AlphaBlendValue = 0
Date = 38612.532994085640000000
TodayDefault = True
CalendarWidth = 200
CalendarHeight = 150
CalendarFont.Charset = DEFAULT_CHARSET
CalendarFont.Color = clWindowText
CalendarFont.Height = 14
CalendarFont.Name = 'Arial'
CalendarFont.Style = []
FirstDayOfWeek = Sun
DefaultFont.Charset = DEFAULT_CHARSET
DefaultFont.Color = clWindowText
DefaultFont.Height = 14
DefaultFont.Name = 'Arial'
DefaultFont.Style = []
DefaultWidth = 0
DefaultHeight = 20
ButtonMode = True
SkinData = bsSkinData1
SkinDataName = 'buttonedit'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = 14
Font.Name = 'Arial'
Font.Style = []
MaxLength = 10
ParentFont = False
TabOrder = 14
end
object bsSkinDBDateEdit1: TbsSkinDBDateEdit
Tag = 5
Left = 328
Top = 152
Width = 113
Height = 20
EditMask = '!0000/99/99;1; '
Text = '2005- 9-17'
AlphaBlend = False
AlphaBlendAnimation = False
AlphaBlendValue = 0
Date = 38612.532994085640000000
TodayDefault = True
CalendarWidth = 300
CalendarHeight = 200
CalendarFont.Charset = DEFAULT_CHARSET
CalendarFont.Color = clWindowText
CalendarFont.Height = 14
CalendarFont.Name = 'Arial'
CalendarFont.Style = []
FirstDayOfWeek = Sun
DefaultFont.Charset = DEFAULT_CHARSET
DefaultFont.Color = clWindowText
DefaultFont.Height = 14
DefaultFont.Name = 'Arial'
DefaultFont.Style = []
DefaultWidth = 0
DefaultHeight = 20
ButtonMode = True
SkinData = bsSkinData1
SkinDataName = 'buttonedit'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = 14
Font.Name = 'Arial'
Font.Style = []
MaxLength = 10
ParentFont = False
TabOrder = 15
AutoSize = False
DataField = 'fdate'
DataSource = ds_disp
end
end
inherited bsSkinGroupBox2: TbsSkinGroupBox
Top = 241
Width = 509
Height = 164
inherited bsSkinDBGrid2: TbsSkinDBGrid
Width = 488
Height = 121
DataSource = ds_disp
Columns = <
item
Expanded = False
FieldName = 'fid'
Title.Caption = #20837#24211#27969#27700#21495
Width = 80
Visible = True
end
item
Expanded = False
FieldName = 'ffjlx'
Title.Caption = #31867#22411
Width = 30
Visible = True
end
item
Expanded = False
FieldName = 'fna'
Title.Caption = #21697#29260
Width = 50
Visible = True
end
item
Expanded = False
FieldName = 'fsyjx'
Title.Caption = #36866#29992#26426#22411
Width = 50
Visible = True
end
item
Expanded = False
FieldName = 'fdate'
Title.Caption = #36827#36135#26085#26399
Width = 60
Visible = True
end
item
Expanded = False
FieldName = 'fmon'
Title.Caption = #21333#20215
Width = 30
Visible = True
end
item
Expanded = False
FieldName = 'fnum'
Title.Caption = #25968#37327
Width = 30
Visible = True
end
item
Expanded = False
FieldName = 'fhydna'
Title.Caption = #36135#28304#22320
Width = 60
Visible = True
end
item
Expanded = False
FieldName = 'fmemo'
Title.Caption = #22791#27880
Width = 100
Visible = True
end>
end
inherited bsSkinScrollBar4: TbsSkinScrollBar
Top = 144
Width = 507
Visible = True
Max = 127
end
inherited bsSkinScrollBar3: TbsSkinScrollBar
Left = 489
Height = 121
PageSize = 4
Max = 7
end
end
end
inherited ALToolbar: TActionList
Left = 64
Top = 32
end
inherited spsave: TADOStoredProc
ProcedureName = 'pSjFjRc;1'
Parameters = <
item
Name = '@RETURN_VALUE'
DataType = ftInteger
Direction = pdReturnValue
Precision = 10
Value = Null
end
item
Name = '@act'
Attributes = [paNullable]
DataType = ftInteger
Precision = 10
Value = Null
end
item
Name = '@vdate'
Attributes = [paNullable]
DataType = ftDateTime
Value = Null
end
item
Name = '@vmon'
Attributes = [paNullable]
DataType = ftBCD
Precision = 19
Value = Null
end
item
Name = '@vhyd'
Attributes = [paNullable]
DataType = ftString
Size = 4
Value = Null
end
item
Name = '@vnum'
Attributes = [paNullable]
DataType = ftInteger
Precision = 10
Value = Null
end
item
Name = '@vmemo'
Attributes = [paNullable]
DataType = ftString
Size = 200
Value = Null
end
item
Name = '@vid'
Attributes = [paNullable]
DataType = ftString
Size = 12
Value = Null
end
item
Name = '@vfjcs'
Attributes = [paNullable]
DataType = ftString
Size = 4
Value = Null
end
item
Name = '@vfjlx'
Attributes = [paNullable]
DataType = ftString
Size = 1
Value = Null
end
item
Name = '@vsjxh'
Attributes = [paNullable]
DataType = ftString
Size = 5
Value = Null
end
item
Name = '@OutNumber'
Attributes = [paNullable]
DataType = ftString
Size = 12
Value = Null
end>
end
inherited spdisp: TADOStoredProc
CursorType = ctStatic
ProcedureName = 'pViewAllFjRc;1'
end
object ds_fjcs: TDataSource
DataSet = tbl_fjcs
Left = 40
Top = 249
end
object tbl_fjcs: TADOTable
Connection = dm.ADOConnection1
TableName = 'tFjcs'
Left = 72
Top = 249
end
object tbl_fjlx: TADOTable
Connection = dm.ADOConnection1
TableName = 'tfjlx'
Left = 64
Top = 305
end
object ds_fjlx: TDataSource
DataSet = tbl_fjlx
Left = 32
Top = 305
end
object ds_hyd: TDataSource
DataSet = tbl_hyd
Left = 32
Top = 337
end
object tbl_hyd: TADOTable
Active = True
Connection = dm.ADOConnection1
CursorType = ctStatic
Filter = 'fid>'#39'HY02'#39
Filtered = True
TableName = 'thyd'
Left = 64
Top = 337
end
object ds_sjcs: TDataSource
DataSet = tbl_sjcs
Left = 376
Top = 57
end
object tbl_sjcs: TADOTable
Active = True
Connection = dm.ADOConnection1
CursorType = ctStatic
TableName = 'tsjcs'
Left = 408
Top = 57
end
object tbl_sjxh: TADOTable
Active = True
Connection = dm.ADOConnection1
CursorType = ctStatic
IndexFieldNames = 'fsjcs'
MasterFields = 'fid'
MasterSource = ds_sjcs
TableName = 'tsjxh'
Left = 440
Top = 57
end
object ds_sjxh: TDataSource
DataSet = tbl_sjxh
Left = 472
Top = 57
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -