D7FZaideng/基础资料维护(BaseInfo.dll)/U_ZdyAttInputCP10.dfm
DESKTOP-E401PHE\Administrator 82c6347dad ~
2025-04-30 16:21:22 +08:00

711 lines
16 KiB
Plaintext

object frmZdyAttInputCP10: TfrmZdyAttInputCP10
Left = 392
Top = 203
Width = 876
Height = 615
Caption = #20135#21697#36164#26009#24405#20837
Color = clBtnFace
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
OldCreateOrder = False
Position = poScreenCenter
OnCreate = FormCreate
OnDestroy = FormDestroy
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 12
object Label17: TLabel
Left = 32
Top = 96
Width = 48
Height = 12
Caption = #20960' '#39068' '#33394
end
object ToolBar1: TToolBar
Left = 0
Top = 0
Width = 860
Height = 31
ButtonHeight = 30
ButtonWidth = 59
Caption = 'ToolBar1'
Color = clSkyBlue
DisabledImages = DataLink_BaseInfo.ThreeImgList
Flat = True
Images = DataLink_BaseInfo.ThreeImgList
List = True
ParentColor = False
ShowCaptions = True
TabOrder = 0
object Tsave: TToolButton
Left = 0
Top = 0
AutoSize = True
Caption = #20445#23384
ImageIndex = 14
OnClick = TsaveClick
end
object TBClose: TToolButton
Left = 63
Top = 0
AutoSize = True
Caption = #20851#38381
ImageIndex = 55
OnClick = TBCloseClick
end
end
object Panel1: TPanel
Left = 0
Top = 31
Width = 860
Height = 545
Align = alClient
BevelOuter = bvNone
TabOrder = 1
object GroupBox1: TGroupBox
Left = 0
Top = 0
Width = 860
Height = 545
Align = alClient
Color = clSkyBlue
ParentColor = False
TabOrder = 0
object Label1: TLabel
Left = 36
Top = 28
Width = 48
Height = 12
Caption = #20135#21697#32534#21495
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label2: TLabel
Left = 249
Top = 28
Width = 48
Height = 12
Caption = #20135#21697#21517#31216
end
object Label3: TLabel
Left = 36
Top = 54
Width = 48
Height = 12
Caption = #31867' '#22411
end
object Label6: TLabel
Left = 249
Top = 53
Width = 54
Height = 12
Caption = #35268#26684'/'#23610#30721
end
object Label13: TLabel
Left = 463
Top = 16
Width = 48
Height = 12
Caption = #20135#21697#22270#29255
end
object Label12: TLabel
Left = 36
Top = 80
Width = 48
Height = 12
Caption = #25104' '#20998
end
object Label39: TLabel
Left = 249
Top = 77
Width = 48
Height = 12
Caption = #23494' '#24230
end
object Label4: TLabel
Left = 249
Top = 101
Width = 48
Height = 12
Caption = #20811' '#37325
end
object Label5: TLabel
Left = 36
Top = 106
Width = 48
Height = 12
Caption = #38376' '#24133
end
object Label7: TLabel
Left = 36
Top = 254
Width = 48
Height = 12
Caption = #22791' '#27880
end
object Label8: TLabel
Left = 36
Top = 129
Width = 48
Height = 12
Caption = #25253#20215#31995#25968
end
object Label9: TLabel
Left = 249
Top = 126
Width = 48
Height = 12
Caption = #20379' '#24212' '#21830
end
object Label10: TLabel
Left = 242
Top = 152
Width = 60
Height = 12
Caption = #26368#20302#24211#23384#37327
end
object Label11: TLabel
Left = 828
Top = 250
Width = 48
Height = 12
Caption = #19968#32423#20215#26684
Visible = False
end
object Label14: TLabel
Left = 1041
Top = 246
Width = 48
Height = 12
Caption = #20108#32423#20215#26684
Visible = False
end
object Label15: TLabel
Left = 768
Top = 272
Width = 48
Height = 12
Caption = #19977#32423#20215#26684
Visible = False
end
object Label16: TLabel
Left = 36
Top = 153
Width = 48
Height = 12
Caption = #23610' '#30721
end
object Label18: TLabel
Left = 250
Top = 226
Width = 48
Height = 12
Caption = #39068' '#33394
Visible = False
end
object Label19: TLabel
Left = 36
Top = 366
Width = 48
Height = 12
Caption = #39068' '#33394
end
object Label20: TLabel
Left = 559
Top = 343
Width = 48
Height = 12
Caption = #39068#33394#22270#29255
end
object Label21: TLabel
Left = 36
Top = 178
Width = 52
Height = 12
Caption = #19968#32423#20215#26684
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label22: TLabel
Left = 235
Top = 176
Width = 65
Height = 12
Caption = #20108#32423#25104#20154#20215
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label23: TLabel
Left = 36
Top = 202
Width = 52
Height = 12
Caption = #19977#32423#20215#26684
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label24: TLabel
Left = 36
Top = 228
Width = 52
Height = 12
Caption = #23450#21046#20215#26684
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label25: TLabel
Left = 235
Top = 204
Width = 65
Height = 12
Caption = #20108#32423#20799#31461#20215
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label26: TLabel
Left = 505
Top = 291
Width = 48
Height = 12
Caption = #26465' '#24418' '#30721
Visible = False
end
object zdyCode: TEdit
Tag = 2
Left = 90
Top = 24
Width = 140
Height = 20
TabOrder = 0
Text = 'zdyCode'
end
object zdyName: TEdit
Tag = 2
Left = 303
Top = 24
Width = 141
Height = 20
TabOrder = 1
Text = 'zdyName'
end
object defstr1: TEdit
Tag = 2
Left = 303
Top = 49
Width = 141
Height = 20
TabOrder = 2
Text = 'Edit1'
end
object Picture4: TcxDBImage
Left = 457
Top = 29
Hint = 'FileName'
AutoSize = True
DataBinding.DataField = 'FilesOther'
DataBinding.DataSource = DataSource1
Properties.GraphicClassName = 'TJPEGImage'
Properties.ReadOnly = True
Properties.ShowFocusRect = False
Style.BorderStyle = ebsSingle
TabOrder = 3
OnDblClick = Picture6DblClick
Height = 220
Width = 316
end
object FileName: TcxButton
Left = 457
Top = 248
Width = 75
Height = 25
Hint = 'Filesother'
Caption = #21152#36733#22270#29255
TabOrder = 4
OnClick = FileNameClick
LookAndFeel.Kind = lfOffice11
end
object defstr2: TEdit
Tag = 2
Left = 90
Top = 74
Width = 140
Height = 20
TabOrder = 5
Text = 'Edit1'
end
object defnote2: TEdit
Tag = 2
Left = 303
Top = 73
Width = 141
Height = 20
TabOrder = 6
Text = 'Edit1'
end
object defstr8: TEdit
Tag = 2
Left = 303
Top = 98
Width = 141
Height = 20
TabOrder = 7
Text = 'defstr8'
end
object defstr7: TEdit
Tag = 2
Left = 90
Top = 98
Width = 140
Height = 20
TabOrder = 8
Text = 'Edit1'
end
object note: TMemo
Tag = 2
Left = 90
Top = 253
Width = 353
Height = 101
Lines.Strings = (
'note')
ScrollBars = ssVertical
TabOrder = 9
end
object defstr5: TComboBox
Tag = 2
Left = 90
Top = 48
Width = 140
Height = 20
Style = csDropDownList
ItemHeight = 12
TabOrder = 10
Items.Strings = (
#33258#24049
#23458#25143)
end
object defflt3: TcxCurrencyEdit
Tag = 2
Left = 90
Top = 124
Properties.DisplayFormat = '0.##'
TabOrder = 11
Width = 140
end
object defnote3: TBtnEditA
Tag = 2
Left = 303
Top = 124
Width = 141
Height = 20
TabOrder = 12
OnBtnClick = defnote3BtnClick
end
object defflt4: TcxCurrencyEdit
Tag = 2
Left = 303
Top = 150
Properties.DisplayFormat = '0.##'
TabOrder = 13
Width = 141
end
object fprice: TEdit
Tag = 2
Left = 90
Top = 175
Width = 140
Height = 20
TabOrder = 14
end
object sprice: TEdit
Tag = 2
Left = 303
Top = 174
Width = 141
Height = 20
TabOrder = 15
end
object tprice: TEdit
Tag = 2
Left = 90
Top = 199
Width = 140
Height = 20
TabOrder = 16
end
object CYCM: TBtnEditA
Tag = 2
Left = 90
Top = 149
Width = 141
Height = 20
TabOrder = 17
OnBtnClick = CYCMBtnClick
end
object cycolor: TBtnEditA
Tag = 2
Left = 304
Top = 222
Width = 141
Height = 20
TabOrder = 18
Visible = False
OnBtnClick = cycolorBtnClick
end
object Panel2: TPanel
Left = 90
Top = 365
Width = 465
Height = 157
Caption = 'Panel2'
TabOrder = 19
object cxGrid2: TcxGrid
Left = 1
Top = 32
Width = 463
Height = 124
Align = alClient
TabOrder = 0
object Tv2: TcxGridDBTableView
Navigator.Buttons.CustomButtons = <>
Navigator.Buttons.Delete.Enabled = False
Navigator.Buttons.Delete.Visible = False
OnFocusedRecordChanged = Tv2FocusedRecordChanged
DataController.DataSource = DataSource2
DataController.Filter.AutoDataSetFilter = True
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.Footer = True
OptionsView.GroupByBox = False
Styles.Inactive = DataLink_BaseInfo.SHuangSe
Styles.IncSearch = DataLink_BaseInfo.SHuangSe
Styles.Selection = DataLink_BaseInfo.SHuangSe
Styles.Header = DataLink_BaseInfo.handBlack
object v2Column2: TcxGridDBColumn
Caption = #39068#33394
DataBinding.FieldName = 'cyys'
PropertiesClassName = 'TcxTextEditProperties'
HeaderAlignmentHorz = taCenter
Options.Sorting = False
Width = 220
end
object Tv2Column1: TcxGridDBColumn
Caption = #39068#33394#22270#29255
DataBinding.FieldName = 'YSFile'
PropertiesClassName = 'TcxButtonEditProperties'
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
Properties.OnButtonClick = Tv2Column1PropertiesButtonClick
HeaderAlignmentHorz = taCenter
Width = 60
end
end
object cxGridLevel1: TcxGridLevel
GridView = Tv2
end
end
object ToolBar2: TToolBar
Left = 1
Top = 1
Width = 463
Height = 31
ButtonHeight = 30
ButtonWidth = 59
Caption = 'ToolBar1'
Color = clSkyBlue
DisabledImages = DataLink_BaseInfo.ThreeImgList
Flat = True
Images = DataLink_BaseInfo.ThreeImgList
List = True
ParentColor = False
ShowCaptions = True
TabOrder = 1
object ToolButton7: TToolButton
Left = 0
Top = 0
AutoSize = True
Caption = #22686#21152
ImageIndex = 22
OnClick = ToolButton7Click
end
object ToolButton9: TToolButton
Left = 63
Top = 0
AutoSize = True
Caption = #21024#38500
ImageIndex = 100
OnClick = ToolButton9Click
end
end
end
object Picture6: TcxDBImage
Left = 556
Top = 366
Hint = 'FileName'
DataBinding.DataField = 'FilesOther'
DataBinding.DataSource = DSImage
Properties.GraphicClassName = 'TJPEGImage'
Properties.ReadOnly = True
Properties.ShowFocusRect = False
Style.BorderStyle = ebsSingle
TabOrder = 20
OnDblClick = Picture6DblClick
Height = 161
Width = 229
end
object DZprice: TEdit
Tag = 2
Left = 90
Top = 224
Width = 141
Height = 20
TabOrder = 21
end
object seprice: TEdit
Tag = 2
Left = 303
Top = 198
Width = 141
Height = 20
TabOrder = 22
end
object CPtxm: TEdit
Tag = 2
Left = 559
Top = 288
Width = 141
Height = 20
TabOrder = 23
Visible = False
end
end
end
object PopupMenu1: TPopupMenu
Left = 1140
Top = 103
object N1: TMenuItem
Caption = #21024#38500
end
object N3: TMenuItem
Caption = '-'
end
object N2: TMenuItem
Caption = #21478#23384#20026'...'
end
end
object ADOQueryCmd: TADOQuery
Connection = DataLink_BaseInfo.ADOLink
EnableBCD = False
Parameters = <>
Left = 720
Top = 71
end
object ADOQueryTmp: TADOQuery
Connection = DataLink_BaseInfo.ADOLink
EnableBCD = False
Parameters = <>
Left = 720
Top = 139
end
object ADOQueryImage: TADOQuery
Connection = DataLink_BaseInfo.ADOLink
EnableBCD = False
Parameters = <>
Left = 736
Top = 227
end
object ADOQuerymain: TADOQuery
Connection = DataLink_BaseInfo.ADOLink
EnableBCD = False
Parameters = <>
Left = 716
Top = 191
end
object IdFTP1: TIdFTP
MaxLineAction = maException
ReadTimeout = 0
ProxySettings.ProxyType = fpcmNone
ProxySettings.Port = 0
Left = 784
Top = 178
end
object DataSource1: TDataSource
DataSet = ADOQueryImage
Left = 804
Top = 231
end
object CDS_Sub: TClientDataSet
Aggregates = <>
Params = <>
Left = 284
Top = 344
end
object DataSource2: TDataSource
DataSet = CDS_Sub
Left = 323
Top = 347
end
object ADOQuerySub: TADOQuery
Connection = DataLink_BaseInfo.ADOLink
Parameters = <>
Left = 245
Top = 345
end
object ADOQueryImageYS: TADOQuery
Connection = DataLink_BaseInfo.ADOLink
EnableBCD = False
Parameters = <>
Left = 800
Top = 475
end
object DSImage: TDataSource
DataSet = ADOQueryImageYS
Left = 644
Top = 384
end
end