object VMSSEL0M: TVMSSEL0M Left = 0 Top = 0 HorzScrollBar.Visible = False VertScrollBar.Visible = False BorderIcons = [biSystemMenu] BorderStyle = bsDialog Caption = 'VMS '#54268' '#54364#52636#44592#44036' '#49444#51221 ClientHeight = 189 ClientWidth = 490 Color = clBtnFace DoubleBuffered = True Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = #47569#51008' '#44256#46357 Font.Style = [] KeyPreview = True OldCreateOrder = False Position = poOwnerFormCenter ShowHint = True OnClose = FormClose OnShow = FormShow DesignSize = ( 490 189) PixelsPerInch = 96 TextHeight = 17 object ShpList: TShape Left = 4 Top = 4 Width = 482 Height = 147 Anchors = [akLeft, akTop, akRight, akBottom] Pen.Color = 10849679 Pen.Width = 2 Visible = False ExplicitWidth = 772 ExplicitHeight = 655 end object EdFocus: TEdit Left = -10 Top = -10 Width = 2 Height = 25 ImeName = 'Microsoft Office IME 2007' TabOrder = 2 Text = 'EdFocus' end object BtnSelect: TcxButton Tag = 4 Left = 386 Top = 159 Width = 100 Height = 25 Cursor = crHandPoint Hint = #54364#52636#44592#44036#51012' '#49444#51221' '#54633#45768#45796'.' Anchors = [akRight, akBottom] Caption = #54869#51064 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 = BtnSelectClick end object cxGroupBox1: TcxGroupBox Left = 4 Top = 4 Anchors = [akLeft, akTop, akRight, akBottom] Caption = #9654' '#54364#52636' '#44592#44036 Style.LookAndFeel.SkinName = 'Black' Style.TextStyle = [fsBold] StyleDisabled.LookAndFeel.SkinName = 'Black' StyleFocused.LookAndFeel.SkinName = 'Black' StyleHot.LookAndFeel.SkinName = 'Black' TabOrder = 4 Height = 148 Width = 483 object ImgDesc11: TImage Left = 9 Top = 40 Width = 9 Height = 9 Transparent = True end object ImgDesc01: TImage Left = 9 Top = 79 Width = 9 Height = 9 Transparent = True end object cxLabel18: TcxLabel Left = 64 Top = 34 Caption = #54364#52636#49884#51089' '#49884#44033 Style.TextStyle = [fsBold] Properties.Alignment.Horz = taRightJustify Properties.Alignment.Vert = taVCenter Transparent = True AnchorX = 151 AnchorY = 45 end object cxLabel1: TcxLabel Left = 64 Top = 73 Caption = #54364#52636#51333#47308' '#49884#44033 Style.TextStyle = [fsBold] Properties.Alignment.Horz = taRightJustify Properties.Alignment.Vert = taVCenter Transparent = True AnchorX = 151 AnchorY = 84 end object DtEndDate: TDateTimePicker Left = 157 Top = 73 Width = 152 Height = 24 BevelInner = bvNone BevelOuter = bvNone Date = 40452.000000000000000000 Time = 40452.000000000000000000 Color = clBtnFace ImeName = 'Microsoft Office IME 2007' ParentColor = True TabOrder = 2 end object DtStrDate: TDateTimePicker Left = 157 Top = 34 Width = 152 Height = 24 BevelInner = bvNone BevelOuter = bvNone Date = 40452.000000000000000000 Time = 40452.000000000000000000 Color = clBtnFace ImeName = 'Microsoft Office IME 2007' ParentColor = True TabOrder = 3 end object DtStrTime: TDateTimePicker Left = 314 Top = 34 Width = 117 Height = 24 BevelInner = bvNone BevelOuter = bvNone Date = 40452.000000000000000000 Time = 40452.000000000000000000 Color = clBtnFace ImeName = 'Microsoft Office IME 2007' Kind = dtkTime ParentColor = True TabOrder = 4 end object DtEndTime: TDateTimePicker Left = 314 Top = 73 Width = 117 Height = 24 BevelInner = bvNone BevelOuter = bvNone Date = 40452.000000000000000000 Time = 40452.000000000000000000 Color = clBtnFace ImeName = 'Microsoft Office IME 2007' Kind = dtkTime ParentColor = True TabOrder = 5 end end object BtnClose: TcxButton Left = 279 Top = 159 Width = 100 Height = 25 Cursor = crHandPoint Hint = #52712#49548 Anchors = [akRight, akBottom] Caption = #52712#49548 Colors.Default = 10737865 TabOrder = 1 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -13 Font.Name = #47569#51008' '#44256#46357 Font.Style = [fsBold] ParentFont = False OnClick = BtnCloseClick end object BtnSearch: TcxButton Left = 152 Top = 158 Width = 75 Height = 25 Cursor = crHandPoint Hint = #51312#54924 Anchors = [akTop, akRight] Caption = #51312#54924 Colors.Default = 10737865 TabOrder = 0 Visible = False 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 lblText1: TcxLabel Left = 29 Top = 114 Caption = #54364#52636' '#49884#51089#49884#44033#51060' '#54364#52636' '#51333#47308#49884#44033' '#48372#45796' '#53373#45768#45796'.' Transparent = True Visible = False end object TmrShow: TTimer Enabled = False Interval = 100 OnTimer = TmrShowTimer Left = 44 Top = 159 end end