object FrmVmColor: TFrmVmColor Tag = 1 Left = 0 Top = 0 HorzScrollBar.Visible = False VertScrollBar.Visible = False Caption = 'VMS '#54256#53944#54200#51665 ClientHeight = 712 ClientWidth = 617 Color = clBtnFace DoubleBuffered = True Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = #47569#51008' '#44256#46357 Font.Style = [] Icon.Data = { 0000010001001616000000000000900600001600000028000000160000002C00 000001000800000000006802000000000000000000000000000000000000F7F7 F700C0C0C000F6C6B200CECF9100E3A2FF00ADDFFC009465510049748C005200 9400787878005254360000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000FFFFFF000B0B 0B0B0B0B0B0B0B0B0B0B0B0B0B0B0B0B0B0B0B0B00000B0B0B09090909090909 09090909090909090909090B00000B0B0B0B0B010B0B0B0B01010B0B0B0B010B 0B0B090B00000B000B000000000000000000000000000000000B090B00000B00 0B000A0A0A0A0A0A0000060606060606000B090B00000B0001000A030303030A 00000602020202060001090B00000B000B000A030303030A0000060202020206 000B090B00000B000B000A030303030A0000060202020206000B090B00000B00 0B000A030303030A0000060202020206000B090B00000B000B000A0A0A0A0A0A 0000060606060606000B090B00000B0001000000000000000000000000000000 0001090B00000B00010000000000000000000000000000000001090B00000B00 0B000707070707070000080808080808000B090B00000B000B00070505050507 0000080404040408000B090B00000B000B000705050505070000080404040408 000B090B00000B000B000705050505070000080404040408000B090B00000B00 010007050505050700000804040404080001090B00000B000B00070707070707 0000080808080808000B090B00000B000B000000000000000000000000000000 000B090B00000B000B0B0B010B0B0B0B01010B0B0B0B010B0B0B0B0B00000B00 00000000000000000000000000000000000B0B0B00000B0B0B0B0B0B0B0B0B0B 0B0B0B0B0B0B0B0B0B0B0B0B0000FFFFFC00E0000400C0000400800004008000 0400800004008000040080000400800004008000040080000400800004008000 040080000400800004008000040080000400800004008000040080000C008000 1C00FFFFFC00} OldCreateOrder = False Position = poDesigned ShowHint = True OnClose = FormClose OnCloseQuery = FormCloseQuery OnCreate = FormCreate OnShow = FormShow DesignSize = ( 617 712) PixelsPerInch = 96 TextHeight = 17 object ShpTitle: TShape Left = 4 Top = 4 Width = 609 Height = 40 Anchors = [akLeft, akTop, akRight] Brush.Color = 14671839 Pen.Color = 10849679 Pen.Width = 2 ExplicitWidth = 1269 end object LblCaption: TLabel Left = 16 Top = 10 Width = 267 Height = 23 Caption = #53440#51060#53952' ' Font.Charset = DEFAULT_CHARSET Font.Color = 4740964 Font.Height = -17 Font.Name = #47569#51008' '#44256#46357 Font.Style = [fsBold] ParentFont = False ParentShowHint = False ShowHint = True end object ShpList: TShape Left = 4 Top = 50 Width = 609 Height = 626 Anchors = [akLeft, akTop, akRight, akBottom] Pen.Color = 10849679 Pen.Width = 2 ExplicitHeight = 609 end object Label1: TLabel Left = 12 Top = 631 Width = 262 Height = 17 Anchors = [akLeft, akBottom] Caption = #51060#48120' '#46321#47197#54620' '#54256#53944#51221#48372#45716' '#49325#51228#54624' '#49688' '#50630#49845#45768#45796'.' Font.Charset = DEFAULT_CHARSET Font.Color = clBlue Font.Height = -13 Font.Name = #47569#51008' '#44256#46357 Font.Style = [fsBold] ParentFont = False Transparent = True end object Label17: TLabel Left = 12 Top = 652 Width = 483 Height = 17 Anchors = [akLeft, akBottom] Caption = #51452#51032') VMS '#54256#53944#47484' '#48320#44221#54620' '#44221#50864' VMS'#53685#49888#49436#48260#47484' '#51116#44592#46041#54644#50556' '#49884#49828#53596#50640' '#48152#50689#46121#45768#45796'.' Font.Charset = DEFAULT_CHARSET Font.Color = clBlue Font.Height = -13 Font.Name = #47569#51008' '#44256#46357 Font.Style = [fsBold] ParentFont = False Transparent = True end object BtnClose: TcxButton Left = 523 Top = 11 Width = 80 Height = 25 Cursor = crHandPoint Hint = #45803#44592 Anchors = [akTop, akRight] Caption = #45803#44592 Colors.Default = 10737865 TabOrder = 0 Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = #47569#51008' '#44256#46357 Font.Style = [fsBold] ParentFont = False OnClick = BtnCloseClick end object EdFocus: TEdit Left = -10 Top = -10 Width = 2 Height = 25 ImeName = 'Microsoft Office IME 2007' TabOrder = 1 Text = 'EdFocus' end object PnlBack: TPanel Left = 12 Top = 56 Width = 591 Height = 569 Anchors = [akLeft, akTop, akRight, akBottom] BevelOuter = bvNone ParentBackground = False ParentColor = True TabOrder = 2 object CxList: TcxGrid Left = 0 Top = 0 Width = 591 Height = 569 Align = alClient TabOrder = 0 ExplicitHeight = 589 object TvList: TcxGridTableView OnMouseMove = TvListMouseMove Navigator.Buttons.Append.Visible = True Navigator.Buttons.SaveBookmark.Visible = False Navigator.InfoPanel.Visible = True OnCellClick = TvListCellClick OnCustomDrawCell = TvListCustomDrawCell DataController.Summary.DefaultGroupSummaryItems = <> DataController.Summary.FooterSummaryItems = <> DataController.Summary.SummaryGroups = <> FilterRow.InfoText = '<'#44160#49353#50612#47484' '#51077#47141' '#54616#49464#50836'>' OptionsBehavior.CellHints = True OptionsBehavior.ShowLockedStateImageOptions.BestFit = lsimImmediate OptionsBehavior.ShowLockedStateImageOptions.Filtering = lsimImmediate OptionsBehavior.ShowLockedStateImageOptions.Grouping = lsimImmediate OptionsBehavior.ShowLockedStateImageOptions.Sorting = lsimImmediate OptionsData.Deleting = False OptionsData.DeletingConfirmation = False OptionsData.Inserting = False OptionsSelection.HideFocusRectOnExit = False OptionsSelection.HideSelection = True OptionsView.ColumnAutoWidth = True OptionsView.GroupByBox = False OptionsView.Indicator = True object ColumnSel: TcxGridColumn Caption = #49440#53469 DataBinding.ValueType = 'Boolean' PropertiesClassName = 'TcxCheckBoxProperties' Properties.Alignment = taCenter Properties.ImmediatePost = True Properties.NullStyle = nssUnchecked Visible = False HeaderAlignmentHorz = taCenter VisibleForCustomization = False Width = 45 end object Column00: TcxGridColumn Caption = #54200#51665#47784#46300 PropertiesClassName = 'TcxTextEditProperties' Properties.Alignment.Horz = taCenter Properties.Alignment.Vert = taVCenter Visible = False HeaderAlignmentHorz = taCenter Options.Editing = False end object Column01: TcxGridColumn Caption = #54256#53944#48264#54840 DataBinding.ValueType = 'Integer' PropertiesClassName = 'TcxCalcEditProperties' Properties.Alignment.Horz = taCenter Properties.Alignment.Vert = taVCenter HeaderAlignmentHorz = taCenter Options.Editing = False Width = 86 end object Column02: TcxGridColumn Caption = #47749#52845 PropertiesClassName = 'TcxTextEditProperties' Properties.Alignment.Horz = taLeftJustify Properties.Alignment.Vert = taVCenter Properties.MaxLength = 0 Properties.OnValidate = ColumnPropertiesValidate HeaderAlignmentHorz = taCenter Options.Editing = False Width = 252 end object Column03: TcxGridColumn Caption = 'VMS '#49353#49345 DataBinding.ValueType = 'Integer' PropertiesClassName = 'TcxTextEditProperties' Properties.Alignment.Horz = taCenter Properties.Alignment.Vert = taVCenter Properties.OnValidate = ColumnPropertiesValidate Visible = False OnCustomDrawCell = Column13CustomDrawCell HeaderAlignmentHorz = taCenter Options.Editing = False Width = 147 end object Column04: TcxGridColumn Caption = #49324#50857#50976#47924 PropertiesClassName = 'TcxComboBoxProperties' Properties.Alignment.Horz = taCenter Properties.Alignment.Vert = taVCenter Properties.DropDownListStyle = lsFixedList Properties.ImmediatePost = True Properties.ImmediateUpdateText = True Properties.PopupAlignment = taCenter Properties.OnValidate = ColumnPropertiesValidate Visible = False HeaderAlignmentHorz = taCenter Options.Editing = False Options.Filtering = False Width = 98 end object Column12: TcxGridColumn Caption = #47749#52845' ORG' PropertiesClassName = 'TcxTextEditProperties' Properties.Alignment.Vert = taVCenter Visible = False HeaderAlignmentHorz = taCenter Options.Editing = False VisibleForCustomization = False Width = 100 end object Column13: TcxGridColumn Caption = #49353#49345' ORG' DataBinding.ValueType = 'Integer' PropertiesClassName = 'TcxTextEditProperties' Properties.Alignment.Horz = taCenter Properties.Alignment.Vert = taVCenter Visible = False OnCustomDrawCell = Column13CustomDrawCell HeaderAlignmentHorz = taCenter Options.Editing = False VisibleForCustomization = False Width = 100 end object Column14: TcxGridColumn Caption = #49324#50857#50976#47924' ORG' PropertiesClassName = 'TcxComboBoxProperties' Properties.Alignment.Horz = taCenter Properties.Alignment.Vert = taVCenter Properties.DropDownListStyle = lsFixedList Visible = False HeaderAlignmentHorz = taCenter Options.Editing = False VisibleForCustomization = False Width = 100 end object Column99: TcxGridColumn Caption = #47700#47784#47532 DataBinding.ValueType = 'Integer' PropertiesClassName = 'TcxCalcEditProperties' Properties.Alignment.Horz = taCenter Properties.Alignment.Vert = taVCenter Visible = False Options.Editing = False end object Column88: TcxGridColumn DataBinding.ValueType = 'Integer' PropertiesClassName = 'TcxCalcEditProperties' Visible = False VisibleForCustomization = False end end object GlList: TcxGridLevel GridView = TvList end end end object BtnSearch: TcxButton Left = 434 Top = 11 Width = 80 Height = 25 Cursor = crHandPoint Hint = #51312#54924 Anchors = [akTop, akRight] Caption = #51312#54924 Colors.Default = 10737865 TabOrder = 3 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -13 Font.Name = #47569#51008' '#44256#46357 Font.Style = [fsBold] ParentFont = False OnClick = BtnSearchClick end object BtnSave: TcxButton Tag = 1 Left = 523 Top = 682 Width = 80 Height = 25 Cursor = crHandPoint Hint = #54028#51068' '#51200#51109 Anchors = [akRight, akBottom] Caption = #51200#51109 Colors.Default = 10737865 TabOrder = 4 Visible = False Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -13 Font.Name = #47569#51008' '#44256#46357 Font.Style = [fsBold] ParentFont = False end object BtnEdit: TcxButton Tag = 2 Left = 13 Top = 682 Width = 80 Height = 25 Cursor = crHandPoint Hint = #45936#51060#53552' '#54200#51665 Anchors = [akLeft, akBottom] Caption = #54200#51665 Colors.Default = 10737865 SpeedButtonOptions.GroupIndex = 1 SpeedButtonOptions.CanBeFocused = False SpeedButtonOptions.AllowAllUp = True SpeedButtonOptions.Flat = True TabOrder = 5 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -13 Font.Name = #47569#51008' '#44256#46357 Font.Style = [fsBold] ParentFont = False OnClick = BtnEditClick end object BtnInsert: TcxButton Tag = 2 Left = 99 Top = 682 Width = 80 Height = 25 Cursor = crHandPoint Hint = #45936#51060#53552' '#52628#44032 Anchors = [akLeft, akBottom] Caption = #52628#44032 Colors.Default = 10737865 Enabled = False TabOrder = 6 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -13 Font.Name = #47569#51008' '#44256#46357 Font.Style = [fsBold] ParentFont = False WordWrap = True OnClick = BtnInsertClick end object BtnDelete: TcxButton Tag = 4 Left = 268 Top = 682 Width = 80 Height = 25 Cursor = crHandPoint Hint = #45936#51060#53552' '#49325#51228 Anchors = [akLeft, akBottom] Caption = #49325#51228 Colors.Default = 10737865 Enabled = False TabOrder = 7 Visible = False Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -13 Font.Name = #47569#51008' '#44256#46357 Font.Style = [fsBold] ParentFont = False WordWrap = True end object BtnApply: TcxButton Tag = 5 Left = 185 Top = 682 Width = 80 Height = 25 Cursor = crHandPoint Hint = #54200#51665#51089#50629' '#51201#50857 Anchors = [akLeft, akBottom] Caption = #51201#50857 Colors.Default = 10737865 Enabled = False TabOrder = 8 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -13 Font.Name = #47569#51008' '#44256#46357 Font.Style = [fsBold] ParentFont = False OnClick = BtnApplyClick end object LblRecords: TcxLabel Left = 488 Top = 683 Anchors = [akRight, akBottom] Caption = '- '#44148 Properties.Alignment.Horz = taRightJustify Properties.Alignment.Vert = taVCenter Transparent = True Visible = False AnchorX = 515 AnchorY = 694 end object cxHintStyleController1: TcxHintStyleController HintStyleClassName = 'TcxHintStyle' HintStyle.BorderColor = clAqua HintStyle.CallOutPosition = cxbpAuto HintStyle.CaptionFont.Charset = DEFAULT_CHARSET HintStyle.CaptionFont.Color = clWindowText HintStyle.CaptionFont.Height = -11 HintStyle.CaptionFont.Name = 'Tahoma' HintStyle.CaptionFont.Style = [] HintStyle.Color = clAqua HintStyle.Font.Charset = DEFAULT_CHARSET HintStyle.Font.Color = clWindowText HintStyle.Font.Height = -12 HintStyle.Font.Name = #47569#51008' '#44256#46357 HintStyle.Font.Style = [fsBold] HintHidePause = 1500 Left = 768 Top = 200 end object dxSkinController1: TdxSkinController NativeStyle = False SkinName = 'Black' Left = 532 Top = 148 end object TmrShow: TTimer Enabled = False Interval = 300 OnTimer = TmrShowTimer Left = 104 Top = 180 end object ColorDialog: TColorDialog Left = 160 Top = 220 end end