D10myBiaoqi/A01基础公司管理/U_CustInput.dfm

833 lines
21 KiB
Plaintext
Raw Permalink Normal View History

2024-07-04 16:01:24 +08:00
object frmCustInput: TfrmCustInput
Left = 261
Top = 149
Caption = #23458#25143#36164#26009#24405#20837
ClientHeight = 643
ClientWidth = 1182
Color = clWhite
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
OldCreateOrder = True
Position = poScreenCenter
OnClose = FormClose
OnDestroy = FormDestroy
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 12
object ToolBar1: TToolBar
Tag = 1
Left = 0
Top = 0
Width = 1182
Height = 38
AutoSize = True
ButtonHeight = 38
ButtonWidth = 91
Caption = 'ToolBar1'
Color = clWhite
DisabledImages = DataLink_Company.ImageList_new32
Images = DataLink_Company.ImageList_new32
List = True
ParentColor = False
ShowCaptions = True
TabOrder = 0
object ToolButton3: TToolButton
Left = 0
Top = 0
AutoSize = True
Caption = #20445#23384
ImageIndex = 16
OnClick = ToolButton3Click
end
object TBClose: TToolButton
Left = 71
Top = 0
AutoSize = True
Caption = #20851#38381
ImageIndex = 7
OnClick = TBCloseClick
end
object ToolButton1: TToolButton
Left = 142
Top = 0
AutoSize = True
Caption = #22270#29255#19978#20256
ImageIndex = 19
OnClick = ToolButton1Click
end
end
object ScrollBox1: TScrollBox
Left = 0
Top = 38
Width = 1182
Height = 368
Align = alTop
BevelInner = bvNone
BevelOuter = bvNone
BorderStyle = bsNone
Color = clWhite
Ctl3D = False
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #23435#20307
Font.Style = []
ParentColor = False
ParentCtl3D = False
ParentFont = False
TabOrder = 1
ExplicitTop = 37
object Label2: TLabel
Left = 418
Top = 25
Width = 52
Height = 12
Caption = #23458#25143#32534#21495
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label6: TLabel
Left = 17
Top = 84
Width = 52
Height = 12
Caption = #20844#21496#20840#31216
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label7: TLabel
Left = 32
Top = 308
Width = 26
Height = 12
Caption = #22791#27880
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label1: TLabel
Left = 418
Top = 84
Width = 52
Height = 12
Caption = #20844#21496#31616#31216
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label4: TLabel
Left = 32
Top = 237
Width = 26
Height = 12
Caption = #22320#22336
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label8: TLabel
Left = 15
Top = 115
Width = 54
Height = 12
Caption = #22269' '#31821
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label10: TLabel
Left = 418
Top = 54
Width = 52
Height = 12
Caption = #23458#25143#31561#32423
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label3: TLabel
Left = 17
Top = 25
Width = 52
Height = 12
Caption = #23458#25143#31867#22411
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label5: TLabel
Left = 418
Top = 114
Width = 52
Height = 15
Caption = #19978#32423#21333#20301
Font.Charset = ANSI_CHARSET
Font.Color = clBlue
Font.Height = -12
Font.Name = 'Times New Roman'
Font.Style = [fsBold]
ParentFont = False
end
object Label9: TLabel
Left = 17
Top = 54
Width = 52
Height = 12
Caption = #23458#25143#26469#28304
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label11: TLabel
Left = 17
Top = 147
Width = 52
Height = 12
Caption = #20027#35201#24066#22330
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label12: TLabel
Left = 418
Top = 148
Width = 52
Height = 12
Caption = #26680#24515#20135#21697
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label13: TLabel
Left = 15
Top = 179
Width = 54
Height = 12
Caption = #36134' '#25143
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label14: TLabel
Left = 418
Top = 179
Width = 53
Height = 12
Caption = #24320' '#25143' '#34892
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label15: TLabel
Left = 15
Top = 208
Width = 54
Height = 12
Caption = #31246' '#21495
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object CoName: TEdit
Tag = 2
Left = 77
Top = 80
Width = 276
Height = 20
TabOrder = 1
end
object CoNote: TMemo
Tag = 2
Left = 65
Top = 305
Width = 714
Height = 57
ScrollBars = ssVertical
TabOrder = 3
end
object CoAbbrName: TEdit
Tag = 2
Left = 493
Top = 80
Width = 268
Height = 20
TabOrder = 2
end
object CoCode: TEdit
Tag = 2
Left = 493
Top = 22
Width = 268
Height = 20
ReadOnly = True
TabOrder = 0
end
object CoAddress: TMemo
Tag = 2
Left = 65
Top = 233
Width = 715
Height = 57
ScrollBars = ssVertical
TabOrder = 4
end
object cocountry: TBtnEditC
Tag = 2
Left = 77
Top = 112
Width = 276
Height = 20
Hint = 'CoCountry/'#22269#31821
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 5
OnBtnUpClick = cocountryBtnUpClick
OnBtnDnClick = cocountryBtnDnClick
end
object CoBusinessType: TBtnEditC
Tag = 2
Left = 77
Top = 21
Width = 276
Height = 20
Hint = 'CoBusinessType/'#23458#25143#31867#22411
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 6
OnBtnUpClick = cocountryBtnUpClick
OnBtnDnClick = cocountryBtnDnClick
end
object ParentCoName: TBtnEditC
Tag = 2
Left = 493
Top = 111
Width = 268
Height = 20
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
ReadOnly = True
TabOrder = 7
OnBtnUpClick = ParentCoNameBtnUpClick
OnBtnDnClick = cocountryBtnDnClick
end
object Source: TBtnEditC
Tag = 2
Left = 77
Top = 51
Width = 276
Height = 20
Hint = 'CustSource/'#23458#25143#26469#28304
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 8
OnBtnUpClick = cocountryBtnUpClick
OnBtnDnClick = cocountryBtnDnClick
end
object COID: TEdit
Left = 63
Top = 369
Width = 121
Height = 20
TabOrder = 9
Text = 'COID'
Visible = False
end
object CoLevel: TBtnEditC
Tag = 2
Left = 493
Top = 50
Width = 268
Height = 20
Hint = 'CoLevel/'#23458#25143#31561#32423
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 10
OnBtnUpClick = cocountryBtnUpClick
OnBtnDnClick = cocountryBtnDnClick
end
object marke: TBtnEditC
Tag = 2
Left = 77
Top = 146
Width = 276
Height = 20
Hint = 'marke/'#20027#35201#24066#22330
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 11
OnBtnUpClick = cocountryBtnUpClick
OnBtnDnClick = cocountryBtnDnClick
end
object CoreProducts: TBtnEditC
Tag = 2
Left = 492
Top = 142
Width = 269
Height = 20
Hint = 'CoreProducts/'#26680#24515#20135#21697
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 12
OnBtnUpClick = cocountryBtnUpClick
OnBtnDnClick = cocountryBtnDnClick
end
object Panel4: TPanel
Left = 793
Top = 0
Width = 389
Height = 368
Align = alRight
Caption = 'Panel1'
TabOrder = 13
object ToolBar2: TToolBar
Tag = 1
Left = 1
Top = 1
Width = 387
Height = 38
AutoSize = True
ButtonHeight = 38
ButtonWidth = 75
Caption = 'ToolBar1'
Color = clWhite
DisabledImages = DataLink_Company.ImageList_new32
Images = DataLink_Company.ImageList_new32
List = True
ParentColor = False
ShowCaptions = True
TabOrder = 0
object ToolButton5: TToolButton
Left = 0
Top = 0
AutoSize = True
Caption = #22686#34892
ImageIndex = 2
OnClick = ToolButton5Click
end
object ToolButton8: TToolButton
Left = 75
Top = 0
AutoSize = True
Caption = #21024#34892
ImageIndex = 6
OnClick = ToolButton8Click
end
end
object cxGrid1: TcxGrid
Left = 1
Top = 39
Width = 387
Height = 328
Align = alClient
BorderStyle = cxcbsNone
TabOrder = 1
object Tv1: TcxGridDBTableView
Navigator.Buttons.CustomButtons = <>
Navigator.Buttons.Delete.Enabled = False
Navigator.Buttons.Delete.Visible = False
DataController.DataSource = DS_1
DataController.Summary.DefaultGroupSummaryItems = <>
DataController.Summary.FooterSummaryItems = <
item
Kind = skSum
end
item
Kind = skSum
end
item
Kind = skSum
end>
DataController.Summary.SummaryGroups = <>
OptionsBehavior.GoToNextCellOnEnter = True
OptionsCustomize.ColumnFiltering = False
OptionsData.Deleting = False
OptionsData.DeletingConfirmation = False
OptionsView.GroupByBox = False
Styles.Footer = DataLink_Company.Default
Styles.Header = DataLink_Company.Default
object cxGridDBColumn9: TcxGridDBColumn
Caption = #31867#22411
DataBinding.FieldName = 'JRType'
PropertiesClassName = 'TcxButtonEditProperties'
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
Properties.OnButtonClick = cxGridDBColumn9PropertiesButtonClick
HeaderAlignmentHorz = taCenter
Width = 66
end
object cxGridDBColumn10: TcxGridDBColumn
Caption = #26085#26399
DataBinding.FieldName = 'Date'
PropertiesClassName = 'TcxDateEditProperties'
HeaderAlignmentHorz = taCenter
Width = 86
end
object Tv1Column1: TcxGridDBColumn
Caption = #25552#37266#20869#23481
DataBinding.FieldName = 'Note'
HeaderAlignmentHorz = taCenter
Width = 158
end
object Tv1Column3: TcxGridDBColumn
Caption = #21019#24314#20154
DataBinding.FieldName = 'Filler'
Visible = False
Width = 34
end
object Tv1Column2: TcxGridDBColumn
Caption = #21019#24314#20154'ID'
DataBinding.FieldName = 'FillId'
Visible = False
Width = 37
end
end
object cxGridLevel1: TcxGridLevel
GridView = Tv1
end
end
end
object CoAccount: TEdit
Tag = 2
Left = 77
Top = 175
Width = 276
Height = 20
TabOrder = 14
end
object CoOpenBank: TEdit
Tag = 2
Left = 493
Top = 175
Width = 268
Height = 20
TabOrder = 15
end
object CoDPNo: TEdit
Tag = 2
Left = 77
Top = 204
Width = 276
Height = 20
TabOrder = 16
end
end
object Panel1: TPanel
Left = 0
Top = 406
Width = 1182
Height = 237
Align = alClient
Caption = 'Panel1'
TabOrder = 2
object Panel3: TPanel
Left = 1
Top = 1
Width = 748
Height = 235
Align = alClient
Caption = 'Panel1'
TabOrder = 0
object ToolBar3: TToolBar
Tag = 1
Left = 1
Top = 1
Width = 746
Height = 38
AutoSize = True
ButtonHeight = 38
ButtonWidth = 91
Caption = 'ToolBar1'
Color = clWhite
DisabledImages = DataLink_Company.ImageList_new32
Images = DataLink_Company.ImageList_new32
List = True
ParentColor = False
ShowCaptions = True
TabOrder = 0
object ToolButton2: TToolButton
Left = 0
Top = 0
AutoSize = True
Caption = #35774#20026#40664#35748
ImageIndex = 15
OnClick = ToolButton2Click
end
object ToolButton6: TToolButton
Left = 95
Top = 0
AutoSize = True
Caption = #22686#34892
ImageIndex = 2
OnClick = ToolButton6Click
end
object ToolButton7: TToolButton
Left = 166
Top = 0
AutoSize = True
Caption = #21024#34892
ImageIndex = 6
OnClick = ToolButton7Click
end
end
object cxGrid2: TcxGrid
Left = 1
Top = 39
Width = 746
Height = 195
Align = alClient
BorderStyle = cxcbsNone
TabOrder = 1
object TV2: TcxGridDBTableView
Navigator.Buttons.CustomButtons = <>
Navigator.Buttons.Delete.Enabled = False
Navigator.Buttons.Delete.Visible = False
DataController.DataSource = DSLXR
DataController.Summary.DefaultGroupSummaryItems = <>
DataController.Summary.FooterSummaryItems = <
item
Kind = skSum
end
item
Kind = skSum
end
item
Kind = skSum
end>
DataController.Summary.SummaryGroups = <>
OptionsBehavior.GoToNextCellOnEnter = True
OptionsCustomize.ColumnFiltering = False
OptionsData.Deleting = False
OptionsData.DeletingConfirmation = False
OptionsView.GroupByBox = False
Styles.Footer = DataLink_Company.Default
Styles.Header = DataLink_Company.Default
object cxGridDBColumn2: TcxGridDBColumn
Caption = #40664#35748
DataBinding.FieldName = 'IsDefault'
PropertiesClassName = 'TcxCheckBoxProperties'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 76
end
object cxGridDBColumn3: TcxGridDBColumn
Caption = #32852#31995#20154
DataBinding.FieldName = 'Contacts'
PropertiesClassName = 'TcxTextEditProperties'
Properties.CharCase = ecUpperCase
HeaderAlignmentHorz = taCenter
Width = 77
end
object cxGridDBColumn5: TcxGridDBColumn
Caption = #32844#20301
DataBinding.FieldName = 'position'
PropertiesClassName = 'TcxButtonEditProperties'
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
Properties.OnButtonClick = ButtonEdit
HeaderAlignmentHorz = taCenter
Width = 66
end
object cxGridDBColumn6: TcxGridDBColumn
Caption = #32852#31995#30005#35805
DataBinding.FieldName = 'Telephone'
PropertiesClassName = 'TcxTextEditProperties'
Properties.CharCase = ecUpperCase
HeaderAlignmentHorz = taCenter
Width = 86
end
object cxGridDBColumn7: TcxGridDBColumn
Caption = #25163#26426#21495
DataBinding.FieldName = 'PhoneNumber'
PropertiesClassName = 'TcxTextEditProperties'
Properties.CharCase = ecUpperCase
HeaderAlignmentHorz = taCenter
Width = 109
end
object cxGridDBColumn8: TcxGridDBColumn
DataBinding.FieldName = 'EMAIL'
HeaderAlignmentHorz = taCenter
Width = 66
end
object TV2Column2: TcxGridDBColumn
Caption = #24494#20449#21495
DataBinding.FieldName = 'WeChat'
HeaderAlignmentHorz = taCenter
Width = 66
end
end
object cxGridLevel2: TcxGridLevel
GridView = TV2
end
end
end
object Panel2: TPanel
Left = 749
Top = 1
Width = 432
Height = 235
Align = alRight
Caption = 'Panel2'
TabOrder = 1
object GroupBox1: TGroupBox
Left = 1
Top = 1
Width = 430
Height = 233
Align = alClient
Caption = #32553#30053#22270#65288#21452#20987#22270#29255#26597#30475#21407#22270#65289
TabOrder = 0
object ScrollBox2: TScrollBox
Left = 2
Top = 14
Width = 426
Height = 217
Align = alClient
BevelInner = bvLowered
BorderStyle = bsNone
TabOrder = 0
end
end
end
end
object ADOQueryTemp: TADOQuery
Connection = DataLink_Company.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 949
Top = 129
end
object ADOQueryCmd: TADOQuery
Connection = DataLink_Company.ADOLink
Parameters = <>
Left = 1090
Top = 120
end
object ADOQueryMain: TADOQuery
Connection = DataLink_Company.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 1021
Top = 116
end
object cxGridPopupMenu2: TcxGridPopupMenu
PopupMenus = <>
Left = 294
Top = 501
end
object CDS_LXR: TClientDataSet
Aggregates = <>
Params = <>
Left = 378
Top = 503
end
object DSLXR: TDataSource
DataSet = CDS_LXR
Left = 463
Top = 510
end
object adoqueryPicture: TADOQuery
Connection = DataLink_Company.ADOLink
Parameters = <>
Left = 879
Top = 527
end
object cxGridPopupMenu1: TcxGridPopupMenu
Grid = cxGrid1
PopupMenus = <>
Left = 867
Top = 198
end
object CDS_1: TClientDataSet
Aggregates = <>
Params = <>
Left = 951
Top = 199
end
object DS_1: TDataSource
DataSet = CDS_1
Left = 1034
Top = 205
end
end