123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921 |
- object VMSM800M: TVMSM800M
- Left = 0
- Top = 0
- HorzScrollBar.Visible = False
- VertScrollBar.Visible = False
- Caption = 'VMS '#44592#48376' '#49828#52992#51460' '#44288#47532
- ClientHeight = 833
- ClientWidth = 1527
- Color = clBtnFace
- 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
- OnCloseQuery = FormCloseQuery
- OnCreate = FormCreate
- OnShow = FormShow
- DesignSize = (
- 1527
- 833)
- PixelsPerInch = 96
- TextHeight = 17
- object ShpTitle: TShape
- Left = 4
- Top = 4
- Width = 1519
- 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 = 1519
- Height = 777
- Anchors = [akLeft, akTop, akRight, akBottom]
- Pen.Color = 10849679
- Pen.Width = 2
- ExplicitWidth = 1436
- ExplicitHeight = 766
- end
- object BtnClose: TcxButton
- Left = 1433
- Top = 11
- Width = 80
- Height = 25
- Cursor = crHandPoint
- Hint = #45803#44592
- Anchors = [akTop, akRight]
- Caption = #45803#44592
- Colors.Default = 10737865
- TabOrder = 0
- 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 EdFocus: TEdit
- Left = -10
- Top = -10
- Width = 2
- Height = 25
- ImeName = 'Microsoft Office IME 2007'
- TabOrder = 1
- Text = 'EdFocus'
- end
- object PanelBack: TPanel
- Left = 12
- Top = 56
- Width = 1501
- Height = 764
- Anchors = [akLeft, akTop, akRight, akBottom]
- BevelOuter = bvNone
- ParentBackground = False
- ParentColor = True
- TabOrder = 2
- object PnlLeft: TPanel
- Left = 0
- Top = 0
- Width = 385
- Height = 764
- Align = alLeft
- BevelOuter = bvNone
- TabOrder = 0
- object GrpList: TcxGroupBox
- Left = 0
- Top = 0
- Align = alClient
- Caption = #9654' VMS '#47785#47197
- Style.BorderColor = clCaptionText
- Style.Shadow = False
- Style.TextColor = clWindowText
- Style.TextStyle = [fsBold]
- TabOrder = 0
- Height = 764
- Width = 385
- object Panel4: TPanel
- Left = 3
- Top = 19
- Width = 379
- Height = 39
- Align = alTop
- BevelOuter = bvNone
- TabOrder = 0
- object ImgDesc01: TImage
- Left = 9
- Top = 13
- Width = 9
- Height = 9
- Transparent = True
- end
- object cxLabel18: TcxLabel
- Left = 25
- Top = 7
- Caption = 'VMS '#53356#44592' '#50976#54805
- Properties.Alignment.Horz = taLeftJustify
- Properties.Alignment.Vert = taVCenter
- Transparent = True
- AnchorY = 18
- end
- object CbSizeType: TcxComboBox
- Left = 124
- Top = 5
- Properties.Alignment.Vert = taVCenter
- Properties.DropDownListStyle = lsFixedList
- Properties.HideSelection = False
- Properties.Items.Strings = (
- '')
- Properties.OnChange = CbSizeTypePropertiesChange
- Style.BorderStyle = ebsUltraFlat
- Style.LookAndFeel.Kind = lfUltraFlat
- Style.LookAndFeel.NativeStyle = False
- Style.ButtonStyle = btsUltraFlat
- Style.PopupBorderStyle = epbsFlat
- StyleDisabled.LookAndFeel.Kind = lfUltraFlat
- StyleDisabled.LookAndFeel.NativeStyle = False
- StyleFocused.LookAndFeel.Kind = lfUltraFlat
- StyleFocused.LookAndFeel.NativeStyle = False
- StyleFocused.TextStyle = [fsBold]
- StyleHot.LookAndFeel.Kind = lfUltraFlat
- StyleHot.LookAndFeel.NativeStyle = False
- TabOrder = 1
- Width = 237
- end
- end
- inline FRAMEVmsSchList1: TFRAMEVmsSchList
- Left = 3
- Top = 58
- Width = 379
- Height = 696
- Align = alClient
- TabOrder = 1
- ExplicitLeft = 3
- ExplicitTop = 58
- ExplicitWidth = 379
- ExplicitHeight = 696
- inherited CxList: TcxGrid
- Width = 379
- Height = 634
- ExplicitWidth = 379
- ExplicitHeight = 634
- inherited TvList: TcxGridTableView
- OnCellDblClick = FRAMEVmsSchList1TvListCellDblClick
- OnFocusedRecordChanged = FRAMEVmsSchList1TvListFocusedRecordChanged
- inherited Column01: TcxGridColumn
- VisibleForCustomization = False
- end
- inherited Column02: TcxGridColumn
- VisibleForCustomization = False
- end
- inherited Column03: TcxGridColumn
- VisibleForCustomization = False
- end
- inherited Col04: TcxGridColumn
- VisibleForCustomization = False
- end
- inherited Col05: TcxGridColumn
- VisibleForCustomization = False
- end
- inherited Col06: TcxGridColumn
- VisibleForCustomization = False
- end
- inherited Col07: TcxGridColumn
- VisibleForCustomization = False
- end
- inherited Col09: TcxGridColumn
- VisibleForCustomization = False
- end
- inherited Col10: TcxGridColumn
- VisibleForCustomization = False
- end
- end
- end
- inherited PnlTop: TPanel
- Width = 379
- ExplicitWidth = 379
- end
- inherited PnlBottom: TPanel
- Top = 665
- Width = 379
- ExplicitTop = 665
- ExplicitWidth = 379
- inherited LblRecords: TLabel
- Left = 268
- Width = 25
- Height = 17
- ExplicitLeft = 299
- ExplicitWidth = 25
- ExplicitHeight = 17
- end
- inherited BtnExlSave: TcxButton
- Left = 299
- ExplicitLeft = 299
- end
- end
- end
- end
- end
- object cxSplitter1: TcxSplitter
- Left = 385
- Top = 0
- Width = 6
- Height = 764
- Control = PnlLeft
- end
- object Panel1: TPanel
- Left = 391
- Top = 0
- Width = 1110
- Height = 764
- Align = alClient
- BevelOuter = bvNone
- TabOrder = 2
- object Panel3: TPanel
- Left = 0
- Top = 0
- Width = 1110
- Height = 764
- Align = alClient
- BevelOuter = bvNone
- TabOrder = 0
- object GrpSchedule: TcxGroupBox
- Left = 0
- Top = 0
- Align = alClient
- Caption = #9654' '#44592#48376' '#49828#52992#51460' '#49444#51221
- Style.BorderColor = clCaptionText
- Style.Shadow = False
- Style.TextColor = clWindowText
- Style.TextStyle = [fsBold]
- TabOrder = 0
- Height = 764
- Width = 1110
- object LblInfo1: TLabel
- AlignWithMargins = True
- Left = 6
- Top = 22
- Width = 1081
- Height = 17
- Margins.Right = 20
- Align = alTop
- Caption =
- ' VMS '#44592#48376#49828#52992#51460#51060' VMS '#51228#50612#44592#47196' '#45796#50868#47196#46300' '#46104#47732' VMS'#51228#50612#44592#44032' '#53685#49888' OFF LINE'#51068' '#44221#50864' '#54364#52636#46104#45716' '#49828#52992#51460' '#51077#45768 +
- #45796'.'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlue
- Font.Height = -13
- Font.Name = #47569#51008' '#44256#46357
- Font.Style = [fsBold]
- ParentFont = False
- ExplicitWidth = 667
- end
- object PnlMenu: TPanel
- Left = 3
- Top = 711
- Width = 1104
- Height = 43
- Align = alBottom
- BevelOuter = bvNone
- TabOrder = 0
- DesignSize = (
- 1104
- 43)
- object BtnDelete: TcxButton
- Tag = 4
- Left = 283
- Top = 15
- Width = 80
- Height = 25
- Cursor = crHandPoint
- Hint = #45936#51060#53552' '#49325#51228
- Anchors = [akLeft, akBottom]
- Caption = #49325#51228
- 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
- end
- object BtnSave: TcxButton
- Tag = 5
- Left = 5
- Top = 15
- Width = 130
- Height = 25
- Cursor = crHandPoint
- Hint = #54788#51116' '#49440#53469#54620' VMS'#50640' '#45824#54620' '#49828#52992#51460' '#51089#50629#51012' '#51200#51109
- Anchors = [akLeft, akBottom]
- Caption = #49828#52992#51460' '#51200#51109
- 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 = BtnSaveClick
- end
- object BtnAllEdit: TcxButton
- Left = 486
- Top = 15
- Width = 150
- Height = 25
- Cursor = crHandPoint
- Hint = #49440#53469#54620' '#46321#47197' '#49828#52992#51460#50640' '#45824#54644' '#51204#52404' VMS'#47484' '#45824#49345#51004#47196' '#54200#51665
- Anchors = [akLeft, akBottom]
- Caption = #51204#52404' VMS '#54200#51665
- Colors.Default = 10737865
- Glyph.Data = {
- B6030000424DB603000000000000360000002800000012000000100000000100
- 1800000000008003000012170000121700000000000000000000C0C0C0C0C0C0
- C0C0C0C0C0C0C0C0C0C0C0C06868680000009D9D9DC0C0C0C0C0C0C0C0C0C0C0
- C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C00000C0C0C0C0C0C0C0C0C0C0C0C0C0C0
- C08B8B8B41667291E2FD1A292E000000454545C0C0C0C0C0C0C0C0C0C0C0C0C0
- C0C0C0C0C0C0C0C00000C0C0C0C0C0C0C0C0C0C0C0C0C0C0C08B8B8B41667291
- E2FD91E2FD91E2FD5C8FA1000000000000AEAEAEC0C0C0C0C0C0C0C0C0C0C0C0
- 0000C0C0C0C0C0C0C0C0C0C0C0C0AEAEAE273D4491E2FD91E2FD91E2FD91E2FD
- 91E2FD91E2FD91E2FD4F7B8A48717E536970606060AEAEAE0000C0C0C0C0C0C0
- C0C0C0C0C0C01E252891E2FD91E2FD617F89686868CCDBE091E2FD91E2FD91E2
- FD91E2FD91E2FD4F7B8A7A7A7AC0C0C00000C0C0C0C0C0C0C0C0C0C0C0C01E25
- 2891E2FD91E2FD6A88924D4D4D2A2A2A767676AFDCEA91E2FD91E2FD91E2FD4F
- 7B8A7A7A7AC0C0C00000C0C0C0C0C0C0C0C0C034343483CDE591E2FD91E2FDBC
- D9E33D3D3DE7E7E77878784F7B8991E2FD91E2FD69A4B8575757C0C0C0C0C0C0
- 0000C0C0C0C0C0C08B8B8B4E6C758AD7F191E2FD91E2FD91E2FD7BABBB4F4743
- AD7151B9785757686B83CDE64E6C768B8B8BC0C0C0C0C0C00000C0C0C0C0C0C0
- C0C0C08E8A34827D11C0C0C0C0C0C0C0C0C099DBF176B9CF5C3C2BFFA678FFA6
- 7828201CC0C0C0C0C0C0C0C0C0C0C0C00000B3B29D7C7700A19E688E8A34827D
- 11ADAC8B7C7700A7A57A99DBF191E2FD5C8FA18A5A41FFA678E7976D343434C0
- C0C0C0C0C0C0C0C00000B3B29D7C77007C77007C77007C77007C77007C7700A7
- A57A99DBF191E2FD91E2FD416673B97857FFA678B97857575757C0C0C0C0C0C0
- 00009E9B60918E3D7C77009491459A98577C77008B872B9E9B6093D4DF91E2FD
- 91E2FD69A4B8596468875B44FFA678C5805C6B5B52ACACAC00007C77007C7700
- 7C7700ADAC8BB9B9AE7C77007C77007C77008DCECE91E2FD5C8FA1686868C0C0
- C0AEAEAE452D20FFA6786747360303030000C0C0C0A7A57A7C77007C77007C77
- 007C77009A9857C0C0C099DBF191E2FD5C8FA1686868C0C0C0C0C0C08B8B8B1D
- 1D1D6A6A6A2525250000B3B29D7C77007C77007C77007C77007C77007C7700A7
- A57A99DBF176B9CF454545C0C0C0C0C0C0C0C0C0C0C0C0686868292929767676
- 0000B9B9AE9E9B60B0AF948E8A34827D11B6B6A59E9B60B3B29D5D7E894C6D78
- 828282C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C00000}
- Spacing = 6
- TabOrder = 2
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = #47569#51008' '#44256#46357
- Font.Style = [fsBold]
- ParentFont = False
- OnClick = BtnAllEditClick
- end
- object BtnAllAdd: TcxButton
- Tag = 1
- Left = 732
- Top = 15
- Width = 150
- Height = 25
- Cursor = crHandPoint
- Hint = #49440#53469#54620' '#54268' '#51221#48372#47484' '#51204#52404' VMS'#50640' '#46321#47197
- Anchors = [akLeft, akBottom]
- Caption = #51204#52404' VMS '#46321#47197
- Colors.Default = 10737865
- Glyph.Data = {
- 06030000424D06030000000000003600000028000000100000000F0000000100
- 180000000000D0020000120B0000120B00000000000000000000C0C0C0C0C0C0
- C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
- C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C078787878
- 7878787878787878787878C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
- C0C0C0C0C0C0C0C0C0000000000000000000000000000000787878C0C0C0C0C0
- C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C2C2C2C0C0C0C0C0C000000049748C49
- 748C49748C000000787878C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
- C0C0C0C0C0C0C0C0C000000049748CADDFFC49748C000000787878C0C0C0C0C0
- C0C0C0C0C0C0C0C0C0C0C0C0C0C0BFBE78787878787878787800000049748CAD
- DFFC49748C000000787878787878787878787878787878C0C0C0C0C0C0000000
- 00000000000000000000000049748CADDFFC49748C0000000000000000000000
- 00000000787878C0C0C0C0C0C000000049748C49748C49748C49748C49748CAD
- DFFC49748C49748C49748C49748C49748C000000787878C0C0C0C0C0C0000000
- 49748CADDFFCADDFFCADDFFCADDFFCADDFFCADDFFCADDFFCADDFFCADDFFC4974
- 8C000000787878C0C0C0C0C0C000000049748C49748C49748C49748C49748CAD
- DFFC49748C49748C49748C49748C49748C000000C0C0C0C0C0C0C0C0C0000000
- 00000000000000000000000049748CADDFFC49748C0000000000000000000000
- 00000000C5C5C5C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000000049748CAD
- DFFC49748C000000787878C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
- C0C0C0C1C1C1C0C0C000000049748CADDFFC49748C000000787878C0C0C0C0C0
- C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C1C1C1C0C0C000000049748C49
- 748C49748C000000787878C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
- C0C0C0C0C0C0C0C0C0000000000000000000000000000000C0C0C0C0C0C0C0C0
- C0C0C0C0C0C0C0C0C0C0}
- Spacing = 6
- TabOrder = 3
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = #47569#51008' '#44256#46357
- Font.Style = [fsBold]
- ParentFont = False
- OnClick = BtnAllEditClick
- end
- end
- object PgVmsSch: TcxPageControl
- Left = 3
- Top = 42
- Width = 1104
- Height = 648
- Cursor = crHandPoint
- Align = alClient
- TabOrder = 1
- Properties.ActivePage = TabFixed
- ClientRectBottom = 643
- ClientRectLeft = 2
- ClientRectRight = 1099
- ClientRectTop = 28
- object TabFixed: TcxTabSheet
- Tag = 6
- Caption = ' '#44256#51221' '#49828#52992#51460' '
- ImageIndex = 0
- object PnlFixed: TPanel
- Left = 0
- Top = 0
- Width = 1097
- Height = 615
- Align = alClient
- BevelOuter = bvNone
- TabOrder = 0
- object cxGroupBox8: TcxGroupBox
- Left = 0
- Top = 0
- Align = alClient
- Caption = #44592#48376' '#49828#52992#51460
- TabOrder = 0
- Height = 615
- Width = 632
- object CxGrid6: TcxGrid
- Left = 3
- Top = 19
- Width = 626
- Height = 586
- Align = alClient
- TabOrder = 0
- object TvGrid6: TcxGridTableView
- Tag = 6
- OnCellDblClick = TvGridCellDblClick
- DataController.Summary.DefaultGroupSummaryItems = <>
- DataController.Summary.FooterSummaryItems = <>
- DataController.Summary.SummaryGroups = <>
- OptionsCustomize.ColumnFiltering = False
- OptionsData.CancelOnExit = False
- OptionsData.Deleting = False
- OptionsData.DeletingConfirmation = False
- OptionsData.Inserting = False
- OptionsSelection.HideFocusRectOnExit = False
- OptionsSelection.HideSelection = True
- OptionsView.ColumnAutoWidth = True
- OptionsView.DataRowHeight = 64
- OptionsView.GroupByBox = False
- object cxGridColumn37: TcxGridColumn
- Caption = #54268' ID'
- PropertiesClassName = 'TcxLabelProperties'
- Properties.Alignment.Horz = taCenter
- Properties.Alignment.Vert = taVCenter
- GroupSummaryAlignment = taCenter
- HeaderAlignmentHorz = taCenter
- HeaderAlignmentVert = vaCenter
- HeaderGlyphAlignmentHorz = taCenter
- Width = 55
- end
- object cxGridColumn38: TcxGridColumn
- Caption = #54268' '#47112#51060#50500#50883
- DataBinding.ValueType = 'Variant'
- PropertiesClassName = 'TcxImageProperties'
- Properties.GraphicClassName = 'TdxSmartImage'
- GroupSummaryAlignment = taCenter
- HeaderAlignmentHorz = taCenter
- HeaderAlignmentVert = vaCenter
- HeaderGlyphAlignmentHorz = taCenter
- Width = 330
- end
- object cxGridColumn39: TcxGridColumn
- Caption = #51228#44277#44396#44036
- PropertiesClassName = 'TcxLabelProperties'
- Properties.Alignment.Horz = taCenter
- Properties.Alignment.Vert = taVCenter
- Visible = False
- GroupSummaryAlignment = taCenter
- HeaderAlignmentHorz = taCenter
- HeaderAlignmentVert = vaCenter
- HeaderGlyphAlignmentHorz = taCenter
- VisibleForCustomization = False
- Width = 60
- end
- object cxGridColumn40: TcxGridColumn
- Caption = #54364#52636'('#52488')'
- PropertiesClassName = 'TcxComboBoxProperties'
- Properties.Alignment.Horz = taCenter
- Properties.Alignment.Vert = taVCenter
- Properties.DropDownListStyle = lsFixedList
- Properties.ImmediatePost = True
- Properties.Items.Strings = (
- '1'
- '2'
- '3'
- '4'
- '5'
- '6'
- '7'
- '8'
- '9'
- '10')
- GroupSummaryAlignment = taCenter
- HeaderAlignmentHorz = taCenter
- HeaderAlignmentVert = vaCenter
- HeaderGlyphAlignmentHorz = taCenter
- Width = 60
- end
- object cxGridColumn41: TcxGridColumn
- Caption = #49884#51089#49884#44033
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.Alignment.Horz = taCenter
- Properties.Alignment.Vert = taVCenter
- GroupSummaryAlignment = taCenter
- HeaderAlignmentHorz = taCenter
- HeaderAlignmentVert = vaCenter
- HeaderGlyphAlignmentHorz = taCenter
- Options.Editing = False
- Width = 80
- end
- object cxGridColumn42: TcxGridColumn
- Caption = #51333#47308#49884#44033
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.Alignment.Horz = taCenter
- Properties.Alignment.Vert = taVCenter
- GroupSummaryAlignment = taCenter
- HeaderAlignmentHorz = taCenter
- HeaderAlignmentVert = vaCenter
- HeaderGlyphAlignmentHorz = taCenter
- Options.Editing = False
- Width = 80
- end
- object cxGridColumn43: TcxGridColumn
- Caption = #49324#50857
- PropertiesClassName = 'TcxComboBoxProperties'
- Properties.Alignment.Horz = taCenter
- Properties.Alignment.Vert = taVCenter
- Properties.DropDownListStyle = lsFixedList
- Properties.ImmediatePost = True
- Properties.Items.Strings = (
- 'Y'
- 'N')
- GroupSummaryAlignment = taCenter
- HeaderAlignmentHorz = taCenter
- HeaderAlignmentVert = vaCenter
- HeaderGlyphAlignmentHorz = taCenter
- end
- object cxGridColumn44: TcxGridColumn
- PropertiesClassName = 'TcxTextEditProperties'
- Visible = False
- GroupSummaryAlignment = taCenter
- HeaderAlignmentHorz = taCenter
- HeaderAlignmentVert = vaCenter
- HeaderGlyphAlignmentHorz = taCenter
- end
- object cxGridColumn45: TcxGridColumn
- PropertiesClassName = 'TcxTextEditProperties'
- Visible = False
- GroupSummaryAlignment = taCenter
- HeaderAlignmentHorz = taCenter
- HeaderAlignmentVert = vaCenter
- HeaderGlyphAlignmentHorz = taCenter
- end
- object TvGrid6Column1: TcxGridColumn
- PropertiesClassName = 'TcxTextEditProperties'
- Visible = False
- end
- object TvGrid6Column2: TcxGridColumn
- PropertiesClassName = 'TcxTextEditProperties'
- Visible = False
- end
- object TvGrid6Column3: TcxGridColumn
- PropertiesClassName = 'TcxTextEditProperties'
- Visible = False
- end
- object TvGrid6Column4: TcxGridColumn
- PropertiesClassName = 'TcxTextEditProperties'
- Visible = False
- end
- object TvGrid6Column5: TcxGridColumn
- Caption = 'VMS'#50976#54805#53076#46300
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.Alignment.Horz = taCenter
- Properties.Alignment.Vert = taVCenter
- Visible = False
- VisibleForCustomization = False
- end
- object TvGrid6Column6: TcxGridColumn
- Caption = #54268#49353#49345
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.Alignment.Horz = taCenter
- Properties.Alignment.Vert = taVCenter
- Visible = False
- VisibleForCustomization = False
- end
- object TvGrid6Column7: TcxGridColumn
- Caption = #54268#50976#54805
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.Alignment.Horz = taCenter
- Properties.Alignment.Vert = taVCenter
- Visible = False
- VisibleForCustomization = False
- end
- end
- object GlGrid6: TcxGridLevel
- GridView = TvGrid6
- end
- end
- end
- object Panel7: TPanel
- Left = 632
- Top = 0
- Width = 95
- Height = 615
- Align = alRight
- BevelOuter = bvNone
- TabOrder = 1
- object BtnListAdd6: TcxButton
- Tag = 6
- Left = 8
- Top = 125
- Width = 80
- Height = 25
- Cursor = crHandPoint
- Hint = #49828#52992#51460' '#52628#44032
- Caption = #9664' '#52628#44032
- Colors.Default = 10737865
- LookAndFeel.NativeStyle = False
- TabOrder = 0
- OnClick = BtnListAddClick
- end
- object cxButton6: TcxButton
- Tag = 6
- Left = 8
- Top = 161
- Width = 80
- Height = 25
- Cursor = crHandPoint
- Hint = #49828#52992#51460' '#49325#51228
- Caption = #49325#51228' '#9654
- Colors.Default = 10737865
- LookAndFeel.NativeStyle = False
- TabOrder = 1
- OnClick = BtnListDeleteClick
- end
- end
- object cxGroupBox9: TcxGroupBox
- Left = 727
- Top = 0
- Align = alRight
- Caption = #54861#48372' '#54268
- TabOrder = 2
- Height = 615
- Width = 370
- object CxForm6: TcxGrid
- Left = 3
- Top = 19
- Width = 364
- Height = 586
- Align = alClient
- TabOrder = 0
- object TvForm6: TcxGridTableView
- Tag = 6
- OnCellDblClick = TvFormCellDblClick
- DataController.Summary.DefaultGroupSummaryItems = <>
- DataController.Summary.FooterSummaryItems = <>
- DataController.Summary.SummaryGroups = <>
- OptionsCustomize.ColumnFiltering = False
- OptionsSelection.HideFocusRectOnExit = False
- OptionsSelection.HideSelection = True
- OptionsView.ColumnAutoWidth = True
- OptionsView.DataRowHeight = 64
- OptionsView.GroupByBox = False
- object cxGridColumn46: TcxGridColumn
- Caption = #54268' ID'
- PropertiesClassName = 'TcxLabelProperties'
- Properties.Alignment.Horz = taCenter
- Properties.Alignment.Vert = taVCenter
- GroupSummaryAlignment = taCenter
- HeaderAlignmentHorz = taCenter
- HeaderAlignmentVert = vaCenter
- HeaderGlyphAlignmentHorz = taCenter
- Options.Editing = False
- Width = 55
- end
- object cxGridColumn47: TcxGridColumn
- Caption = #54268' '#47112#51060#50500#50883
- DataBinding.ValueType = 'Variant'
- PropertiesClassName = 'TcxImageProperties'
- Properties.GraphicClassName = 'TdxSmartImage'
- GroupSummaryAlignment = taCenter
- HeaderAlignmentHorz = taCenter
- HeaderAlignmentVert = vaCenter
- HeaderGlyphAlignmentHorz = taCenter
- Options.Editing = False
- Width = 347
- end
- object cxGridColumn48: TcxGridColumn
- Visible = False
- GroupSummaryAlignment = taCenter
- HeaderAlignmentHorz = taCenter
- HeaderAlignmentVert = vaCenter
- HeaderGlyphAlignmentHorz = taCenter
- end
- object cxGridColumn49: TcxGridColumn
- Visible = False
- GroupSummaryAlignment = taCenter
- HeaderAlignmentHorz = taCenter
- HeaderAlignmentVert = vaCenter
- HeaderGlyphAlignmentHorz = taCenter
- end
- object cxGridColumn50: TcxGridColumn
- Visible = False
- GroupSummaryAlignment = taCenter
- HeaderAlignmentHorz = taCenter
- HeaderAlignmentVert = vaCenter
- HeaderGlyphAlignmentHorz = taCenter
- end
- object cxGridColumn51: TcxGridColumn
- Visible = False
- GroupSummaryAlignment = taCenter
- HeaderAlignmentHorz = taCenter
- HeaderAlignmentVert = vaCenter
- HeaderGlyphAlignmentHorz = taCenter
- end
- object cxGridColumn52: TcxGridColumn
- Visible = False
- GroupSummaryAlignment = taCenter
- HeaderAlignmentHorz = taCenter
- HeaderAlignmentVert = vaCenter
- HeaderGlyphAlignmentHorz = taCenter
- end
- object cxGridColumn53: TcxGridColumn
- Visible = False
- GroupSummaryAlignment = taCenter
- HeaderAlignmentHorz = taCenter
- HeaderAlignmentVert = vaCenter
- HeaderGlyphAlignmentHorz = taCenter
- end
- object cxGridColumn54: TcxGridColumn
- Visible = False
- GroupSummaryAlignment = taCenter
- HeaderAlignmentHorz = taCenter
- HeaderAlignmentVert = vaCenter
- HeaderGlyphAlignmentHorz = taCenter
- end
- end
- object GlForm6: TcxGridLevel
- GridView = TvForm6
- end
- end
- end
- end
- end
- end
- object cxLabel1: TcxLabel
- Left = 3
- Top = 690
- Align = alBottom
- Caption = ' '#49828#52992#51460' '#47785#47197#51012' '#45908#48660#53364#47533#54616#47732' '#49464#48512#54637#47785#51012' '#49688#51221#54616#49892' '#49688' '#51080#49845#45768#45796'.'
- ParentColor = False
- ParentFont = False
- Style.Color = clBtnFace
- Style.Font.Charset = DEFAULT_CHARSET
- Style.Font.Color = clBlue
- Style.Font.Height = -13
- Style.Font.Name = #47569#51008' '#44256#46357
- Style.Font.Style = [fsBold]
- Style.LookAndFeel.NativeStyle = True
- Style.TextStyle = [fsBold]
- Style.IsFontAssigned = True
- StyleDisabled.LookAndFeel.NativeStyle = True
- StyleFocused.LookAndFeel.NativeStyle = True
- StyleHot.LookAndFeel.NativeStyle = True
- Properties.Alignment.Horz = taLeftJustify
- Properties.Alignment.Vert = taVCenter
- Transparent = True
- AnchorY = 701
- end
- end
- end
- end
- end
- object BtnSearch: TcxButton
- Left = 1345
- Top = 11
- Width = 80
- Height = 25
- Cursor = crHandPoint
- Hint = #51312#54924
- Anchors = [akTop, akRight]
- Caption = #51312#54924
- Colors.Default = 10737865
- LookAndFeel.NativeStyle = False
- TabOrder = 3
- 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 EdVmsNmbr: TcxTextEdit
- Left = 545
- Top = 8
- ImeMode = imSAlpha
- Properties.Alignment.Horz = taCenter
- Properties.Alignment.Vert = taVCenter
- Properties.ImeMode = imSAlpha
- Properties.MaxLength = 0
- Properties.ReadOnly = True
- Style.LookAndFeel.Kind = lfUltraFlat
- Style.LookAndFeel.NativeStyle = False
- Style.Shadow = False
- StyleDisabled.LookAndFeel.Kind = lfUltraFlat
- StyleDisabled.LookAndFeel.NativeStyle = False
- StyleFocused.LookAndFeel.Kind = lfUltraFlat
- StyleFocused.LookAndFeel.NativeStyle = False
- StyleHot.LookAndFeel.Kind = lfUltraFlat
- StyleHot.LookAndFeel.NativeStyle = False
- TabOrder = 4
- Visible = False
- Width = 83
- end
- object lblTitle: TcxLabel
- Left = 27
- Top = 295
- Caption = #9654' '#44592#48376' '#49828#52992#51460' '#49444#51221
- Transparent = True
- Visible = False
- end
- object lblErr2: TcxLabel
- Left = 29
- Top = 391
- Caption = 'VMS '#44592#48376' '#49828#52992#51460' '#44288#47532#13#10'VMS '#47785#47197#50640#49436' VMS'#47484' '#47676#51200' '#49440#53469#54620' '#54980' '#51089#50629#51012' '#51652#54665#54616#49464#50836'.'
- Transparent = True
- Visible = False
- end
- object lblErr3: TcxLabel
- Left = 29
- Top = 435
- Caption = #49440#53469#54620' VMS'#51032' '#44592#48376#49828#52992#51460' '#51221#48372#47484' '#51200#51109#54616#49884#44192#49845#45768#44620'?'
- Transparent = True
- Visible = False
- end
- object lblErr4: TcxLabel
- Left = 29
- Top = 506
- Caption = 'VMS '#44592#48376' '#49828#52992#51460' '#44288#47532#13#10'VMS '#44592#48376' '#49828#52992#51460' '#51221#48372#47484' '#51200#51109' '#54616#50688#49845#45768#45796'.'
- Transparent = True
- Visible = False
- end
- object TmrShow: TTimer
- Enabled = False
- Interval = 300
- OnTimer = TmrShowTimer
- Left = 876
- Top = 8
- end
- object VmsDesigner1: VmsDesigner
- Left = 688
- Top = 8
- end
- end
|