?? hrxx_un.dfm
字號:
inherited hrxx_frm: Thrxx_frm
Left = 139
Top = 22
Caption = #25163#26426#20018#21495#34917#24405
ClientHeight = 414
ClientWidth = 519
PixelsPerInch = 96
TextHeight = 13
inherited bsSkinPanel2: TbsSkinPanel
Width = 519
Height = 414
inherited bsSkinToolBar2: TbsSkinToolBar
Width = 517
end
inherited bsSkinGroupBox1: TbsSkinGroupBox
Width = 517
object bsSkinStdLabel7: TbsSkinStdLabel
Left = 74
Top = 54
Width = 72
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'
Caption = #36827#36135#27969#27700#21495#65306
Visible = False
end
object bsSkinStdLabel6: TbsSkinStdLabel
Left = 146
Top = 70
Width = 60
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'
Caption = #25163#26426#20018#21495#65306
end
object bsSkinStdLabel3: TbsSkinStdLabel
Left = 146
Top = 102
Width = 60
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'
Caption = #25163#26426#39068#33394#65306
end
object bsSkinStdLabel4: TbsSkinStdLabel
Left = 130
Top = 46
Width = 72
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'
Caption = #20837#24211#27969#27700#21495#65306
end
object bsSkinDBText2: TbsSkinDBText
Tag = 5
Left = 226
Top = 42
Width = 97
Height = 17
UseSkinFont = True
DefaultFont.Charset = DEFAULT_CHARSET
DefaultFont.Color = clRed
DefaultFont.Height = -11
DefaultFont.Name = 'MS Sans Serif'
DefaultFont.Style = []
SkinData = bsSkinData1
SkinDataName = 'stdlabel'
Font.Charset = DEFAULT_CHARSET
Font.Color = clRed
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
Caption = 'bsSkinDBText2'
ParentFont = False
ShowAccelChar = False
DataField = 'fid'
DataSource = ds_disp
Transparent = True
end
object bsSkinStdLabel5: TbsSkinStdLabel
Tag = 6
Left = 226
Top = 46
Width = 78
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 = clRed
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
Caption = #36827#36135#27969#27700#21495#65306
ParentFont = False
end
object bsSkinDBText1: TbsSkinStdLabel
Left = 74
Top = 38
Width = 72
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'
Caption = #36827#36135#27969#27700#21495#65306
Visible = False
end
object bsSkinDBEdit1: TbsSkinDBEdit
Tag = 5
Left = 226
Top = 63
Width = 127
Height = 20
Text = 'bsSkinDBEdit1'
DefaultFont.Charset = DEFAULT_CHARSET
DefaultFont.Color = clWindowText
DefaultFont.Height = 14
DefaultFont.Name = 'Arial'
DefaultFont.Style = []
UseSkinFont = True
DefaultWidth = 0
DefaultHeight = 20
ButtonMode = False
SkinData = bsSkinData1
SkinDataName = 'edit'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = 14
Font.Name = 'Arial'
Font.Style = []
MaxLength = 16
ParentFont = False
TabOrder = 0
AutoSize = False
DataField = 'fno'
DataSource = ds_disp
end
object bsSkinDBLookupComboBox2: TbsSkinDBLookupComboBox
Tag = 5
Left = 226
Top = 95
Width = 79
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
DataField = 'fcolorid'
DataSource = ds_disp
ListBoxDefaultItemHeight = 20
ListBoxUseSkinFont = True
ListBoxUseSkinItemHeight = True
KeyField = 'fid'
ListField = 'fcolor'
ListSource = ds_color
end
object bsSkinDBLookupComboBox1: TbsSkinDBLookupComboBox
Tag = 6
Left = 226
Top = 95
Width = 79
Height = 20
TabOrder = 2
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 = 'fcolor'
ListSource = ds_color
end
object bsSkinEdit2: TbsSkinEdit
Tag = 6
Left = 226
Top = 63
Width = 129
Height = 20
Text = 'bsSkinEdit2'
DefaultFont.Charset = DEFAULT_CHARSET
DefaultFont.Color = clWindowText
DefaultFont.Height = 14
DefaultFont.Name = 'Arial'
DefaultFont.Style = []
UseSkinFont = True
DefaultWidth = 0
DefaultHeight = 20
ButtonMode = False
SkinDataName = 'edit'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = 14
Font.Name = 'Arial'
Font.Style = []
MaxLength = 16
ParentFont = False
TabOrder = 3
end
end
inherited bsSkinGroupBox2: TbsSkinGroupBox
Width = 517
Height = 237
inherited bsSkinDBGrid2: TbsSkinDBGrid
Width = 496
Height = 194
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 = 'fno'
Title.Caption = #25163#26426#20018#21495
Width = 80
Visible = True
end
item
Expanded = False
FieldName = 'fsjxh'
Title.Caption = #25163#26426#22411#21495
Width = 55
Visible = True
end
item
Expanded = False
FieldName = 'fcolor'
Title.Caption = #39068#33394
Width = 30
Visible = True
end
item
Expanded = False
FieldName = 'fjbpz'
Title.Caption = #22522#26412#37197#32622
Width = 55
Visible = True
end
item
Expanded = False
FieldName = 'fhylx'
Title.Caption = #36135#28304#31867#22411
Width = 55
Visible = True
end
item
Expanded = False
FieldName = 'fhyd'
Title.Caption = #36135#28304#22320
Width = 50
Visible = True
end
item
Expanded = False
FieldName = 'fdate'
Title.Caption = #36827#36135#26085#26399
Width = 50
Visible = True
end>
end
inherited bsSkinScrollBar4: TbsSkinScrollBar
Top = 217
Width = 515
end
inherited bsSkinScrollBar3: TbsSkinScrollBar
Left = 497
Height = 194
end
end
end
inherited bsBusinessSkinForm1: TbsBusinessSkinForm
Left = 376
end
inherited bsBusinessSkinForm2: TbsBusinessSkinForm
Left = 248
Top = 24
end
inherited bsSkinData2: TbsSkinData
Left = 296
Top = 16
end
inherited ALToolbar: TActionList
Left = 56
Top = 16
end
inherited spsave: TADOStoredProc
ProcedureName = 'pSJNobl;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 = '@vhrcid'
Attributes = [paNullable]
DataType = ftString
Size = 12
Value = Null
end
item
Name = '@vid'
Attributes = [paNullable]
DataType = ftString
Size = 12
Value = Null
end
item
Name = '@no'
Attributes = [paNullable]
DataType = ftString
Size = 16
Value = Null
end
item
Name = '@color'
Attributes = [paNullable]
DataType = ftString
Size = 4
Value = Null
end
item
Name = '@mon'
Attributes = [paNullable]
DataType = ftBCD
Precision = 19
Value = Null
end>
Left = 200
Top = 24
end
inherited spdisp: TADOStoredProc
ProcedureName = 'pViewAllNoSaleSjhrxxid;1'
Parameters = <
item
Name = '@RETURN_VALUE'
DataType = ftInteger
Direction = pdReturnValue
Precision = 10
Value = Null
end
item
Name = '@hrcid'
Attributes = [paNullable]
DataType = ftString
Size = 12
Value = Null
end>
end
object sp_count: TADOStoredProc
Connection = dm.ADOConnection1
ProcedureName = 'pSjchrcDetail;1'
Parameters = <
item
Name = '@RETURN_VALUE'
DataType = ftInteger
Direction = pdReturnValue
Precision = 10
Value = Null
end
item
Name = '@hrcid'
Attributes = [paNullable]
DataType = ftString
Size = 12
Value = Null
end
item
Name = '@an'
Attributes = [paNullable]
DataType = ftInteger
Direction = pdInputOutput
Precision = 10
Value = Null
end>
Left = 336
Top = 216
end
object tbl_color: TADOTable
Connection = dm.ADOConnection1
TableName = 'tcolor'
Left = 481
Top = 2
end
object ds_color: TDataSource
DataSet = tbl_color
Left = 513
Top = 26
end
end
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -