object ZJJLFrame: TZJJLFrame Left = 0 Top = 0 Width = 390 Height = 517 Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] ParentFont = False TabOrder = 0 object labTitle: TJimGradLabel Left = 0 Top = 0 Width = 390 Height = 20 Align = alTop AutoSize = False ColorBegin = clGradientInactiveCaption ColorEnd = clGradientInactiveCaption Caption = ' '#20013#38388#35745#37327 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False Layout = tlCenter end object pnlTop: TPanel Left = 0 Top = 20 Width = 390 Height = 27 Align = alTop BevelOuter = bvNone TabOrder = 0 object pnlButton: TPanel Left = 0 Top = 0 Width = 81 Height = 27 Align = alLeft BevelOuter = bvNone TabOrder = 0 object tobaTop: TToolBar Left = 0 Top = 0 Width = 81 Height = 22 AutoSize = True ButtonWidth = 75 Caption = 'tobaTop' EdgeInner = esNone EdgeOuter = esNone Flat = True Images = MainForm.Images List = True ShowCaptions = True TabOrder = 0 object tobtnGenerate: TToolButton Left = 0 Top = 0 Action = actnGenerate end end end object lePreText: TLabeledEdit Left = 152 Top = 3 Width = 58 Height = 18 Ctl3D = False EditLabel.Width = 66 EditLabel.Height = 12 EditLabel.Caption = #34920#21495#21069#32512#65306' ' LabelPosition = lpLeft ParentCtl3D = False TabOrder = 1 OnExit = lePreTextExit end end object pnlZJJL: TPanel Left = 0 Top = 47 Width = 390 Height = 190 Align = alClient BevelOuter = bvNone TabOrder = 1 object zgZJJL: TZJGrid Left = 0 Top = 18 Width = 390 Height = 172 Options = [goRangeSelect, goRowSizing, goColSizing, goCellNotMaintainData, goFixedRowShowNo, goFixedColShowNo, goAlwaysShowSelection] OptionsEx = [] ColCount = 4 ShowGridLine = False DefaultColWidth = 73 DefaultFixedColWidth = 25 Selection.AlphaBlend = False Selection.TransparentColor = False FrozenCol = 0 FrozenRow = 0 OnMouseDown = zgZJJLMouseDown Align = alClient end object pnlListTitle: TPanel Left = 0 Top = 0 Width = 390 Height = 18 Align = alTop BevelOuter = bvNone TabOrder = 1 DesignSize = ( 390 18) object lblListTitle: TLabel Left = 6 Top = 3 Width = 84 Height = 12 Caption = #20013#38388#35745#37327#34920#21015#34920 Font.Charset = ANSI_CHARSET Font.Color = clBlue Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] ParentFont = False end object pnlListBar: TPanel Left = 95 Top = 8 Width = 287 Height = 2 Anchors = [akLeft, akTop, akRight] BevelOuter = bvLowered TabOrder = 0 end end end object pnlZJJLProperty: TPanel Left = 0 Top = 237 Width = 390 Height = 280 Align = alBottom BevelOuter = bvNone TabOrder = 2 object pnlDataTitle: TPanel Left = 0 Top = 0 Width = 390 Height = 22 Align = alTop BevelOuter = bvNone TabOrder = 0 DesignSize = ( 390 22) object lblDataTiel: TLabel Left = 5 Top = 5 Width = 84 Height = 12 Caption = #20013#38388#35745#37327#34920#25968#25454 Font.Charset = ANSI_CHARSET Font.Color = clBlue Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] ParentFont = False end object pnlDataBar: TPanel Left = 94 Top = 10 Width = 287 Height = 2 Anchors = [akLeft, akTop, akRight] BevelOuter = bvLowered TabOrder = 0 end end end object alBGL: TActionList Images = MainForm.Images Left = 200 Top = 160 object actnGenerate: TAction Caption = #33258#21160#29983#25104 ImageIndex = 32 OnExecute = actnGenerateExecute OnUpdate = actnGenerateUpdate end object actnLocateBills: TAction Caption = #23450#20301#33267#21488#36134 OnExecute = actnLocateBillsExecute OnUpdate = actnLocateBillsUpdate end object actnGenerateFxZJJL: TAction Caption = '0'#21495#21488#36134#26684#24335 ImageIndex = 32 OnExecute = actnGenerateFxZJJLExecute end object actnGenerateGclZJJL: TAction Caption = #24635#37327#25511#21046#26684#24335 ImageIndex = 32 OnExecute = actnGenerateGclZJJLExecute end end object zaZJJL: TZjGridDBA Columns = < item Title.Caption = #20013#38388#35745#37327#34920#21495 Title.CaptionAcrossCols = '1' Title.Font.Charset = GB2312_CHARSET Title.Font.Color = clWindowText Title.Font.Height = -12 Title.Font.Name = #23435#20307 Title.Font.Style = [] Alignment = taLeftJustify Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] FieldName = 'Code' ReadOnly = False end item Title.Caption = #20132#24037#35777#20070'/'#20973#35777#21495 Title.CaptionAcrossCols = '1' Title.Font.Charset = GB2312_CHARSET Title.Font.Color = clWindowText Title.Font.Height = -12 Title.Font.Name = #23435#20307 Title.Font.Style = [] Alignment = taLeftJustify Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] FieldName = 'CertificateCode' ReadOnly = False end item Title.Caption = #39033#30446#33410#32534#21495 Title.CaptionAcrossCols = '1' Title.Font.Charset = GB2312_CHARSET Title.Font.Color = clWindowText Title.Font.Height = -12 Title.Font.Name = #23435#20307 Title.Font.Style = [] Alignment = taLeftJustify Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] FieldName = 'BillsCode' ReadOnly = True end> Grid = zgZJJL ExtendRowCount = 0 Options = [aoAllowEdit, aoAllowDelete] Left = 152 Top = 160 end object dxpmZJJL: TdxBarPopupMenu BarManager = MainForm.dxBarManager ItemLinks = < item Item = MainForm.dxbtnLocateBills Visible = True end item BeginGroup = True Item = MainForm.dxbtnDelete Visible = True end> UseOwnFont = False OnPopup = dxpmZJJLPopup Left = 104 Top = 160 end object dxpmAutoGenerate: TdxBarPopupMenu BarManager = MainForm.dxBarManager ItemLinks = < item Item = MainForm.dxbtnFxZJJL Visible = True end item Item = MainForm.dxbtnGclZJJL Visible = True end> UseOwnFont = False OnPopup = dxpmAutoGeneratePopup Left = 104 Top = 200 end end