?? ppbs_un.dfm
字號:
inherited ppbs_frm: Tppbs_frm
Left = 109
Top = 48
Caption = #30424#24179#25253#25439
PixelsPerInch = 96
TextHeight = 13
inherited bsSkinPanel1: TbsSkinPanel
inherited bsSkinDBGrid1: TbsSkinDBGrid
Columns = <
item
Expanded = False
FieldName = 'fbsid'
Title.Caption = #25253#25439#27969#27700#21495
Width = 80
Visible = True
end
item
Expanded = False
FieldName = 'fno'
Title.Caption = #25163#26426#20018#21495
Visible = True
end
item
Expanded = False
FieldName = 'fsjxh'
Title.Caption = #25163#26426#22411#21495
Width = 80
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 = 60
Visible = True
end
item
Expanded = False
FieldName = 'fbsdate'
Title.Caption = #25253#25439#26085#26399
Width = 65
Visible = True
end
item
Expanded = False
FieldName = 'fbsmemo'
Title.Caption = #36864#24211#21407#22240
Width = 100
Visible = True
end>
end
inherited bsSkinPanel3: TbsSkinPanel
inherited bsSkinPanel2: TbsSkinPanel
inherited bsSkinDBText: TbsSkinDBText
Width = 7
Caption = ''
end
end
end
inherited bsSkinScrollBar3: TbsSkinScrollBar
Visible = True
PageSize = 3
Max = 5
end
inherited bsSkinScrollBar4: TbsSkinScrollBar
Both = True
end
end
inherited bsSkinPanel4: TbsSkinPanel
inherited bsSkinDBGrid2: TbsSkinDBGrid
Columns = <
item
Expanded = False
FieldName = 'fbsfhid'
Title.Caption = #30424#24179#27969#27700#21495
Width = 80
Visible = True
end
item
Expanded = False
FieldName = 'fno'
Title.Caption = #21407#25163#26426#20018#21495
Width = 100
Visible = True
end
item
Expanded = False
FieldName = 'fsjxh'
Title.Caption = #21407#25163#26426#22411#21495
Width = 80
Visible = True
end
item
Expanded = False
FieldName = 'fcolor'
Title.Caption = #21407#39068#33394
Width = 30
Visible = True
end
item
Expanded = False
FieldName = 'fjbpz'
Title.Caption = #21407#22522#26412#37197#32622
Width = 60
Visible = True
end
item
Expanded = False
FieldName = 'fbsfhdate'
Title.Caption = #30424#24179#26085#26399
Width = 50
Visible = True
end
item
Expanded = False
FieldName = 'fcmon'
Title.Caption = #30424#24179#24046#20215
Width = 50
Visible = True
end>
end
inherited bsSkinPanel5: TbsSkinPanel
inherited bsSkinPanel6: TbsSkinPanel
inherited bsSkinDBText1: TbsSkinDBText
DataField = 'fbsfhid'
DataSource = ds_bottom
end
end
end
end
inherited bsSkinPanel8: TbsSkinPanel
inherited bsSkinPanel9: TbsSkinPanel
object bsSkinStdLabel3: TbsSkinStdLabel
Left = 136
Top = 48
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 = #36864#24211#20570#20215#65306
end
object bsSkinStdLabel4: TbsSkinStdLabel
Left = 122
Top = 77
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 = #19982#36827#20215#24046#21035#65306
end
object bsSkinStdLabel5: TbsSkinStdLabel
Left = 136
Top = 21
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 = #26426#23376#21407#20215#65306
end
object bsSkinEdit3: TbsSkinEdit
Left = 216
Top = 72
Width = 121
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
SkinData = bsSkinData1
SkinDataName = 'edit'
Font.Charset = DEFAULT_CHARSET
Font.Color = clGrayText
Font.Height = 14
Font.Name = 'Arial'
Font.Style = []
Enabled = False
ParentFont = False
TabOrder = 0
end
object bsSkinNumericEdit1: TbsSkinNumericEdit
Left = 216
Top = 43
Width = 120
Height = 20
Text = '0'
ValueType = vtInteger
DefaultFont.Charset = DEFAULT_CHARSET
DefaultFont.Color = clWindowText
DefaultFont.Height = 14
DefaultFont.Name = 'Arial'
DefaultFont.Style = []
DefaultWidth = 0
DefaultHeight = 20
ButtonMode = False
SkinDataName = 'edit'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = 14
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
TabOrder = 1
OnChange = bsSkinNumericEdit1Change
end
object bsSkinMemo1: TbsSkinMemo
Left = 352
Top = 8
Width = 161
Height = 97
BiDiMode = bdLeftToRight
BorderStyle = bsNone
Color = clInactiveBorder
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -17
Font.Name = #23435#20307
Font.Style = []
Lines.Strings = (
'bsSkinMemo1')
ParentBiDiMode = False
ParentFont = False
TabOrder = 2
DefaultFont.Charset = DEFAULT_CHARSET
DefaultFont.Color = clWindowText
DefaultFont.Height = 14
DefaultFont.Name = 'Arial'
DefaultFont.Style = []
UseSkinFont = True
BitMapBG = False
SkinData = bsSkinData1
SkinDataName = 'memo'
end
object bsdb_1: TbsSkinEdit
Left = 216
Top = 16
Width = 121
Height = 20
Text = 'bsdb_1'
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 = clGrayText
Font.Height = 14
Font.Name = 'Arial'
Font.Style = []
Enabled = False
ParentFont = False
TabOrder = 3
end
end
end
inherited bsBusinessSkinForm1: TbsBusinessSkinForm
Left = 400
Top = 80
end
inherited bsSkinData1: TbsSkinData
Left = 440
Top = 80
end
inherited sp_top: TADOStoredProc
Active = True
ProcedureName = 'pViewBBsSj;1'
end
inherited sp_bottom: TADOStoredProc
ProcedureName = 'pViewAllBPpSj;1'
Left = 338
end
object sp_save: TADOStoredProc
Connection = dm.ADOConnection1
ProcedureName = 'pPpbs;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 = '@bsid'
Attributes = [paNullable]
DataType = ftString
Size = 12
Value = Null
end
item
Name = '@date'
Attributes = [paNullable]
DataType = ftDateTime
Value = Null
end
item
Name = '@cmon'
Attributes = [paNullable]
DataType = ftBCD
Precision = 19
Value = Null
end
item
Name = '@omon'
Attributes = [paNullable]
DataType = ftBCD
Precision = 19
Value = Null
end
item
Name = '@bsfhid'
Attributes = [paNullable]
DataType = ftString
Size = 12
Value = Null
end
item
Name = '@OutNumber'
Attributes = [paNullable]
DataType = ftString
Direction = pdInputOutput
Size = 12
Value = Null
end>
Left = 401
Top = 219
end
end
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -