selectarrearagefrm.dfm
来自「医药连锁经营管理系统源码」· DFM 代码 · 共 671 行 · 第 1/2 页
DFM
671 行
Color = 15791348
HighlightColor = 16026986
HotTrack = True
HotTrackColor = 3983359
ParentColor = False
TabOrder = 11
OnClick = RzBitBtn2Click
DisabledIndex = 10
ImageIndex = 1
Images = ImageList1
end
object RzBitBtn1: TRzBitBtn
Left = 620
Top = 35
Width = 78
Caption = #36873#23450'(&S)'
Color = 15791348
HighlightColor = 16026986
HotTrack = True
HotTrackColor = 3983359
ParentColor = False
TabOrder = 12
OnClick = RzBitBtn1Click
DisabledIndex = 10
ImageIndex = 0
Images = ImageList1
end
object edProvNo: TRzEdit
Left = 92
Top = 37
Width = 127
Height = 21
FrameHotStyle = fsFlat
FrameVisible = True
TabOrder = 7
end
object edBillNo: TRzEdit
Left = 92
Top = 8
Width = 127
Height = 21
FrameHotStyle = fsFlat
FrameVisible = True
TabOrder = 1
end
object ckEmpNo: TRzCheckBox
Left = 244
Top = 9
Width = 79
Height = 17
AlignmentVertical = avBottom
Caption = #19994' '#21153' '#21592#65306
HotTrack = True
State = cbUnchecked
TabOrder = 2
end
object ckCreater: TRzCheckBox
Left = 438
Top = 9
Width = 76
Height = 17
AlignmentVertical = avBottom
Caption = #21019#24314#20154#65306
HotTrack = True
State = cbUnchecked
TabOrder = 4
end
object edEmpNo: TRzEdit
Left = 322
Top = 8
Width = 93
Height = 21
FrameHotStyle = fsFlat
FrameVisible = True
TabOnEnter = True
TabOrder = 3
end
object edCreater: TRzEdit
Left = 504
Top = 8
Width = 103
Height = 21
FrameHotStyle = fsFlat
FrameVisible = True
TabOnEnter = True
TabOrder = 5
end
end
object DComm: TDCOMConnection
ServerGUID = '{61EFC14A-805A-4497-9C53-2707D0E83759}'
ServerName = 'CKPurchInBase.PurchInRDM'
Left = 212
Top = 141
end
object CdsSelectArrearage: TckClientDataSet
Aggregates = <>
Params = <>
ProviderName = 'DspArrearage'
RemoteServer = DComm
Left = 336
Top = 144
object CdsSelectArrearageBillNo: TStringField
FieldName = 'BillNo'
ProviderFlags = [pfInUpdate, pfInWhere, pfInKey]
end
object CdsSelectArrearageFDate: TDateTimeField
FieldName = 'FDate'
end
object CdsSelectArrearageInOutKind: TSmallintField
FieldName = 'InOutKind'
end
object CdsSelectArrearageDepartID: TIntegerField
FieldName = 'DepartID'
end
object CdsSelectArrearageDepartNo: TStringField
FieldName = 'DepartNo'
Size = 12
end
object CdsSelectArrearageDepartName: TStringField
FieldName = 'DepartName'
end
object CdsSelectArrearageProvNo: TStringField
FieldName = 'ProvNo'
Size = 8
end
object CdsSelectArrearageProvName: TStringField
FieldName = 'ProvName'
end
object CdsSelectArrearageLinkMan: TStringField
FieldName = 'LinkMan'
Size = 12
end
object CdsSelectArrearageEmpNo: TStringField
FieldName = 'EmpNo'
Size = 8
end
object CdsSelectArrearageName: TStringField
FieldName = 'Name'
Size = 12
end
object CdsSelectArrearageCreater: TStringField
FieldName = 'Creater'
Size = 8
end
object CdsSelectArrearageCreateName: TStringField
FieldName = 'CreateName'
Size = 12
end
object CdsSelectArrearageAdsBrowArrearageDtl: TDataSetField
FieldName = 'AdsBrowArrearageDtl'
end
end
object DsSelectArrearage: TDataSource
DataSet = CdsSelectArrearage
Left = 452
Top = 141
end
object ImageList1: TImageList
Left = 460
Top = 256
Bitmap = {
494C010102000400040010001000FFFFFFFFFF10FFFFFFFFFFFFFFFF424D3600
0000000000003600000028000000400000001000000001001000000000000008
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000104210001000
1042000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000004200000000
0000000000000000000000000000000000000000000000001000100010021002
1000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000042004200000000
0000000000000000000000000000000000000000000010001002100210001000
1042000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000420042004200000000
0000000000000000000000000000000000000000104210001002100010420000
0000100010001000100010001000100000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
000000000000000000000000000000000000000000000042004200420000FF7F
FF7F000000000000000000000000000000000000100010021000104200000000
0000100010021002100210021002100000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
000000000000000000000000000000000000000000000042004200000000FF7F
FF7F000000000000000000001000000000000000100010021000000000000000
0000000010001002100210021002100000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
000000000000000000000000000000000000000000000042004200420000FF7F
FF7F000000000000000010001000000000000000100010021000104200000000
0000000010421000100210021002100000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
000000000000000000000000000000000000000000000042004200420000FF7F
FF7F000000000000100010001000100010000000104210001002100010420000
1042100010001002100010021002100000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
000000000000000000000000000000000000000000000042004200420000FF7F
FF7F000000001000100010001000100010000000000010001002100210001000
1000100210021000104210001002100000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
000000000000000000000000000000000000000000000042004200420000FF7F
FF7F000000000000100010001000100010000000000000001000100010021002
1002100010000000000000001000100000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
00000000000000000000000000000000000000000000004200420000FF7FFF7F
FF7F000000000000000010001000000000000000000000000000104210001000
1000104200000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000420000FF7FFF7FFF7F
FF7F000000000000000000001000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
000000000000000000000000000000000000000000000000FF7FFF7FFF7FFF7F
FF7F000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
000000000000000000000000000000000000424D3E000000000000003E000000
2800000040000000100000000100010000000000800000000000000000000000
000000000000000000000000FFFFFF00FFFFFFFF00000000FBFFFFFF00000000
F3FFF0FF00000000E3FFE0FF00000000C3FFC0FF000000000007830100000000
807F870100000000807B8F810000000080738781000000008060820100000000
8040C001000000008060E039000000008073F07F00000000807BFFFF00000000
807FFFFF00000000807FFFFF0000000000000000000000000000000000000000
000000000000}
end
object DsSelectArrearageDtl: TDataSource
DataSet = CdsSelectArrearageDtl
Left = 456
Top = 206
end
object CdsSelectArrearageDtl: TckClientDataSet
Aggregates = <>
DataSetField = CdsSelectArrearageAdsBrowArrearageDtl
Params = <>
Left = 336
Top = 208
object CdsSelectArrearageDtlBillNo: TStringField
FieldName = 'BillNo'
ProviderFlags = [pfInUpdate, pfInWhere, pfInKey]
end
object CdsSelectArrearageDtlItemNo: TIntegerField
FieldName = 'ItemNo'
ProviderFlags = [pfInUpdate, pfInWhere, pfInKey]
end
object CdsSelectArrearageDtlGoodsID: TStringField
FieldName = 'GoodsID'
Size = 16
end
object CdsSelectArrearageDtlName: TStringField
FieldName = 'Name'
Size = 24
end
object CdsSelectArrearageDtlSpecs: TStringField
FieldName = 'Specs'
end
object CdsSelectArrearageDtlUnit: TStringField
FieldName = 'Unit'
Size = 8
end
object CdsSelectArrearageDtlBatchNo: TStringField
FieldName = 'BatchNo'
Size = 12
end
object CdsSelectArrearageDtlQty: TBCDField
FieldName = 'Qty'
Precision = 12
Size = 3
end
object CdsSelectArrearageDtlPrice: TFloatField
FieldName = 'Price'
end
object CdsSelectArrearageDtlTaxRate: TBCDField
FieldName = 'TaxRate'
Precision = 6
Size = 2
end
object CdsSelectArrearageDtlUnTaxPrice: TFloatField
FieldName = 'UnTaxPrice'
end
object CdsSelectArrearageDtlGoodsSum: TBCDField
FieldName = 'GoodsSum'
Precision = 19
end
object CdsSelectArrearageDtlTaxSum: TBCDField
FieldName = 'TaxSum'
Precision = 19
end
object CdsSelectArrearageDtlAmount: TBCDField
FieldName = 'Amount'
Precision = 19
end
object CdsSelectArrearageDtlCostPrice: TFloatField
FieldName = 'CostPrice'
end
object CdsSelectArrearageDtlCostAmount: TBCDField
FieldName = 'CostAmount'
Precision = 19
end
object CdsSelectArrearageDtlPBillNo: TStringField
FieldName = 'PBillNo'
end
object CdsSelectArrearageDtlPItemNo: TIntegerField
FieldName = 'PItemNo'
end
object CdsSelectArrearageDtlPaidUp: TBCDField
FieldName = 'PaidUp'
Precision = 19
end
object CdsSelectArrearageDtlUnPaid: TBCDField
FieldName = 'UnPaid'
end
object CdsSelectArrearageDtlPayDone: TBooleanField
FieldName = 'PayDone'
end
object CdsSelectArrearageDtlPayDoneDate: TDateTimeField
FieldName = 'PayDoneDate'
end
object CdsSelectArrearageDtlRemark: TStringField
FieldName = 'Remark'
Size = 40
end
end
end
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?