?? syd1.dfm
字號:
Size = 50
end
object ADOTable3bz: TStringField
DisplayLabel = '備注'
FieldName = 'bz'
Size = 200
end
end
object ADOTable4: TADOTable
Active = True
Connection = MainForm.ADOConnection1
CursorType = ctStatic
Filter = 'ywybz=1'
Filtered = True
TableName = 'RYDA'
Left = 416
Top = 184
object StringField1: TStringField
DisplayLabel = '編碼'
FieldName = 'code'
Size = 5
end
object StringField2: TStringField
DisplayLabel = '名稱'
FieldName = 'name'
Size = 200
end
object ADOTable4bm: TStringField
DisplayLabel = '部門'
FieldName = 'bm'
Size = 50
end
object ADOTable4xb: TStringField
DisplayLabel = '性別'
FieldName = 'xb'
Size = 4
end
object ADOTable4csrq: TDateTimeField
DisplayLabel = '出生日期'
FieldName = 'csrq'
end
object ADOTable4dh: TStringField
DisplayLabel = '電話'
FieldName = 'dh'
Size = 50
end
object ADOTable4zz: TStringField
DisplayLabel = '住址'
FieldName = 'zz'
Size = 200
end
end
object dxDBGridLayoutList1: TdxDBGridLayoutList
Left = 336
Top = 184
object dxDBGridLayoutList1Item1: TdxDBGridLayout
Data = {
FD050000545046301054647844424772696457726170706572000542616E6473
0E0100000D44656661756C744C61796F7574091348656164657250616E656C52
6F77436F756E740201084B65794669656C640604636F64650D53756D6D617279
47726F7570730E001053756D6D617279536570617261746F7206022C200C466F
6E742E43686172736574070E4742323331325F434841525345540A466F6E742E
436F6C6F72070C636C57696E646F77546578740B466F6E742E48656967687402
F409466F6E742E4E616D650604CBCECCE50A466F6E742E5374796C650B000A50
6172656E74466F6E74081042616E64466F6E742E43686172736574070F444546
41554C545F434841525345540E42616E64466F6E742E436F6C6F72070C636C57
696E646F77546578740F42616E64466F6E742E48656967687402F50D42616E64
466F6E742E4E616D65060D4D532053616E732053657269660E42616E64466F6E
742E5374796C650B000A44617461536F75726365070F7379642E44617461536F
75726365330D46696C7465722E416374697665090F46696C7465722E43726974
657269610A04000000000000000D477269644C696E65436F6C6F720706636C4E
61767912486561646572466F6E742E43686172736574070E4742323331325F43
48415253455410486561646572466F6E742E436F6C6F72070C636C57696E646F
775465787411486561646572466F6E742E48656967687402F40F486561646572
466F6E742E4E616D650604CBCECCE510486561646572466F6E742E5374796C65
0B000F4F7074696F6E734265686176696F720B0C6564676F4175746F536F7274
0E6564676F447261675363726F6C6C0B6564676F45646974696E67136564676F
456E74657253686F77456469746F72136564676F496D6D656469617465456469
746F720D6564676F4D756C7469536F72740E6564676F5461625468726F756768
0F6564676F566572745468726F75676800094F7074696F6E7344420B10656467
6F43616E63656C4F6E457869740D6564676F43616E496E73657274116564676F
43616E4E617669676174696F6E116564676F436F6E6669726D44656C65746512
6564676F4C6F6164416C6C5265636F726473106564676F557365426F6F6B6D61
726B73000B4F7074696F6E73566965770B136564676F42616E64486561646572
57696474680D6564676F496E64696361746F720D6564676F5573654269746D61
70001350726576696577466F6E742E43686172736574070F44454641554C545F
434841525345541150726576696577466F6E742E436F6C6F720706636C426C75
651250726576696577466F6E742E48656967687402F51050726576696577466F
6E742E4E616D65060D4D532053616E732053657269661150726576696577466F
6E742E5374796C650B0000135464784442477269644D61736B436F6C756D6E04
636F6465055769647468024A0942616E64496E646578020008526F77496E6465
780200094669656C644E616D650604636F64650000135464784442477269644D
61736B436F6C756D6E046E616D65055769647468026F0942616E64496E646578
020008526F77496E6465780200094669656C644E616D6506046E616D65000013
5464784442477269644D61736B436F6C756D6E02647A05576964746803810009
42616E64496E646578020008526F77496E6465780200094669656C644E616D65
0602647A0000135464784442477269644D61736B436F6C756D6E026468055769
64746802570942616E64496E646578020008526F77496E646578020009466965
6C644E616D65060264680000135464784442477269644D61736B436F6C756D6E
02637A05576964746802570942616E64496E646578020008526F77496E646578
0200094669656C644E616D650602637A0000135464784442477269644D61736B
436F6C756D6E036C7872055769647468023D0942616E64496E64657802000852
6F77496E6465780200094669656C644E616D6506036C78720000135464784442
477269644D61736B436F6C756D6E02627A05576964746802790942616E64496E
646578020008526F77496E6465780200094669656C644E616D650602627A0000
00}
end
object dxDBGridLayoutList1Item2: TdxDBGridLayout
Data = {
F6050000545046301054647844424772696457726170706572000542616E6473
0E0100000D44656661756C744C61796F7574091348656164657250616E656C52
6F77436F756E740201084B65794669656C640604636F64650D53756D6D617279
47726F7570730E001053756D6D617279536570617261746F7206022C200C466F
6E742E43686172736574070E4742323331325F434841525345540A466F6E742E
436F6C6F72070C636C57696E646F77546578740B466F6E742E48656967687402
F409466F6E742E4E616D650604CBCECCE50A466F6E742E5374796C650B000A50
6172656E74466F6E74081042616E64466F6E742E43686172736574070F444546
41554C545F434841525345540E42616E64466F6E742E436F6C6F72070C636C57
696E646F77546578740F42616E64466F6E742E48656967687402F50D42616E64
466F6E742E4E616D65060D4D532053616E732053657269660E42616E64466F6E
742E5374796C650B000A44617461536F75726365070F7379642E44617461536F
75726365340D46696C7465722E416374697665090F46696C7465722E43726974
657269610A040000000000000012486561646572466F6E742E43686172736574
070E4742323331325F4348415253455410486561646572466F6E742E436F6C6F
72070C636C57696E646F775465787411486561646572466F6E742E4865696768
7402F40F486561646572466F6E742E4E616D650604CBCECCE510486561646572
466F6E742E5374796C650B000F4F7074696F6E734265686176696F720B0C6564
676F4175746F536F72740E6564676F447261675363726F6C6C0B6564676F4564
6974696E67136564676F456E74657253686F77456469746F72136564676F496D
6D656469617465456469746F720D6564676F4D756C7469536F72740E6564676F
5461625468726F7567680F6564676F566572745468726F75676800094F707469
6F6E7344420B106564676F43616E63656C4F6E457869740D6564676F43616E44
656C6574650D6564676F43616E496E73657274116564676F43616E4E61766967
6174696F6E116564676F436F6E6669726D44656C657465126564676F4C6F6164
416C6C5265636F726473106564676F557365426F6F6B6D61726B73000B4F7074
696F6E73566965770B136564676F42616E6448656164657257696474680D6564
676F496E64696361746F720D6564676F5573654269746D617000135072657669
6577466F6E742E43686172736574070F44454641554C545F4348415253455411
50726576696577466F6E742E436F6C6F720706636C426C756512507265766965
77466F6E742E48656967687402F51050726576696577466F6E742E4E616D6506
0D4D532053616E732053657269661150726576696577466F6E742E5374796C65
0B0000135464784442477269644D61736B436F6C756D6E04636F646505576964
746802450942616E64496E646578020008526F77496E6465780200094669656C
644E616D650604636F64650000135464784442477269644D61736B436F6C756D
6E046E616D65055769647468023F0942616E64496E646578020008526F77496E
6465780200094669656C644E616D6506046E616D650000135464784442477269
644D61736B436F6C756D6E02626D055769647468023E0942616E64496E646578
020008526F77496E6465780200094669656C644E616D650602626D0000135464
784442477269644D61736B436F6C756D6E02786205576964746802380942616E
64496E646578020008526F77496E6465780200094669656C644E616D65060278
6200001354647844424772696444617465436F6C756D6E046373727105576964
746802560942616E64496E646578020008526F77496E6465780200094669656C
644E616D650604637372710000135464784442477269644D61736B436F6C756D
6E02646805576964746802600942616E64496E646578020008526F77496E6465
780200094669656C644E616D65060264680000135464784442477269644D6173
6B436F6C756D6E027A7A055769647468027C0942616E64496E64657802000852
6F77496E6465780200094669656C644E616D6506027A7A000000}
end
end
object DataSource3: TDataSource
DataSet = ADOTable3
Left = 384
Top = 216
end
object DataSource4: TDataSource
DataSet = ADOTable4
Left = 416
Top = 216
end
object Query1: TADOQuery
Connection = MainForm.ADOConnection1
Parameters = <>
Left = 336
Top = 216
end
object ADOTable2: TADOTable
Active = True
Connection = MainForm.ADOConnection1
CursorType = ctStatic
BeforePost = ADOTable2BeforePost
IndexFieldNames = 'code'
MasterFields = 'code'
MasterSource = DataSource1
TableName = 'SYD002'
Left = 120
Top = 192
object ADOTable2spcode: TStringField
DisplayLabel = '貨品編碼'
DisplayWidth = 10
FieldName = 'spcode'
OnSetText = ADOTable2spcodeSetText
Size = 15
end
object ADOTable2spname: TStringField
DisplayLabel = '貨品名稱'
DisplayWidth = 25
FieldName = 'spname'
Size = 200
end
object ADOTable2jldw: TStringField
DisplayLabel = '單位'
DisplayWidth = 10
FieldName = 'jldw'
Size = 10
end
object ADOTable2js: TBCDField
DisplayLabel = '件數'
DisplayWidth = 19
FieldName = 'js'
OnSetText = ADOTable2jsSetText
Precision = 18
Size = 3
end
object ADOTable2ss: TBCDField
DisplayLabel = '散數'
DisplayWidth = 19
FieldName = 'ss'
OnSetText = ADOTable2ssSetText
Precision = 18
Size = 3
end
object ADOTable2sl: TBCDField
DisplayLabel = '數量'
DisplayWidth = 19
FieldName = 'sl'
OnSetText = ADOTable2slSetText
Precision = 18
Size = 3
end
object ADOTable2jhj: TBCDField
DisplayLabel = '成本價'
DisplayWidth = 19
FieldName = 'jhj'
OnSetText = ADOTable2jhjSetText
Precision = 18
Size = 3
end
object ADOTable2je: TBCDField
DisplayLabel = '金額'
DisplayWidth = 19
FieldName = 'je'
Precision = 18
Size = 3
end
object ADOTable2id: TAutoIncField
DisplayLabel = 'ID'
DisplayWidth = 10
FieldName = 'id'
end
object ADOTable2code: TStringField
DisplayLabel = '主單號'
DisplayWidth = 20
FieldName = 'code'
end
object ADOTable2bzgg: TBCDField
DisplayLabel = '包裝'
DisplayWidth = 19
FieldName = 'bzgg'
Precision = 18
Size = 0
end
end
object ADOTable1: TADOTable
Active = True
Connection = MainForm.ADOConnection1
CursorType = ctStatic
AfterScroll = ADOTable1AfterScroll
TableName = 'SYD001'
Left = 416
Top = 80
object ADOTable1code: TStringField
DisplayLabel = '單號'
FieldName = 'code'
end
object ADOTable1kdrq: TDateTimeField
DisplayLabel = '開單日期'
FieldName = 'kdrq'
end
object ADOTable1ywy: TStringField
DisplayLabel = '業務員'
FieldName = 'ywy'
Size = 10
end
object ADOTable1bz: TStringField
DisplayLabel = '備注'
FieldName = 'bz'
Size = 200
end
object ADOTable1zt: TStringField
DisplayLabel = '單據狀態'
FieldName = 'zt'
Size = 10
end
object ADOTable1ywyname: TStringField
DisplayLabel = '業務員'
FieldKind = fkLookup
FieldName = 'ywyname'
LookupDataSet = ADOTable4
LookupKeyFields = 'code'
LookupResultField = 'name'
KeyFields = 'ywy'
Lookup = True
end
object ADOTable1dkr: TStringField
DisplayLabel = '開單人'
FieldName = 'dkr'
Size = 6
end
object ADOTable1ck: TStringField
DisplayLabel = '倉庫'
FieldName = 'ck'
Size = 5
end
object ADOTable1ckname: TStringField
FieldKind = fkLookup
FieldName = 'ckname'
LookupDataSet = ADOTable3
LookupKeyFields = 'code'
LookupResultField = 'name'
KeyFields = 'ck'
Lookup = True
end
object ADOTable1lx: TStringField
DisplayLabel = '類型'
FieldName = 'lx'
Size = 4
end
object ADOTable1shrq: TDateTimeField
FieldName = 'shrq'
end
object ADOTable1shr: TStringField
FieldName = 'shr'
end
end
object PopupMenu1: TPopupMenu
Alignment = paCenter
Left = 24
Top = 192
object N2: TMenuItem
Caption = '修改單號'
ShortCut = 116
OnClick = N2Click
end
object Bit1: TMenuItem
Caption = '第 一 單'
ShortCut = 16454
OnClick = Bit1Click
end
object Bit4: TMenuItem
Caption = '最后一單'
ShortCut = 16460
OnClick = Bit4Click
end
object N1: TMenuItem
Caption = '-'
end
object N9: TMenuItem
Caption = '選擇貨品'
ShortCut = 119
OnClick = N9Click
end
object N10: TMenuItem
Caption = '刪除貨品'
ShortCut = 16452
OnClick = N10Click
end
object N11: TMenuItem
Caption = '歷史價格'
ShortCut = 16458
OnClick = N11Click
end
object N13: TMenuItem
Caption = '單據查找'
ShortCut = 114
OnClick = N13Click
end
object N12: TMenuItem
Caption = '-'
end
object N3: TMenuItem
Caption = '審核入賬'
ShortCut = 121
OnClick = N3Click
end
end
end
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -