?? transfer.dfm
字號:
object TransferForm: TTransferForm
Left = 192
Top = 107
AutoScroll = False
BorderIcons = []
Caption = ' Nota Transfer Inventory ( Item Penjualan ) '
ClientHeight = 468
ClientWidth = 777
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
FormStyle = fsMDIChild
OldCreateOrder = False
Position = poDefault
Visible = True
PixelsPerInch = 96
TextHeight = 13
object GroupBox1: TGroupBox
Left = 8
Top = 0
Width = 313
Height = 97
Caption = ' Gudang Pengirim '
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Dina'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 0
object SplEdit: TJvDBComboEdit
Left = 8
Top = 16
Width = 65
Height = 23
BeepOnError = False
CharCase = ecUpperCase
ClickKey = 112
DataField = 'SPLCODE'
DataSource = dsPurc
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'Dina'
Font.Style = []
ImageKind = ikEllipsis
ParentFont = False
ParentShowHint = False
ShowHint = False
TabOrder = 0
ClipboardCommands = []
end
object Memo1: TMemo
Left = 80
Top = 16
Width = 225
Height = 73
TabStop = False
Color = clBtnFace
Ctl3D = False
Font.Charset = ANSI_CHARSET
Font.Color = clNavy
Font.Height = -12
Font.Name = 'Dina'
Font.Style = []
ParentCtl3D = False
ParentFont = False
ReadOnly = True
ScrollBars = ssVertical
TabOrder = 1
end
end
object GroupBox2: TGroupBox
Left = 328
Top = 0
Width = 441
Height = 97
Caption = ' Nota '
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Dina'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 1
object SJNOEDIT: TDBEdit
Left = 208
Top = 10
Width = 121
Height = 23
TabStop = False
AutoSize = False
BevelInner = bvLowered
BevelOuter = bvRaised
BevelKind = bkFlat
CharCase = ecUpperCase
Color = clBtnFace
Ctl3D = True
DataField = 'TRNO'
DataSource = dsPurc
Font.Charset = ANSI_CHARSET
Font.Color = clBlue
Font.Height = -13
Font.Name = 'Dina'
Font.Style = [fsBold]
ParentCtl3D = False
ParentFont = False
ReadOnly = True
TabOrder = 0
end
object SJDateEdit: TJvDBDateEdit
Left = 336
Top = 10
Width = 97
Height = 23
TabStop = False
BeepOnError = False
DataField = 'TRDATE'
DataSource = dsPurc
ReadOnly = True
ClickKey = 112
DefaultToday = True
DialogTitle = 'Tgl Nota'
BiDiMode = bdRightToLeft
ParentBiDiMode = False
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'Dina'
Font.Style = []
ParentFont = False
PopupColor = 55807
YearDigits = dyFour
TabOrder = 1
ClipboardCommands = []
end
object JvStaticText6: TJvStaticText
Left = 8
Top = 14
Width = 161
Height = 20
Alignment = taCenter
AutoSize = False
BevelKind = bkFlat
Caption = 'Gudang Penerima :'
Color = clBtnFace
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Dina'
Font.Style = [fsBold]
HotTrackFont.Charset = ANSI_CHARSET
HotTrackFont.Color = clWindowText
HotTrackFont.Height = -13
HotTrackFont.Name = 'Dina'
HotTrackFont.Style = []
Layout = tlCenter
ParentColor = False
ParentFont = False
TabOrder = 2
TextMargins.X = 5
TextMargins.Y = 0
WordWrap = False
end
object DBEdit2: TDBEdit
Left = 244
Top = 67
Width = 185
Height = 20
TabStop = False
AutoSize = False
CharCase = ecUpperCase
Color = 16119285
Ctl3D = True
DataField = 'SJNO'
DataSource = dsPurc
Font.Charset = ANSI_CHARSET
Font.Color = clNavy
Font.Height = -12
Font.Name = 'Dina'
Font.Style = []
ParentCtl3D = False
ParentFont = False
TabOrder = 3
end
end
object GroupBox3: TGroupBox
Left = 8
Top = 100
Width = 761
Height = 273
Color = 12961221
ParentColor = False
TabOrder = 2
object LineGrid: TJvDBUltimGrid
Left = 2
Top = 15
Width = 757
Height = 256
Align = alClient
BorderStyle = bsNone
Color = 16119285
Ctl3D = False
DataSource = LineSource
FixedColor = 14408667
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Dina'
Font.Style = []
Options = [dgEditing, dgTitles, dgIndicator, dgRowLines, dgCancelOnExit]
ParentCtl3D = False
ParentFont = False
ParentShowHint = False
ShowHint = True
TabOrder = 0
TitleFont.Charset = ANSI_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -13
TitleFont.Name = 'Dina'
TitleFont.Style = [fsBold]
AutoAppend = False
AutoSort = False
FixedCols = 1
TitleButtons = True
PostOnEnterKey = True
TitleArrow = True
ShowCellHint = True
SelectColumnsDialogStrings.Caption = 'Select columns'
SelectColumnsDialogStrings.RealNamesOption = '[With the real field name]'
SelectColumnsDialogStrings.OK = '&OK'
SelectColumnsDialogStrings.NoSelectionWarning = 'At least one column must be visible!'
EditControls = <
item
ControlName = 'dbneD1'
FieldName = 'DISC_1'
FitCell = fcBiggest
end
item
ControlName = 'dbneD2'
FieldName = 'DISC_2'
FitCell = fcBiggest
end
item
ControlName = 'dbneQTY'
FieldName = 'QTY'
FitCell = fcBiggest
end
item
ControlName = 'LkSat'
FieldName = 'SAT'
FitCell = fcCellSize
end
item
ControlName = 'dbnePrice'
FieldName = 'PRICE'
FitCell = fcBiggest
LeaveOnEnterKey = True
?? 快捷鍵說明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -