111
This commit is contained in:
parent
bb97dac207
commit
e500d3af26
Binary file not shown.
|
|
@ -2,6 +2,6 @@
|
|||
<BorlandProject>
|
||||
<Transactions/>
|
||||
<Default.Personality>
|
||||
<Projects ActiveProject="D:\Dp10RepoV1\项目代码\D10szYueXiang\A01基础公司管理\Company.dproj"/>
|
||||
<Projects ActiveProject="D:\Dp10RepoV1\项目代码\D10szKaiXiYa\A01基础公司管理\Company.dproj"/>
|
||||
</Default.Personality>
|
||||
</BorlandProject>
|
||||
|
|
|
|||
|
|
@ -60,7 +60,7 @@ inherited frmCustInput: TfrmCustInput
|
|||
Left = 0
|
||||
Top = 30
|
||||
Width = 1143
|
||||
Height = 350
|
||||
Height = 442
|
||||
Align = alTop
|
||||
BevelInner = bvNone
|
||||
BevelOuter = bvNone
|
||||
|
|
@ -70,121 +70,137 @@ inherited frmCustInput: TfrmCustInput
|
|||
ParentColor = False
|
||||
ParentCtl3D = False
|
||||
TabOrder = 1
|
||||
ExplicitLeft = -1
|
||||
ExplicitTop = 26
|
||||
object Label2: TLabel
|
||||
Left = 17
|
||||
Left = 14
|
||||
Top = 12
|
||||
Width = 32
|
||||
Height = 21
|
||||
Caption = #32534#21495
|
||||
end
|
||||
object Label6: TLabel
|
||||
Left = 17
|
||||
Left = 14
|
||||
Top = 47
|
||||
Width = 32
|
||||
Height = 21
|
||||
Caption = #20840#31216
|
||||
end
|
||||
object Label7: TLabel
|
||||
Left = 17
|
||||
Top = 252
|
||||
Left = 14
|
||||
Top = 332
|
||||
Width = 32
|
||||
Height = 21
|
||||
Caption = #22791#27880
|
||||
end
|
||||
object Label1: TLabel
|
||||
Left = 304
|
||||
Left = 343
|
||||
Top = 12
|
||||
Width = 32
|
||||
Height = 21
|
||||
Caption = #31616#31216
|
||||
end
|
||||
object Label4: TLabel
|
||||
Left = 17
|
||||
Top = 219
|
||||
Width = 32
|
||||
Left = 14
|
||||
Top = 84
|
||||
Width = 64
|
||||
Height = 21
|
||||
Caption = #22320#22336
|
||||
Caption = #23458#25143#22320#22336
|
||||
end
|
||||
object Label8: TLabel
|
||||
Left = 17
|
||||
Top = 86
|
||||
Left = 14
|
||||
Top = 129
|
||||
Width = 32
|
||||
Height = 21
|
||||
Caption = #22269#23478
|
||||
end
|
||||
object Label10: TLabel
|
||||
Left = 597
|
||||
Left = 639
|
||||
Top = 47
|
||||
Width = 32
|
||||
Height = 21
|
||||
Caption = #31561#32423
|
||||
end
|
||||
object Label3: TLabel
|
||||
Left = 597
|
||||
Left = 639
|
||||
Top = 12
|
||||
Width = 32
|
||||
Height = 21
|
||||
Caption = #31867#22411
|
||||
end
|
||||
object Label5: TLabel
|
||||
Left = 274
|
||||
Top = 86
|
||||
Left = 341
|
||||
Top = 129
|
||||
Width = 64
|
||||
Height = 21
|
||||
Caption = #19978#32423#21333#20301
|
||||
end
|
||||
object Label9: TLabel
|
||||
Left = 17
|
||||
Top = 136
|
||||
Left = 14
|
||||
Top = 172
|
||||
Width = 32
|
||||
Height = 21
|
||||
Caption = #31246#21495
|
||||
end
|
||||
object Label11: TLabel
|
||||
Left = 274
|
||||
Top = 136
|
||||
Left = 341
|
||||
Top = 172
|
||||
Width = 64
|
||||
Height = 21
|
||||
Caption = #24320#25143#38134#34892
|
||||
end
|
||||
object Label12: TLabel
|
||||
Left = 17
|
||||
Top = 175
|
||||
Left = 14
|
||||
Top = 213
|
||||
Width = 32
|
||||
Height = 21
|
||||
Caption = #34892#21495
|
||||
end
|
||||
object Label13: TLabel
|
||||
Left = 274
|
||||
Top = 175
|
||||
Left = 341
|
||||
Top = 213
|
||||
Width = 64
|
||||
Height = 21
|
||||
Caption = #38134#34892#36134#21495
|
||||
end
|
||||
object Label14: TLabel
|
||||
Left = 14
|
||||
Top = 285
|
||||
Width = 64
|
||||
Height = 21
|
||||
Caption = #38134#34892#22320#22336
|
||||
end
|
||||
object Label15: TLabel
|
||||
Left = 14
|
||||
Top = 251
|
||||
Width = 98
|
||||
Height = 21
|
||||
Caption = 'SWIFT CODE'
|
||||
end
|
||||
object CoName: TcxTextEdit
|
||||
Tag = 2
|
||||
Left = 55
|
||||
Left = 124
|
||||
Top = 43
|
||||
TabOrder = 1
|
||||
Width = 487
|
||||
end
|
||||
object CoAbbrName: TcxTextEdit
|
||||
Tag = 2
|
||||
Left = 342
|
||||
Left = 412
|
||||
Top = 8
|
||||
TabOrder = 2
|
||||
Width = 200
|
||||
end
|
||||
object CoCode: TcxTextEdit
|
||||
Tag = 2
|
||||
Left = 55
|
||||
Left = 124
|
||||
Top = 8
|
||||
TabOrder = 0
|
||||
Width = 200
|
||||
end
|
||||
object CoBusinessType: TcxButtonEdit
|
||||
Tag = 2
|
||||
Left = 637
|
||||
Left = 679
|
||||
Top = 8
|
||||
Hint = 'CoBusinessType/'#23458#25143#31867#22411
|
||||
Properties.Buttons = <
|
||||
|
|
@ -201,8 +217,8 @@ inherited frmCustInput: TfrmCustInput
|
|||
end
|
||||
object cocountry: TcxButtonEdit
|
||||
Tag = 2
|
||||
Left = 55
|
||||
Top = 80
|
||||
Left = 124
|
||||
Top = 125
|
||||
Hint = 'CoCountry/'#22269#23478
|
||||
Properties.Buttons = <
|
||||
item
|
||||
|
|
@ -218,7 +234,7 @@ inherited frmCustInput: TfrmCustInput
|
|||
end
|
||||
object CoLevel: TcxComboBox
|
||||
Tag = 2
|
||||
Left = 635
|
||||
Left = 679
|
||||
Top = 43
|
||||
Properties.Items.Strings = (
|
||||
'A'
|
||||
|
|
@ -229,8 +245,8 @@ inherited frmCustInput: TfrmCustInput
|
|||
end
|
||||
object ParentCoName: TcxButtonEdit
|
||||
Tag = 2
|
||||
Left = 344
|
||||
Top = 80
|
||||
Left = 411
|
||||
Top = 125
|
||||
Hint = 'CoBusinessType/'#23458#25143#31867#22411
|
||||
Properties.Buttons = <
|
||||
item
|
||||
|
|
@ -246,30 +262,30 @@ inherited frmCustInput: TfrmCustInput
|
|||
end
|
||||
object CoAddress: TcxTextEdit
|
||||
Tag = 2
|
||||
Left = 55
|
||||
Top = 213
|
||||
Left = 124
|
||||
Top = 78
|
||||
TabOrder = 7
|
||||
Width = 780
|
||||
Width = 753
|
||||
end
|
||||
object CoNote: TcxMemo
|
||||
Tag = 2
|
||||
Left = 55
|
||||
Top = 252
|
||||
Left = 124
|
||||
Top = 329
|
||||
TabOrder = 8
|
||||
Height = 77
|
||||
Width = 780
|
||||
Width = 755
|
||||
end
|
||||
object ShuiNo: TcxTextEdit
|
||||
Tag = 2
|
||||
Left = 55
|
||||
Top = 130
|
||||
Left = 124
|
||||
Top = 168
|
||||
TabOrder = 9
|
||||
Width = 198
|
||||
end
|
||||
object BankName: TcxButtonEdit
|
||||
Tag = 2
|
||||
Left = 344
|
||||
Top = 130
|
||||
Left = 411
|
||||
Top = 168
|
||||
Hint = 'BankName/'#24320#25143#38134#34892
|
||||
Properties.Buttons = <
|
||||
item
|
||||
|
|
@ -285,35 +301,52 @@ inherited frmCustInput: TfrmCustInput
|
|||
end
|
||||
object BankNo: TcxTextEdit
|
||||
Tag = 2
|
||||
Left = 55
|
||||
Top = 169
|
||||
Left = 124
|
||||
Top = 209
|
||||
TabOrder = 11
|
||||
Width = 198
|
||||
end
|
||||
object BankCode: TcxTextEdit
|
||||
Tag = 2
|
||||
Left = 344
|
||||
Top = 169
|
||||
Left = 411
|
||||
Top = 209
|
||||
TabOrder = 12
|
||||
Width = 198
|
||||
end
|
||||
object YHDZ: TcxTextEdit
|
||||
Tag = 2
|
||||
Left = 124
|
||||
Top = 282
|
||||
TabOrder = 13
|
||||
Width = 753
|
||||
end
|
||||
object SC: TcxTextEdit
|
||||
Tag = 2
|
||||
Left = 124
|
||||
Top = 247
|
||||
TabOrder = 14
|
||||
Width = 753
|
||||
end
|
||||
end
|
||||
object Panel1: TPanel [2]
|
||||
Left = 0
|
||||
Top = 380
|
||||
Top = 472
|
||||
Width = 1143
|
||||
Height = 263
|
||||
Height = 171
|
||||
Align = alClient
|
||||
Caption = 'Panel1'
|
||||
TabOrder = 2
|
||||
ExplicitTop = 380
|
||||
ExplicitHeight = 263
|
||||
object Panel3: TPanel
|
||||
Left = 1
|
||||
Top = 1
|
||||
Width = 1141
|
||||
Height = 261
|
||||
Height = 169
|
||||
Align = alClient
|
||||
Caption = 'Panel1'
|
||||
TabOrder = 0
|
||||
ExplicitHeight = 261
|
||||
object ToolBar3: TToolBar
|
||||
Tag = 1
|
||||
Left = 1
|
||||
|
|
@ -360,10 +393,11 @@ inherited frmCustInput: TfrmCustInput
|
|||
Left = 1
|
||||
Top = 31
|
||||
Width = 1139
|
||||
Height = 229
|
||||
Height = 137
|
||||
Align = alClient
|
||||
BorderStyle = cxcbsNone
|
||||
TabOrder = 1
|
||||
ExplicitHeight = 229
|
||||
object TV2: TcxGridDBTableView
|
||||
Navigator.Buttons.CustomButtons = <>
|
||||
Navigator.Buttons.Delete.Enabled = False
|
||||
|
|
@ -466,6 +500,9 @@ inherited frmCustInput: TfrmCustInput
|
|||
end
|
||||
inherited cxImageList_bar: TcxImageList
|
||||
FormatVersion = 1
|
||||
Left = 1069
|
||||
Top = 56
|
||||
DesignInfo = 3671085
|
||||
end
|
||||
object ADOQueryTemp: TADOQuery
|
||||
Connection = DataLink_Company.ADOLink
|
||||
|
|
|
|||
|
|
@ -13,25 +13,9 @@ uses
|
|||
RM_Class, RM_GridReport, IdBaseComponent, IdComponent, IdTCPConnection,
|
||||
IdTCPClient, IdFTP, ShellAPI, IniFiles, cxCheckBox, cxCalendar, cxButtonEdit,
|
||||
cxTextEdit, cxDropDownEdit, BtnEdit, cxLookAndFeels, cxLookAndFeelPainters,
|
||||
cxNavigator, dxDateRanges,
|
||||
dxBarBuiltInMenu, U_BaseInput, System.ImageList, Vcl.ImgList, cxContainer,
|
||||
cxMemo,
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
dxScrollbarAnnotations,
|
||||
cxImageList;
|
||||
cxNavigator, dxDateRanges, dxBarBuiltInMenu, U_BaseInput, System.ImageList,
|
||||
Vcl.ImgList, cxContainer, cxMemo, dxScrollbarAnnotations, cxImageList,
|
||||
dxSkinsCore, dxSkinsDefaultPainters;
|
||||
|
||||
type
|
||||
TfrmCustInput = class(TfrmBaseInput)
|
||||
|
|
@ -88,6 +72,10 @@ type
|
|||
BankNo: TcxTextEdit;
|
||||
Label13: TLabel;
|
||||
BankCode: TcxTextEdit;
|
||||
Label14: TLabel;
|
||||
YHDZ: TcxTextEdit;
|
||||
Label15: TLabel;
|
||||
SC: TcxTextEdit;
|
||||
procedure FormDestroy(Sender: TObject);
|
||||
procedure FormClose(Sender: TObject; var Action: TCloseAction);
|
||||
procedure TBCloseClick(Sender: TObject);
|
||||
|
|
|
|||
|
|
@ -379,6 +379,22 @@ inherited frmCustomer: TfrmCustomer
|
|||
Options.ExpressionEditing = False
|
||||
Width = 100
|
||||
end
|
||||
object Tv1Column13: TcxGridDBColumn
|
||||
Caption = 'SWIFT CODE'
|
||||
DataBinding.FieldName = 'SC'
|
||||
DataBinding.IsNullValueType = True
|
||||
HeaderAlignmentHorz = taCenter
|
||||
Options.Editing = False
|
||||
Width = 120
|
||||
end
|
||||
object Tv1Column12: TcxGridDBColumn
|
||||
Caption = #38134#34892#22320#22336
|
||||
DataBinding.FieldName = 'YHDZ'
|
||||
DataBinding.IsNullValueType = True
|
||||
HeaderAlignmentHorz = taCenter
|
||||
Options.Editing = False
|
||||
Width = 100
|
||||
end
|
||||
end
|
||||
object cxGridLevel1: TcxGridLevel
|
||||
GridView = Tv1
|
||||
|
|
|
|||
|
|
@ -86,6 +86,8 @@ type
|
|||
Tv1Column9: TcxGridDBColumn;
|
||||
Tv1Column10: TcxGridDBColumn;
|
||||
Tv1Column11: TcxGridDBColumn;
|
||||
Tv1Column12: TcxGridDBColumn;
|
||||
Tv1Column13: TcxGridDBColumn;
|
||||
procedure FormDestroy(Sender: TObject);
|
||||
procedure FormClose(Sender: TObject; var Action: TCloseAction);
|
||||
procedure TBCloseClick(Sender: TObject);
|
||||
|
|
|
|||
Binary file not shown.
Loading…
Reference in New Issue
Block a user