?? untdatadm.dfm
字號:
object dmmain: Tdmmain
OldCreateOrder = False
OnCreate = DataModuleCreate
Left = 1
Top = 1
Height = 570
Width = 798
object cdsStock_contract: TClientDataSet
Aggregates = <>
Params = <>
ProviderName = 'dspStock_contract'
RemoteServer = frm_Data.Socket_Connection
Left = 32
Top = 8
end
object cdsReceipt: TClientDataSet
Aggregates = <>
Params = <>
ProviderName = 'dspReceipt'
RemoteServer = frm_Data.Socket_Connection
OnReconcileError = cdsReceiptReconcileError
Left = 278
Top = 56
end
object cdsStock_contract_detail: TClientDataSet
Aggregates = <>
Params = <>
ProviderName = 'dspStock_contract_detail'
RemoteServer = frm_Data.Socket_Connection
Left = 134
Top = 8
end
object CDSexecsql: TClientDataSet
Aggregates = <>
Params = <>
ProviderName = 'DspSQL'
RemoteServer = frm_Data.Socket_Connection
AfterClose = CDSexecsqlAfterClose
OnReconcileError = CDSexecsqlReconcileError
Left = 24
Top = 72
end
object CDSquery: TClientDataSet
Aggregates = <>
Params = <>
ProviderName = 'dspquery'
RemoteServer = frm_Data.Socket_Connection
AfterClose = CDSqueryAfterClose
Left = 24
Top = 176
end
object CDSquery2: TClientDataSet
Aggregates = <>
Params = <>
ProviderName = 'dspquery2'
RemoteServer = frm_Data.Socket_Connection
AfterClose = CDSquery2AfterClose
Left = 24
Top = 120
end
object csdStock_Write: TClientDataSet
Aggregates = <>
Params = <>
ProviderName = 'dspStock_Write'
RemoteServer = frm_Data.Socket_Connection
Left = 126
Top = 64
end
object cdsStock_Write_detail: TClientDataSet
Aggregates = <>
Params = <>
ProviderName = 'dspStock_Write_detail'
RemoteServer = frm_Data.Socket_Connection
Left = 126
Top = 112
end
object cdsStock_States: TClientDataSet
Aggregates = <>
Params = <>
ProviderName = 'dspStock_States'
RemoteServer = frm_Data.Socket_Connection
Left = 126
Top = 176
end
object cdsStock_Jion: TClientDataSet
Aggregates = <>
Params = <>
ProviderName = 'dspStock_Jion'
RemoteServer = frm_Data.Socket_Connection
OnReconcileError = cdsStock_JionReconcileError
Left = 278
Top = 8
end
object cdsQuality_Check: TClientDataSet
Aggregates = <>
Params = <>
ProviderName = 'dspQuality_Check'
RemoteServer = frm_Data.Socket_Connection
Left = 278
Top = 112
end
object cdsQuality_Check_detail: TClientDataSet
Aggregates = <>
Params = <>
ProviderName = 'dspQuality_Check_detail'
RemoteServer = frm_Data.Socket_Connection
Left = 278
Top = 160
end
object cdsCancel_strip: TClientDataSet
Aggregates = <>
Params = <>
ProviderName = 'dspCancel_strip'
RemoteServer = frm_Data.Socket_Connection
Left = 382
Top = 16
end
object cdsCanceldetail: TClientDataSet
Aggregates = <>
Params = <>
ProviderName = 'dspCanceldetail'
RemoteServer = frm_Data.Socket_Connection
Left = 366
Top = 80
end
object socketpublic: TSocketConnection
ServerGUID = '{E3485416-8439-4E76-BECB-1F7506164E4C}'
ServerName = 'GD_Chain_Server.PublicServer'
Port = 5000
SupportCallbacks = False
ObjectBroker = frm_Data.Simple
Left = 544
Top = 16
end
object cdsstockdetail: TClientDataSet
Aggregates = <>
Params = <>
ProviderName = 'dspstockdetail'
RemoteServer = frm_Data.Socket_Connection
Left = 24
Top = 232
end
object cdspornal: TClientDataSet
Aggregates = <>
Params = <
item
DataType = ftString
Name = 'p_no'
ParamType = ptInput
Value = ''
end>
ProviderName = 'dsppornal'
RemoteServer = frm_Data.Socket_Connection
Left = 24
Top = 288
end
object cdspart: TClientDataSet
Aggregates = <>
Params = <
item
DataType = ftString
Name = 'no'
ParamType = ptInput
Value = ''
end>
ProviderName = 'dsppart'
RemoteServer = frm_Data.Socket_Connection
Left = 32
Top = 336
end
object cdspay: TClientDataSet
Aggregates = <>
Params = <>
ProviderName = 'dsppay'
RemoteServer = socketpublic
Left = 112
Top = 288
end
object cdspaydetail: TClientDataSet
Aggregates = <>
Params = <>
ProviderName = 'dspPAYDETAIL'
RemoteServer = socketpublic
Left = 112
Top = 336
end
object cdsmoneyinput: TClientDataSet
Aggregates = <>
Params = <>
ProviderName = 'dspmoney'
RemoteServer = socketpublic
Left = 184
Top = 288
end
object cdsmoneydetail: TClientDataSet
Aggregates = <>
Params = <>
ProviderName = 'dspmoneydetail'
RemoteServer = socketpublic
Left = 192
Top = 336
end
object cdsstockwarn: TClientDataSet
Aggregates = <>
Params = <
item
DataType = ftString
Name = 'no'
ParamType = ptInput
Value = ''
end
item
DataType = ftString
Name = 'bh'
ParamType = ptInput
Value = ''
end>
ProviderName = 'dspstockwarning'
RemoteServer = socketpublic
OnReconcileError = cdsstockwarnReconcileError
Left = 232
Top = 216
end
object cdsstorage: TClientDataSet
Aggregates = <>
Params = <
item
DataType = ftString
Name = 'no'
ParamType = ptInput
Value = ''
end>
ProviderName = 'dspstorage'
RemoteServer = socketpublic
OnReconcileError = cdsstorageReconcileError
Left = 264
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -