object frmCPGangNo: TfrmCPGangNo Left = 41 Top = 60 Width = 1350 Height = 671 Caption = #25442#32568#21495#31383#21475 Color = clBtnFace Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] OldCreateOrder = False WindowState = wsMaximized OnClose = FormClose OnCreate = FormCreate OnDestroy = FormDestroy OnShow = FormShow PixelsPerInch = 96 TextHeight = 12 object ToolBar1: TToolBar Left = 0 Top = 0 Width = 1446 Height = 33 ButtonHeight = 30 ButtonWidth = 59 Caption = 'ToolBar1' Color = clSkyBlue EdgeInner = esNone EdgeOuter = esNone Flat = True Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] Images = DataLink_TradeManage.ThreeImgList List = True ParentColor = False ParentFont = False ShowCaptions = True TabOrder = 0 Visible = False object TBClose: TToolButton Left = 0 Top = 0 AutoSize = True Caption = #20851#38381 ImageIndex = 55 OnClick = TBCloseClick end end object Panel1: TPanel Left = 0 Top = 33 Width = 1446 Height = 48 Align = alTop BevelInner = bvRaised BevelOuter = bvLowered Color = clSkyBlue TabOrder = 1 object Label16: TLabel Left = 420 Top = 56 Width = 48 Height = 12 Caption = #36135#36816#31867#22411 Font.Charset = GB2312_CHARSET Font.Color = clRed Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] ParentFont = False Visible = False end object Label15: TLabel Left = 44 Top = 56 Width = 48 Height = 12 Caption = #37197#36135#20154#21592 Font.Charset = GB2312_CHARSET Font.Color = clRed Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] ParentFont = False Visible = False end object Label14: TLabel Left = 234 Top = 56 Width = 24 Height = 12 Caption = #21253#21495 Font.Charset = GB2312_CHARSET Font.Color = clRed Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] ParentFont = False Visible = False end object Label1: TLabel Left = 40 Top = 14 Width = 100 Height = 24 Caption = #26465#30721#32534#21495 Font.Charset = GB2312_CHARSET Font.Color = clBlue Font.Height = -24 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label3: TLabel Left = 395 Top = 14 Width = 125 Height = 24 Caption = #20462#25913#21518#32568#21495 Font.Charset = GB2312_CHARSET Font.Color = clRed Font.Height = -24 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label4: TLabel Left = 545 Top = 66 Width = 75 Height = 24 Caption = #21253#26465#30721 Font.Charset = GB2312_CHARSET Font.Color = clRed Font.Height = -24 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label34: TLabel Left = 1023 Top = 14 Width = 80 Height = 22 Caption = #25171#21360#20221#25968 Font.Charset = ANSI_CHARSET Font.Color = clRed Font.Height = -19 Font.Name = 'Arial' Font.Style = [] ParentFont = False end object PHYG: TBtnEditA Left = 96 Top = 52 Width = 100 Height = 20 ImeName = #20013#25991' ('#31616#20307') - '#25628#29399#25340#38899#36755#20837#27861 TabOrder = 0 Visible = False end object defstr2: TComboBox Left = 472 Top = 52 Width = 101 Height = 20 Style = csDropDownList Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Pitch = fpFixed Font.Style = [] ImeName = #20013#25991' ('#31616#20307') - '#25628#29399#25340#38899#36755#20837#27861 ItemHeight = 12 ItemIndex = 0 ParentFont = False TabOrder = 2 Visible = False Items.Strings = ( '' #24555#20214 #24930#20214) end object packNo: TcxCurrencyEdit Left = 262 Top = 52 Properties.DecimalPlaces = 0 Properties.DisplayFormat = '0' TabOrder = 3 Visible = False Width = 100 end object SmNO: TEdit Left = 144 Top = 10 Width = 165 Height = 32 Font.Charset = GB2312_CHARSET Font.Color = clBlue Font.Height = -24 Font.Name = #23435#20307 Font.Style = [fsBold] ImeName = #20013#25991' ('#31616#20307') - '#25628#29399#25340#38899#36755#20837#27861 ParentFont = False TabOrder = 1 OnKeyPress = SmNOKeyPress end object baoNo: TEdit Left = 523 Top = 10 Width = 66 Height = 32 Hint = 'baoNo' Font.Charset = GB2312_CHARSET Font.Color = clRed Font.Height = -24 Font.Name = #23435#20307 Font.Style = [fsBold] ImeName = #20013#25991' ('#31616#20307') - '#25628#29399#25340#38899#36755#20837#27861 ParentFont = False TabOrder = 4 OnClick = baoNoClick end object BaoID: TEdit Left = 618 Top = 58 Width = 170 Height = 32 Font.Charset = GB2312_CHARSET Font.Color = clRed Font.Height = -24 Font.Name = #23435#20307 Font.Style = [fsBold] ImeName = #20013#25991' ('#31616#20307') - '#25628#29399#25340#38899#36755#20837#27861 ParentFont = False TabOrder = 5 OnClick = baoNoClick end object FileName: TcxButton Left = 1184 Top = 8 Width = 77 Height = 33 Hint = 'Filesother' Caption = #25171#21360#21367#26631#31614 Font.Charset = GB2312_CHARSET Font.Color = clRed Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 6 OnClick = FileNameClick LookAndFeel.Kind = lfOffice11 end object cxButton1: TcxButton Left = 1268 Top = 8 Width = 77 Height = 33 Hint = 'Filesother' Caption = #20851#38381 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 7 OnClick = cxButton1Click LookAndFeel.Kind = lfOffice11 end object ComboBox1: TComboBox Left = 1104 Top = 4 Width = 49 Height = 40 Style = csDropDownList Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -29 Font.Name = 'Times New Roman' Font.Style = [fsBold] ImeName = #20013#25991' ('#31616#20307') - '#25628#29399#25340#38899#36755#20837#27861 ItemHeight = 32 ItemIndex = 0 ParentFont = False TabOrder = 8 Text = '1' Items.Strings = ( '1' '2' '3' '4') end object cxButton2: TcxButton Left = 672 Top = 8 Width = 77 Height = 33 Hint = 'Filesother' Caption = #20445#23384 Font.Charset = GB2312_CHARSET Font.Color = clRed Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 9 OnClick = cxButton2Click LookAndFeel.Kind = lfOffice11 end object cxButton3: TcxButton Left = 796 Top = 8 Width = 77 Height = 33 Hint = 'Filesother' Caption = #21024#38500 Font.Charset = GB2312_CHARSET Font.Color = clRed Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 10 OnClick = cxButton3Click LookAndFeel.Kind = lfOffice11 end end object Panel2: TPanel Left = 184 Top = 233 Width = 1262 Height = 464 Caption = 'Panel2' TabOrder = 2 object cxGrid2: TcxGrid Left = 1 Top = 1 Width = 1260 Height = 462 Align = alClient TabOrder = 0 object TV2: TcxGridDBTableView NavigatorButtons.ConfirmDelete = False OnCustomDrawCell = TV2CustomDrawCell DataController.DataSource = DataSource2 DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost] DataController.Summary.DefaultGroupSummaryItems = < item Format = 'C_Code' end> DataController.Summary.FooterSummaryItems = < item Kind = skSum Column = cxGridDBColumn5 end item Kind = skSum Column = cxGridDBColumn6 end item Kind = skSum end item Kind = skSum Column = V2Column2 end item Kind = skSum Column = V2Column3 end item Kind = skSum end item Kind = skSum end> DataController.Summary.SummaryGroups = <> OptionsBehavior.FocusCellOnTab = True OptionsBehavior.GoToNextCellOnEnter = True OptionsBehavior.FocusCellOnCycle = True OptionsCustomize.ColumnFiltering = False OptionsView.Footer = True OptionsView.GroupByBox = False OptionsView.Indicator = True Styles.Header = DataLink_TradeManage.Default object V2Column4: TcxGridDBColumn Caption = #36873#25321 DataBinding.FieldName = 'Ssel' PropertiesClassName = 'TcxCheckBoxProperties' Properties.ImmediatePost = True Properties.NullStyle = nssUnchecked HeaderAlignmentHorz = taCenter Width = 60 end object cxGridDBColumn1: TcxGridDBColumn Caption = #25195#25551#20449#24687 DataBinding.FieldName = 'SDefNote' HeaderAlignmentHorz = taCenter Options.Editing = False Styles.Content = DataLink_TradeManage.FoneRed Styles.Footer = DataLink_TradeManage.FoneRed Styles.Header = DataLink_TradeManage.FoneRed Width = 157 end object cxGridDBColumn2: TcxGridDBColumn Caption = #26465#30721#21495 DataBinding.FieldName = 'MJID' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 113 end object V2OrderNo: TcxGridDBColumn Caption = #35746#21333#21495 DataBinding.FieldName = 'OrderNo' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 70 end object cxGridDBColumn4: TcxGridDBColumn Caption = #21697#21517 DataBinding.FieldName = 'MPRTCodeName' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 116 end object cxGridDBColumn3: TcxGridDBColumn Caption = #39068#33394 DataBinding.FieldName = 'PRTColor' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 107 end object V2MJstr4: TcxGridDBColumn Caption = #21407#32568#21495 DataBinding.FieldName = 'MJstr4' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 80 end object V2Column1: TcxGridDBColumn Caption = #32568#21495 DataBinding.FieldName = 'BCGangNO' Visible = False HeaderAlignmentHorz = taCenter Options.Editing = False Width = 120 end object cxGridDBColumn7: TcxGridDBColumn Caption = #31561#32423 DataBinding.FieldName = 'MJType' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 105 end object V2BaoID: TcxGridDBColumn Caption = #21253#26465#30721 DataBinding.FieldName = 'BaoID' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 102 end object V2BaoNO: TcxGridDBColumn Caption = #21253#21495 DataBinding.FieldName = 'BaoNO' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 51 end object cxGridDBColumn5: TcxGridDBColumn Caption = #21305#25968 DataBinding.FieldName = 'SOrdQty1' HeaderAlignmentHorz = taCenter Options.Editing = False Styles.Content = DataLink_TradeManage.FontBlue Styles.Footer = DataLink_TradeManage.FontBlue Styles.Header = DataLink_TradeManage.FontBlue Width = 60 end object cxGridDBColumn6: TcxGridDBColumn Caption = #25968#37327 DataBinding.FieldName = 'MJLen' HeaderAlignmentHorz = taCenter Options.Editing = False Styles.Content = DataLink_TradeManage.FontBlue Styles.Footer = DataLink_TradeManage.FontBlue Styles.Header = DataLink_TradeManage.FontBlue Width = 60 end object V2Column2: TcxGridDBColumn Caption = #27611#37325 DataBinding.FieldName = 'MJMaoZ' HeaderAlignmentHorz = taCenter Options.Editing = False Styles.Content = DataLink_TradeManage.FontBlue Styles.Footer = DataLink_TradeManage.FontBlue Styles.Header = DataLink_TradeManage.FontBlue Width = 60 end object V2Column3: TcxGridDBColumn Caption = #20928#37325 DataBinding.FieldName = 'MJQty4' HeaderAlignmentHorz = taCenter Options.Editing = False Styles.Content = DataLink_TradeManage.FontBlue Styles.Footer = DataLink_TradeManage.FontBlue Styles.Header = DataLink_TradeManage.FontBlue Width = 60 end end object cxGridLevel1: TcxGridLevel GridView = TV2 end end end object Panel3: TPanel Left = 1027 Top = 423 Width = 290 Height = 286 BevelInner = bvRaised BevelOuter = bvLowered Color = clSkyBlue TabOrder = 4 Visible = False object SpeedButton1: TSpeedButton Left = 4 Top = 211 Width = 140 Height = 70 Caption = '0' Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -37 Font.Name = #40657#20307 Font.Style = [] ParentFont = False OnClick = SpeedButton1Click end object SpeedButton2: TSpeedButton Left = 4 Top = 143 Width = 70 Height = 70 Caption = '1' Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -37 Font.Name = #40657#20307 Font.Style = [] ParentFont = False OnClick = SpeedButton1Click end object SpeedButton3: TSpeedButton Left = 74 Top = 143 Width = 70 Height = 70 Caption = '2' Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -37 Font.Name = #40657#20307 Font.Style = [] ParentFont = False OnClick = SpeedButton1Click end object SpeedButton4: TSpeedButton Left = 144 Top = 143 Width = 70 Height = 70 Caption = '3' Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -37 Font.Name = #40657#20307 Font.Style = [] ParentFont = False OnClick = SpeedButton1Click end object SpeedButton5: TSpeedButton Left = 4 Top = 73 Width = 70 Height = 70 Caption = '4' Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -37 Font.Name = #40657#20307 Font.Style = [] ParentFont = False OnClick = SpeedButton1Click end object SpeedButton6: TSpeedButton Left = 74 Top = 73 Width = 70 Height = 70 Caption = '5' Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -37 Font.Name = #40657#20307 Font.Style = [] ParentFont = False OnClick = SpeedButton1Click end object SpeedButton7: TSpeedButton Left = 144 Top = 73 Width = 70 Height = 70 Caption = '6' Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -37 Font.Name = #40657#20307 Font.Style = [] ParentFont = False OnClick = SpeedButton1Click end object SpeedButton8: TSpeedButton Left = 4 Top = 3 Width = 70 Height = 70 Caption = '7' Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -37 Font.Name = #40657#20307 Font.Style = [] ParentFont = False OnClick = SpeedButton1Click end object SpeedButton9: TSpeedButton Left = 74 Top = 2 Width = 70 Height = 70 Caption = '8' Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -37 Font.Name = #40657#20307 Font.Style = [] ParentFont = False OnClick = SpeedButton1Click end object SpeedButton10: TSpeedButton Left = 144 Top = 2 Width = 70 Height = 70 Caption = '9' Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -37 Font.Name = #40657#20307 Font.Style = [] ParentFont = False OnClick = SpeedButton1Click end object SpeedButton11: TSpeedButton Tag = 9 Left = 144 Top = 213 Width = 70 Height = 68 Caption = '.' Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -32 Font.Name = #40657#20307 Font.Style = [fsBold] ParentFont = False OnClick = SpeedButton1Click end object SpeedButton12: TSpeedButton Left = 214 Top = 2 Width = 70 Height = 70 Caption = #8592 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -37 Font.Name = #40657#20307 Font.Style = [] ParentFont = False OnClick = SpeedButton12Click end object SpeedButton49: TSpeedButton Tag = 9 Left = 214 Top = 73 Width = 70 Height = 208 Caption = #30830#23450 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -29 Font.Name = #26999#20307'_GB2312' Font.Style = [fsBold] ParentFont = False OnClick = SpeedButton49Click end end object Panel4: TPanel Left = 0 Top = 81 Width = 149 Height = 616 Align = alLeft BevelInner = bvRaised BevelOuter = bvLowered Caption = 'Panel4' TabOrder = 5 Visible = False object cxGrid3: TcxGrid Left = 2 Top = 57 Width = 145 Height = 557 Align = alClient TabOrder = 0 object Tv3: TcxGridDBTableView NavigatorButtons.ConfirmDelete = False DataController.DataSource = DSTm DataController.Summary.DefaultGroupSummaryItems = <> DataController.Summary.FooterSummaryItems = < item Kind = skSum end item Kind = skSum end item Kind = skSum end item Kind = skSum end item Kind = skSum end item Kind = skSum end item Kind = skSum end item Kind = skSum end item Kind = skSum end item Kind = skSum end item Kind = skSum end item Kind = skSum end> DataController.Summary.SummaryGroups = <> OptionsCustomize.ColumnFiltering = False OptionsData.Editing = False OptionsSelection.CellSelect = False OptionsView.GroupByBox = False OptionsView.Indicator = True OptionsView.IndicatorWidth = 20 Styles.Header = DataLink_TradeManage.Default object Tv3Column1: TcxGridDBColumn Caption = #26465#30721 DataBinding.FieldName = 'MJID' HeaderAlignmentHorz = taCenter Styles.Content = DataLink_TradeManage.FontBlue Styles.Footer = DataLink_TradeManage.FontBlue Width = 80 end object v3Column1: TcxGridDBColumn Caption = #21697#21517 DataBinding.FieldName = 'MPRTCodeName' HeaderAlignmentHorz = taCenter Width = 80 end object v3Column2: TcxGridDBColumn Caption = #39068#33394 DataBinding.FieldName = 'PRTColor' HeaderAlignmentHorz = taCenter Width = 80 end object v3Column3: TcxGridDBColumn Caption = #25968#37327 DataBinding.FieldName = 'MJlen' HeaderAlignmentHorz = taCenter Width = 80 end end object cxGridLevel2: TcxGridLevel GridView = Tv3 end end object Panel5: TPanel Left = 2 Top = 2 Width = 145 Height = 55 Align = alTop BevelOuter = bvNone TabOrder = 1 object Label6: TLabel Left = 32 Top = 21 Width = 45 Height = 14 Caption = #35746#21333#21495 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -14 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object BtnEditA1: TBtnEditA Left = 80 Top = 17 Width = 153 Height = 22 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -14 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 0 OnBtnClick = BtnEditA1BtnClick end end end object MovePanel1: TMovePanel Left = 430 Top = 156 Width = 801 Height = 353 BevelInner = bvLowered Color = clSkyBlue TabOrder = 3 Visible = False object Label2: TLabel Left = 244 Top = 164 Width = 198 Height = 64 Caption = 'Label2' Font.Charset = GB2312_CHARSET Font.Color = clRed Font.Height = -64 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Edit2: TEdit Left = 177 Top = 43 Width = 412 Height = 72 Enabled = False Font.Charset = GB2312_CHARSET Font.Color = clRed Font.Height = -64 Font.Name = #23435#20307 Font.Style = [fsBold] ImeName = #20013#25991' ('#31616#20307') - '#25628#29399#25340#38899#36755#20837#27861 ParentFont = False ReadOnly = True TabOrder = 0 Text = '91209120001' end object Button4: TButton Left = 296 Top = 272 Width = 75 Height = 41 Caption = #20851#38381 TabOrder = 1 OnClick = Button4Click end end object ADOQueryMain: TADOQuery Connection = DataLink_TradeManage.ADOLink Parameters = <> Left = 552 Top = 136 end object ADOQueryCmd: TADOQuery Connection = DataLink_TradeManage.ADOLink Parameters = <> Left = 500 Top = 232 end object CDSMJID: TClientDataSet Aggregates = <> Params = <> Left = 732 Top = 212 end object DataSource2: TDataSource DataSet = CDSMJID Left = 836 Top = 248 end object ADOQueryTmp: TADOQuery Connection = DataLink_TradeManage.ADOLink Parameters = <> Left = 388 Top = 324 end object cxStyleRepository1: TcxStyleRepository Left = 241 Top = 142 object cxStyle1: TcxStyle AssignedValues = [svColor, svFont] Color = clInactiveCaption Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -32 Font.Name = #23435#20307 Font.Style = [fsBold] end object cxStyle2: TcxStyle AssignedValues = [svColor, svFont, svTextColor] Color = 4707838 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -32 Font.Name = #23435#20307 Font.Style = [fsBold] TextColor = clBtnText end object cxStyle_gridRow: TcxStyle AssignedValues = [svColor, svFont] Color = 16311512 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -32 Font.Name = #23435#20307 Font.Style = [fsBold] end object cxStyle_gridFoot: TcxStyle AssignedValues = [svFont] Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -32 Font.Name = #23435#20307 Font.Style = [fsBold] end object cxStyle_gridHead: TcxStyle AssignedValues = [svFont] Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -32 Font.Name = #23435#20307 Font.Style = [fsBold] end object cxStyle_gridGroupBox: TcxStyle AssignedValues = [svColor, svFont] Color = clMoneyGreen Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -32 Font.Name = #23435#20307 Font.Style = [fsBold] end object cxStyle_yellow: TcxStyle AssignedValues = [svColor, svFont] Color = 8454143 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -32 Font.Name = #23435#20307 Font.Style = [fsBold] end object cxStyle_Red: TcxStyle AssignedValues = [svColor, svFont] Color = clRed Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -32 Font.Name = #23435#20307 Font.Style = [fsBold] end object cxStyle_fontBlack: TcxStyle AssignedValues = [svFont] Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -32 Font.Name = #23435#20307 Font.Style = [fsBold] end object cxStyle_fontclFuchsia: TcxStyle AssignedValues = [svFont, svTextColor] Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -32 Font.Name = #23435#20307 Font.Style = [fsBold] TextColor = clFuchsia end object cxStyle_fontclPurple: TcxStyle AssignedValues = [svFont, svTextColor] Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -32 Font.Name = #23435#20307 Font.Style = [fsBold] TextColor = clPurple end object cxStyle_fontclGreen: TcxStyle AssignedValues = [svFont, svTextColor] Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -32 Font.Name = #23435#20307 Font.Style = [fsBold] TextColor = clGreen end object cxStyle_fontclBlue: TcxStyle AssignedValues = [svFont, svTextColor] Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -32 Font.Name = #23435#20307 Font.Style = [fsBold] TextColor = clBlue end object cxStyle_fontclTeal: TcxStyle AssignedValues = [svFont, svTextColor] Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -32 Font.Name = #23435#20307 Font.Style = [fsBold] TextColor = clTeal end object cxStyle_fontclOlive: TcxStyle AssignedValues = [svFont, svTextColor] Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -32 Font.Name = #23435#20307 Font.Style = [fsBold] TextColor = clOlive end end object ADOQuery1: TADOQuery Connection = DataLink_TradeManage.ADOLink Parameters = <> Left = 252 Top = 428 end object DataSource1: TDataSource DataSet = ADOQuery1 Left = 312 Top = 464 end object ADOQueryTm: TADOQuery Connection = DataLink_TradeManage.ADOLink Parameters = <> Left = 152 Top = 192 end object DSTm: TDataSource DataSet = ADOQueryTm Left = 88 Top = 216 end object RMDB_Main: TRMDBDataSet Visible = True DataSet = ADOQueryPrint Left = 576 Top = 256 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 = 424 Top = 256 ReportData = {} end object ADOQueryPrint: TADOQuery Connection = DataLink_TradeManage.ADOLink LockType = ltReadOnly Parameters = <> Left = 652 Top = 232 end object CDSTM: TClientDataSet Aggregates = <> Params = <> Left = 212 Top = 221 end end