object frmBangAdd: TfrmBangAdd Left = 232 Top = 185 Width = 703 Height = 396 Caption = #26816#39564#31216#37325 Color = clBtnFace Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] OldCreateOrder = False OnClose = FormClose OnDestroy = FormDestroy OnShow = FormShow PixelsPerInch = 96 TextHeight = 12 object Label1: TLabel Left = 193 Top = 79 Width = 52 Height = 12 Caption = #25195#25551#20837#21475 Font.Charset = GB2312_CHARSET Font.Color = clRed Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label2: TLabel Left = 392 Top = 77 Width = 9 Height = 16 Font.Charset = GB2312_CHARSET Font.Color = clRed Font.Height = -16 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False Visible = False end object Label3: TLabel Left = 193 Top = 115 Width = 54 Height = 12 Caption = #31216' '#37325 Font.Charset = GB2312_CHARSET Font.Color = clBlue Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label4: TLabel Left = 387 Top = 115 Width = 15 Height = 14 Caption = #30917 Font.Charset = GB2312_CHARSET Font.Color = clBlack Font.Height = -14 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label5: TLabel Left = 193 Top = 147 Width = 54 Height = 12 Caption = #32440' '#31649 Font.Charset = GB2312_CHARSET Font.Color = clBlue Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label6: TLabel Left = 387 Top = 147 Width = 15 Height = 14 Caption = #30917 Font.Charset = GB2312_CHARSET Font.Color = clBlack Font.Height = -14 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label7: TLabel Left = 193 Top = 179 Width = 54 Height = 12 Caption = #33014' '#24102 Font.Charset = GB2312_CHARSET Font.Color = clBlue Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label8: TLabel Left = 387 Top = 179 Width = 15 Height = 14 Caption = #30917 Font.Charset = GB2312_CHARSET Font.Color = clBlack Font.Height = -14 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object MJID: TEdit Left = 248 Top = 73 Width = 138 Height = 24 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = #23435#20307 Font.Style = [] ParentFont = False TabOrder = 0 OnKeyPress = MJIDKeyPress end object Button1: TButton Left = 193 Top = 232 Width = 57 Height = 25 Caption = #30830#23450 TabOrder = 1 OnClick = Button1Click OnKeyPress = Button1KeyPress end object Button2: TButton Left = 343 Top = 232 Width = 60 Height = 25 Caption = #36864#20986 TabOrder = 2 OnClick = Button2Click end object Edit1: TEdit Left = 248 Top = 109 Width = 136 Height = 24 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = #23435#20307 Font.Style = [] ParentFont = False TabOrder = 3 OnKeyPress = MJIDKeyPress end object CheckBox1: TCheckBox Left = 248 Top = 44 Width = 97 Height = 17 Caption = #33258#21160#35835#21462 Checked = True State = cbChecked TabOrder = 4 OnClick = CheckBox1Click end object Edit2: TEdit Left = 248 Top = 141 Width = 136 Height = 24 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = #23435#20307 Font.Style = [] ParentFont = False TabOrder = 5 OnKeyPress = MJIDKeyPress end object Edit3: TEdit Left = 248 Top = 173 Width = 136 Height = 24 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = #23435#20307 Font.Style = [] ParentFont = False TabOrder = 6 OnKeyPress = MJIDKeyPress end object ADOCmd: TADOQuery Connection = DataLink_RCInspection.ADOLink Parameters = <> Left = 608 Top = 144 end object ADOTmp: TADOQuery Connection = DataLink_RCInspection.ADOLink LockType = ltReadOnly Parameters = <> Left = 608 Top = 200 end object RM2: TRMGridReport ThreadPrepareReport = True InitialZoom = pzDefault PreviewButtons = [pbZoom, pbLoad, pbSave, pbPrint, pbFind, pbPageSetup, pbExit, pbExport, pbNavigator] DefaultCollate = False ShowPrintDialog = False SaveReportOptions.RegistryPath = 'Software\ReportMachine\ReportSettings\' PreviewOptions.RulerUnit = rmutScreenPixels PreviewOptions.RulerVisible = False PreviewOptions.DrawBorder = False PreviewOptions.BorderPen.Color = clGray PreviewOptions.BorderPen.Style = psDash Dataset = RMDB_Main CompressLevel = rmzcFastest CompressThread = False LaterBuildEvents = True OnlyOwnerDataSet = False Left = 560 Top = 200 ReportData = {} end object RMDB_Main: TRMDBDataSet Visible = True DataSet = ADOQueryPrint Left = 536 Top = 144 end object ADOQueryPrint: TADOQuery Connection = DataLink_RCInspection.ADOLink Parameters = <> Left = 512 Top = 184 end end