?? pfm_sptuihuodsel.dfm
字號:
object fm_sptuihuodsel: Tfm_sptuihuodsel
Left = 221
Top = 133
BorderStyle = bsDialog
Caption = '商品退貨單'
ClientHeight = 336
ClientWidth = 528
Color = clBtnFace
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = '宋體'
Font.Style = []
OldCreateOrder = False
Position = poDefault
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 13
object GroupBox1: TGroupBox
Left = 0
Top = 0
Width = 528
Height = 141
Align = alTop
TabOrder = 0
object Label6: TLabel
Left = 16
Top = 20
Width = 75
Height = 13
Caption = '商品退貨單'
Font.Charset = GB2312_CHARSET
Font.Color = clMaroon
Font.Height = -13
Font.Name = '幼圓'
Font.Style = [fsBold]
ParentFont = False
end
object Label3: TLabel
Left = 12
Top = 40
Width = 39
Height = 13
Caption = '流水號'
end
object Label2: TLabel
Left = 128
Top = 40
Width = 26
Height = 13
Caption = '日期'
end
object Label21: TLabel
Left = 16
Top = 84
Width = 39
Height = 13
Caption = '經辦人'
end
object Label22: TLabel
Left = 140
Top = 84
Width = 39
Height = 13
Caption = '審核人'
end
object Label20: TLabel
Left = 260
Top = 84
Width = 39
Height = 13
Caption = '操作員'
end
object Edit1: TEdit
Left = 12
Top = 56
Width = 81
Height = 21
Color = clMenu
ReadOnly = True
TabOrder = 0
Text = 'Edit1'
end
object DTPicker1: TDateTimePicker
Left = 128
Top = 56
Width = 121
Height = 21
CalAlignment = dtaLeft
Date = 36684.3729845486
Time = 36684.3729845486
DateFormat = dfLong
DateMode = dmComboBox
Kind = dtkDate
ParseInput = False
TabOrder = 1
end
object Edit2: TEdit
Left = 12
Top = 104
Width = 77
Height = 21
Color = clInfoBk
MaxLength = 10
ReadOnly = True
TabOrder = 2
end
object Edit3: TEdit
Left = 128
Top = 104
Width = 77
Height = 21
Color = clInfoBk
MaxLength = 10
ReadOnly = True
TabOrder = 3
end
object Edit4: TEdit
Left = 260
Top = 104
Width = 81
Height = 21
Color = clSilver
MaxLength = 10
TabOrder = 4
end
object BBtnOK: TBitBtn
Left = 420
Top = 48
Width = 75
Height = 25
Caption = '確定'
TabOrder = 5
OnClick = BBtnOKClick
end
object BBtnCancel: TBitBtn
Left = 420
Top = 80
Width = 75
Height = 25
Caption = '取消'
ModalResult = 2
TabOrder = 6
OnClick = BBtnCancelClick
end
object BBtnjbr: TBitBtn
Left = 92
Top = 104
Width = 25
Height = 25
TabOrder = 7
OnClick = BBtnjbrClick
Glyph.Data = {
7E010000424D7E01000000000000760000002800000018000000160000000100
0400000000000801000000000000000000001000000000000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00800000000000
0000000000080777777777777777777777700F77777777777777777777700F88
888888888888888887700F88888888888888888887700F888888800000000888
87700F88888880FFFFFF088887700F8888880FFFFFFFF08887700F888880FFFF
FFFFF08887700F888880FFFFFFFFF08887700F88880FF0FFFFFFF08887700F88
80FF00F0F0F0F08887700F88800080F0F0F0F08887700F88888880F0F0F0F088
87700F88888880F0F0F0F08887700F88888880F0F0F0088887700F88888880F0
F0F0888887700F8888888800F008888887700F88888888800888888887700F88
888888888888888887700FFFFFFFFFFFFFFFFFFFFF7080000000000000000000
0008}
Layout = blGlyphBottom
end
object BBtnshr: TBitBtn
Left = 212
Top = 104
Width = 25
Height = 25
TabOrder = 8
OnClick = BBtnshrClick
Glyph.Data = {
7E010000424D7E01000000000000760000002800000018000000160000000100
0400000000000801000000000000000000001000000000000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00800000000000
0000000000080777777777777777777777700F77777777777777777777700F88
888888888888888887700F88888888888888888887700F888888800000000888
87700F88888880FFFFFF088887700F8888880FFFFFFFF08887700F888880FFFF
FFFFF08887700F888880FFFFFFFFF08887700F88880FF0FFFFFFF08887700F88
80FF00F0F0F0F08887700F88800080F0F0F0F08887700F88888880F0F0F0F088
87700F88888880F0F0F0F08887700F88888880F0F0F0088887700F88888880F0
F0F0888887700F8888888800F008888887700F88888888800888888887700F88
888888888888888887700FFFFFFFFFFFFFFFFFFFFF7080000000000000000000
0008}
Layout = blGlyphBottom
end
end
object GroupBox2: TGroupBox
Left = 0
Top = 141
Width = 245
Height = 195
Align = alLeft
Caption = '選擇進貨倉庫'
TabOrder = 1
object ListBox1: TListBox
Left = 2
Top = 15
Width = 241
Height = 178
Align = alClient
ItemHeight = 13
end
end
object GroupBox3: TGroupBox
Left = 245
Top = 141
Width = 283
Height = 195
Align = alClient
Caption = '供應商名稱'
TabOrder = 2
object ListBox2: TListBox
Left = 2
Top = 15
Width = 279
Height = 178
Align = alClient
ItemHeight = 13
TabOrder = 0
end
end
object SProc1: TStoredProc
DatabaseName = 'posdb'
StoredProcName = 'myproc_getlsh;1'
Left = 472
Top = 72
ParamData = <
item
DataType = ftInteger
Name = 'RETURN_VALUE'
ParamType = ptResult
end
item
DataType = ftString
Name = '@chTable'
ParamType = ptInput
end
item
DataType = ftInteger
Name = '@intLsh'
ParamType = ptInputOutput
end>
end
object Query1: TQuery
DatabaseName = 'posdb'
SQL.Strings = (
'')
Left = 472
Top = 104
end
end
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -