object OtherMeasureFrame: TOtherMeasureFrame Left = 0 Top = 0 Width = 1120 Height = 703 TabOrder = 0 object pnlRelaXmjType: TPanel Left = 0 Top = 0 Width = 1120 Height = 21 Align = alTop BevelOuter = bvNone TabOrder = 0 object tbToolsButton: TToolBar Left = 0 Top = 0 Width = 146 Height = 21 Align = alLeft AutoSize = True ButtonHeight = 21 ButtonWidth = 73 Caption = 'tbToolsButton' EdgeBorders = [] Flat = True ShowCaptions = True TabOrder = 0 object tobtnPhase: TToolButton Left = 0 Top = 0 Caption = ' '#20998#26399#35745#37327 Down = True ImageIndex = 0 Style = tbsCheck OnClick = tobtnPhaseClick end object tobtnOnce: TToolButton Tag = 1 Left = 73 Top = 0 Caption = ' '#20840#39069#35745#37327' ' ImageIndex = 1 Style = tbsCheck OnClick = tobtnPhaseClick end end end object pnlOtherMeasure: TPanel Left = 0 Top = 21 Width = 1120 Height = 682 Align = alClient BevelOuter = bvNone TabOrder = 1 object jpsOtherMeasure: TJimPages Left = 0 Top = 0 Width = 1120 Height = 682 ActivePage = jpsOtherMeasurePhase ActivePageIndex = 0 Align = alClient object jpsOtherMeasurePhase: TJimPage Left = 0 Top = 0 Width = 1120 Height = 682 TabName = 'Phase' Caption = #20998#26399 object zgPhase: TZJGrid Left = 0 Top = 0 Width = 1120 Height = 682 Options = [goRangeSelect, goRowSizing, goColSizing, goCellNotMaintainData, goFixedRowShowNo, goFixedColShowNo, goAlwaysShowSelection] OptionsEx = [] ColCount = 10 ShowGridLine = False DefaultColWidth = 73 DefaultFixedColWidth = 35 DefaultFixedRowHeight = 25 Selection.AlphaBlend = False Selection.TransparentColor = False FrozenCol = 0 FrozenRow = 0 OnCellGetColor = zgPhaseCellGetColor OnKeyDown = zgPhaseKeyDown Align = alClient end end object jpsOtherMeasureOnce: TJimPage Left = 0 Top = 0 Width = 1120 Height = 682 TabName = 'Once' Caption = #19968#27425 object zgOnce: TZJGrid Left = 0 Top = 0 Width = 1120 Height = 682 Options = [goRangeSelect, goRowSizing, goColSizing, goCellNotMaintainData, goFixedRowShowNo, goFixedColShowNo, goAlwaysShowSelection] OptionsEx = [] ColCount = 7 ShowGridLine = False DefaultColWidth = 73 DefaultFixedColWidth = 35 DefaultFixedRowHeight = 25 Selection.AlphaBlend = False Selection.TransparentColor = False FrozenCol = 0 FrozenRow = 0 Align = alClient end end end end object xpm: TXPMenu DimLevel = 30 GrayLevel = 10 Font.Charset = DEFAULT_CHARSET Font.Color = clMenuText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] Color = clBtnFace IconBackColor = clBtnFace MenuBarColor = clBtnFace SelectColor = 38640 SelectBorderColor = clHighlight SelectFontColor = clMenuText DisabledColor = clInactiveCaption SeparatorColor = clBtnFace CheckedColor = clHighlight IconWidth = 24 DrawSelect = True UseSystemColors = False OverrideOwnerDraw = False Gradient = False FlatMenu = False AutoDetect = True XPControls = [xcToolbar] Active = True ControlUseTrueXPStyle = True BtnRoundArc = 5 BtnOutLineBorderColor = 7552000 BtnInnerBorderMoveColor = 3257087 BtnInnerBorderFocusColor = 15183500 BtnSurfaceNormalColor = 16251903 BtnSurfaceDownColor = 14608359 BtnSurfaceBottomLineColor = 14608359 BtnSurfaceDownBottomLineColor = 15199215 RdoChkControlChkColor = 41472 ComboBoxChkColor = 9201994 ComboboxSurfaceMoveColor = 16771030 ControlDisabledBorderColor = 11913158 Left = 143 Top = 8 end object saOnce: TsdGridDBA Columns = < item Title.Caption = #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 = 'Code' ReadOnly = False end item Title.Caption = #21517#31216 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 = 'Name' Width = 260 ReadOnly = False end item Title.Caption = #31867#22411 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 = 'MType' Width = 80 ReadOnly = False end item Title.Caption = #37329#39069 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 = taRightJustify Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] FieldName = 'TotalPrice' Width = 80 ReadOnly = False end item Title.Caption = #26085#26399 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 = 'OmDateTime' ReadOnly = False end item Title.Caption = #22791#27880 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 = 'MemoStr' Width = 130 ReadOnly = False end> Grid = zgOnce ExtendRowCount = 3 Left = 320 Top = 168 end object saPhase: TsdGridDBA Columns = < item Title.Caption = #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 = 'Code' ReadOnly = False end item Title.Caption = #21517#31216 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 = 'Name' Width = 260 ReadOnly = False end item Title.Caption = #31867#22411 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 = 'MType' Width = 80 ReadOnly = False end item Title.Caption = #21488#36134#37329#39069 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 = taRightJustify Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] FieldName = 'TotalPrice' Width = 85 ReadOnly = False end item Title.Caption = #25130#27490#19978#26399#37329#39069 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 = taRightJustify Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] FieldName = 'PreTotalPrice' Width = 85 ReadOnly = True end item Title.Caption = #26412#26399#37329#39069 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 = taRightJustify Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] FieldName = 'CurTotalPrice' Width = 85 ReadOnly = False end item Title.Caption = #25130#27490#26412#26399#37329#39069 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 = taRightJustify Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] FieldName = 'EndTotalPrice' Width = 85 ReadOnly = True end item Title.Caption = #32047#35745#37329#39069 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 = taRightJustify Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] FieldName = 'AddTotalPrice' Width = 85 ReadOnly = True end item Title.Caption = #22791#27880 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 = 'MemoStr' Width = 130 ReadOnly = False end> Grid = zgPhase ExtendRowCount = 3 Left = 224 Top = 168 end end