?? jm_yyypptp.dfm
字號:
inherited frm_YYYPPTP: Tfrm_YYYPPTP
Left = 106
Top = 34
Caption = '郵資票品管理信息系統(tǒng)——通信票業(yè)務(wù)'
ClientHeight = 470
OldCreateOrder = True
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 12
object Label8: TLabel
Left = 419
Top = 139
Width = 48
Height = 12
Caption = '開單日期'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋體'
Font.Style = []
ParentFont = False
end
object ModiPanel1: TModiPanel
Left = 0
Top = 439
Width = 692
Height = 31
Align = alBottom
BevelOuter = bvLowered
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋體'
Font.Style = []
ParentFont = False
TabOrder = 0
BtnWidth = 75
OnBtnClick = ModiPanel1BtnClick
end
object Panel4: TPanel
Left = 0
Top = 0
Width = 692
Height = 45
Align = alTop
BevelInner = bvLowered
BevelOuter = bvNone
TabOrder = 1
object XttxTitle: TRxLabel
Left = 1
Top = 1
Width = 690
Height = 24
Align = alTop
Alignment = taCenter
Caption = '營業(yè)員票品調(diào)配'
Font.Charset = GB2312_CHARSET
Font.Color = clGreen
Font.Height = -24
Font.Name = '楷體_GB2312'
Font.Style = [fsBold, fsUnderline]
ParentFont = False
end
object DWMC: TLabel
Left = 12
Top = 27
Width = 66
Height = 12
Caption = ' 使用單位：'
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -12
Font.Name = '宋體'
Font.Style = []
ParentFont = False
end
end
object Panel3: TPanel
Left = 0
Top = 45
Width = 692
Height = 394
Align = alClient
BevelOuter = bvLowered
Caption = 'Panel3'
TabOrder = 2
object Rgp_ppfl: TRadioGroup
Left = 1
Top = 1
Width = 690
Height = 41
Align = alTop
Caption = '營業(yè)員票品分類'
Columns = 5
ItemIndex = 0
Items.Strings = (
'集郵票'
'集郵品'
'購入票')
TabOrder = 0
OnClick = Rgp_ppflClick
end
object Panel2: TPanel
Left = 162
Top = 42
Width = 529
Height = 351
Align = alClient
BevelInner = bvLowered
BevelOuter = bvNone
TabOrder = 1
object Label3: TLabel
Left = 281
Top = 11
Width = 48
Height = 12
Caption = '開單日期'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋體'
Font.Style = []
ParentFont = False
end
object Label1: TLabel
Left = 41
Top = 11
Width = 36
Height = 12
Caption = '操作者'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋體'
Font.Style = []
ParentFont = False
end
object Label6: TLabel
Left = 17
Top = 37
Width = 60
Height = 12
Caption = '票品調(diào)出者'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋體'
Font.Style = []
ParentFont = False
end
object Label7: TLabel
Left = 17
Top = 62
Width = 60
Height = 12
Caption = '票品調(diào)入者'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋體'
Font.Style = []
ParentFont = False
end
object Label9: TLabel
Left = 257
Top = 38
Width = 72
Height = 12
Caption = '調(diào)出復(fù)核日期'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋體'
Font.Style = []
ParentFont = False
end
object Label10: TLabel
Left = 257
Top = 63
Width = 72
Height = 12
Caption = '調(diào)入復(fù)核日期'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋體'
Font.Style = []
ParentFont = False
end
object DBGrid3: TDBGrid
Left = 1
Top = 84
Width = 527
Height = 266
Align = alBottom
DataSource = DataSource4
FixedColor = clMenu
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋體'
Font.Style = []
ImeName = '中文 (簡體) - 全拼'
Options = [dgEditing, dgTitles, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgConfirmDelete, dgCancelOnExit]
ParentFont = False
PopupMenu = data.pm_Export
TabOrder = 0
TitleFont.Charset = GB2312_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -12
TitleFont.Name = '宋體'
TitleFont.Style = []
Columns = <
item
Color = 16777185
Expanded = False
FieldName = 'ZH'
ReadOnly = True
Title.Caption = '志號'
Width = 68
Visible = True
end
item
Color = 16777185
Expanded = False
FieldName = 'PPMC'
ReadOnly = True
Title.Caption = '名稱'
Width = 130
Visible = True
end
item
Color = 16777185
Expanded = False
FieldName = 'JJ'
PickList.Strings = (
'')
Title.Caption = '進價(元)'
Width = 97
Visible = True
end
item
Color = 16777185
Expanded = False
FieldName = 'DJ'
Title.Caption = '銷價(元)'
Visible = True
end
item
Color = 16777185
Expanded = False
FieldName = 'SL'
Title.Caption = '數(shù)量'
Width = 85
Visible = True
end
item
Color = 16777185
Expanded = False
FieldName = 'LYKC'
Title.Caption = '調(diào)出者庫存'
Visible = True
end>
end
object DBEdit1: TDBEdit
Left = 88
Top = 8
Width = 147
Height = 20
Color = clMenu
DataField = 'CZYXM'
DataSource = DataSource2
ReadOnly = True
TabOrder = 1
end
object ComboBox1: TComboBox
Left = 87
Top = 32
Width = 150
Height = 20
ItemHeight = 12
TabOrder = 2
end
object ComboBox2: TComboBox
Left = 87
Top = 56
Width = 150
Height = 20
ItemHeight = 12
TabOrder = 3
end
object DBDateEdit1: TDBDateEdit
Left = 343
Top = 8
Width = 151
Height = 21
DataField = 'RQ'
DataSource = DataSource2
ReadOnly = True
NumGlyphs = 2
TabOrder = 4
YearDigits = dyFour
end
object DBDateEdit2: TDBDateEdit
Left = 343
Top = 34
Width = 151
Height = 21
DataField = 'TCFH'
DataSource = DataSource2
ReadOnly = True
NumGlyphs = 2
TabOrder = 5
YearDigits = dyFour
end
object DBDateEdit3: TDBDateEdit
Left = 343
Top = 60
Width = 151
Height = 21
DataField = 'TRFH'
DataSource = DataSource2
ReadOnly = True
NumGlyphs = 2
TabOrder = 6
YearDigits = dyFour
end
end
object Panel1: TPanel
Left = 1
Top = 42
Width = 161
Height = 351
Align = alLeft
BevelOuter = bvNone
TabOrder = 2
object DBGrid2: TDBGrid
Left = 0
Top = 32
Width = 161
Height = 319
Align = alBottom
DataSource = DataSource2
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = '宋體'
Font.Style = []
ImeName = '中文 (簡體) - 全拼'
Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
ParentFont = False
PopupMenu = data.pm_Export
TabOrder = 0
TitleFont.Charset = GB2312_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -14
TitleFont.Name = '宋體'
TitleFont.Style = []
OnDrawColumnCell = DBGrid2DrawColumnCell
Columns = <
item
Expanded = False
FieldName = 'DH'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋體'
Font.Style = []
Title.Caption = '調(diào)配單號'
Title.Font.Charset = GB2312_CHARSET
Title.Font.Color = clWindowText
Title.Font.Height = -12
Title.Font.Name = '宋體'
Title.Font.Style = []
Width = 144
Visible = True
end>
end
object CheckBox1: TCheckBox
Left = 8
Top = 8
Width = 133
Height = 17
Caption = '顯示未復(fù)核的調(diào)配單'
Checked = True
State = cbChecked
TabOrder = 1
OnClick = CheckBox1Click
end
end
end
?? 快捷鍵說明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -