?? xspj.dfm
字號:
object Frmxspj: TFrmxspj
Left = 5
Top = 106
BorderIcons = [biSystemMenu]
BorderStyle = bsSingle
Caption = '銷售票據查詢'
ClientHeight = 375
ClientWidth = 775
Color = clBtnFace
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋體'
Font.Style = []
OldCreateOrder = False
Position = poDesktopCenter
OnClose = FormClose
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 12
object SpeedButton2: TSpeedButton
Left = 264
Top = 40
Width = 23
Height = 22
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
3333333333FFFFF3333333333F797F3333333333F737373FF333333BFB999BFB
33333337737773773F3333BFBF797FBFB33333733337333373F33BFBFBFBFBFB
FB3337F33333F33337F33FBFBFB9BFBFBF3337333337F333373FFBFBFBF97BFB
FBF37F333337FF33337FBFBFBFB99FBFBFB37F3333377FF3337FFBFBFBFB99FB
FBF37F33333377FF337FBFBF77BF799FBFB37F333FF3377F337FFBFB99FB799B
FBF373F377F3377F33733FBF997F799FBF3337F377FFF77337F33BFBF99999FB
FB33373F37777733373333BFBF999FBFB3333373FF77733F7333333BFBFBFBFB
3333333773FFFF77333333333FBFBF3333333333377777333333}
NumGlyphs = 2
OnClick = SpeedButton2Click
end
object Shape1: TShape
Left = 137
Top = 349
Width = 636
Height = 25
end
object Label1: TLabel
Left = 152
Top = 357
Width = 54
Height = 12
Caption = '客戶名稱:'
Color = clHighlightText
ParentColor = False
end
object Label_khmc: TLabel
Left = 208
Top = 357
Width = 6
Height = 12
Color = clHighlightText
ParentColor = False
end
object Label5: TLabel
Left = 376
Top = 357
Width = 42
Height = 12
Caption = '業務員:'
Color = clHighlightText
ParentColor = False
end
object Label_ywy: TLabel
Left = 424
Top = 357
Width = 6
Height = 12
Color = clHighlightText
ParentColor = False
end
object Label7: TLabel
Left = 504
Top = 357
Width = 54
Height = 12
Caption = '開票日期:'
Color = clHighlightText
ParentColor = False
end
object Label_kprq: TLabel
Left = 560
Top = 357
Width = 6
Height = 12
Color = clHighlightText
ParentColor = False
end
object Label9: TLabel
Left = 648
Top = 357
Width = 42
Height = 12
Caption = '經手人:'
Color = clHighlightText
ParentColor = False
end
object Label_czy: TLabel
Left = 696
Top = 357
Width = 6
Height = 12
Color = clHighlightText
ParentColor = False
end
object Label6: TLabel
Left = 304
Top = 44
Width = 48
Height = 12
Caption = '物品編碼'
end
object Panel1: TPanel
Left = 0
Top = 0
Width = 775
Height = 36
Align = alTop
BevelInner = bvRaised
BevelOuter = bvLowered
TabOrder = 6
object Label3: TLabel
Left = 12
Top = 11
Width = 48
Height = 12
Caption = '起始日期'
end
object Label4: TLabel
Left = 189
Top = 11
Width = 48
Height = 12
Caption = '終止日期'
end
object Label2: TLabel
Left = 376
Top = 13
Width = 48
Height = 12
Caption = '客戶名稱'
end
object SpeedButton1: TSpeedButton
Left = 632
Top = 7
Width = 23
Height = 22
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
3333333333FFFFF3333333333F797F3333333333F737373FF333333BFB999BFB
33333337737773773F3333BFBF797FBFB33333733337333373F33BFBFBFBFBFB
FB3337F33333F33337F33FBFBFB9BFBFBF3337333337F333373FFBFBFBF97BFB
FBF37F333337FF33337FBFBFBFB99FBFBFB37F3333377FF3337FFBFBFBFB99FB
FBF37F33333377FF337FBFBF77BF799FBFB37F333FF3377F337FFBFB99FB799B
FBF373F377F3377F33733FBF997F799FBF3337F377FFF77337F33BFBF99999FB
FB33373F37777733373333BFBF999FBFB3333373FF77733F7333333BFBFBFBFB
3333333773FFFF77333333333FBFBF3333333333377777333333}
NumGlyphs = 2
OnClick = SpeedButton1Click
end
object DateTimePicker1: TDateTimePicker
Left = 64
Top = 8
Width = 121
Height = 20
CalAlignment = dtaLeft
CalColors.BackColor = 100
CalColors.TitleBackColor = 100
Date = 37068.4814587963
Time = 37068.4814587963
DateFormat = dfLong
DateMode = dmComboBox
Kind = dtkDate
ParseInput = False
TabOrder = 2
end
object DateTimePicker2: TDateTimePicker
Left = 247
Top = 8
Width = 122
Height = 20
CalAlignment = dtaLeft
CalColors.BackColor = 100
CalColors.TitleBackColor = 100
Date = 37068.4814587963
Time = 37068.4814587963
DateFormat = dfLong
DateMode = dmComboBox
Kind = dtkDate
ParseInput = False
TabOrder = 3
end
object BitBtn3: TBitBtn
Left = 672
Top = 6
Width = 89
Height = 25
Caption = '顯示票據'
TabOrder = 1
OnClick = BitBtn3Click
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000130B0000130B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0033333333B333
333B33F333337F3333373B33333BB33333B337FF33377F33337F3BB3333BB333
3BB3377FF3377F33377333BB777BB777BB333377FFF77FFF7733330000000000
B3333377777777777333330FFFFFFFF03333337F3FF3FFF7F333330F00F000F0
33333F7F77377737FFFFBB0FFF8FFFF0BBB3777F3F33FFF7777F3B0F08700000
000B377F73F7777777773308880FFFFFF033337F377333333733330807FFFFF8
033333737FFFFFFF7F33333000000000B3333337777777777FF333BB333BB333
BB33337733377F3377FF3BB3333BB3333BB3377333377F33377F3B33333BB333
33B33733333773333373B333333B3333333B7333333733333337}
NumGlyphs = 2
end
object Edit_khmc: TEdit
Left = 432
Top = 9
Width = 201
Height = 20
TabOrder = 0
end
end
object ListBox1: TListBox
Left = 5
Top = 64
Width = 121
Height = 305
ItemHeight = 12
TabOrder = 0
OnClick = ListBox1Click
end
object DBGrid1: TDBGrid
Left = 135
Top = 68
Width = 634
Height = 278
DataSource = DataSource_xs
Options = [dgTitles, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
ReadOnly = True
TabOrder = 4
TitleFont.Charset = GB2312_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -12
TitleFont.Name = '宋體'
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = 'pm'
Title.Caption = '藥品名稱'
Visible = True
end
item
Expanded = False
FieldName = 'cd'
Title.Caption = '產地'
Visible = True
end
item
Expanded = False
FieldName = 'gg'
Title.Caption = '規格'
Visible = True
end
item
Expanded = False
FieldName = 'dw'
Title.Caption = '單位'
Visible = True
end
item
Expanded = False
FieldName = 'jj'
Title.Caption = '進價'
Visible = True
end
item
Expanded = False
FieldName = 'dj'
Title.Caption = '單價'
Visible = True
end
item
Expanded = False
FieldName = 'sl'
Title.Caption = '數量'
Visible = True
end
item
Expanded = False
FieldName = 'je'
Title.Caption = '銷售金額'
Visible = True
end
item
Expanded = False
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -