inherited fEditorCalendarioBase: TfEditorCalendarioBase Left = 804 Top = 227 Align = alClient Caption = 'fEditorCalendarioBase' PixelsPerInch = 96 TextHeight = 13 inherited TBXDock: TTBXDock inherited tbxMain: TTBXToolbar object TBXSeparatorItem14: TTBXSeparatorItem end object TBXItem33: TTBXItem Action = actDia end object TBXItem34: TTBXItem Action = actSemana end object TBXItem7: TTBXItem Action = actMes end end end inherited EditorActionList: TActionList Left = 0 Top = 80 inherited actNuevo: TAction Category = 'Calendario' OnExecute = actNuevoExecute end inherited actModificar: TAction Category = 'Calendario' OnExecute = actModificarExecute OnUpdate = actModificarUpdate end inherited actGuardarCerrar: TAction Visible = False end inherited actGuardar: TAction Visible = False end inherited actEliminar: TAction Category = 'Calendario' OnExecute = actEliminarExecute OnUpdate = actEliminarUpdate end inherited actPrevisualizar: TAction OnExecute = actPrevisualizarExecute end inherited actImprimir: TAction OnExecute = actImprimirExecute end inherited actCerrar: TAction Visible = False end inherited actRefrescar: TAction Category = 'Calendario' OnExecute = actRefrescarExecute end inherited actAnterior: TAction Visible = False end inherited actSiguiente: TAction Visible = False end object actDia: TAction Category = 'Calendario' Caption = 'D'#237'a' OnExecute = actDiaExecute end object actSemana: TAction Category = 'Calendario' Caption = 'Semana' OnExecute = actSemanaExecute end object actMes: TAction Category = 'Calendario' Caption = 'Mes' OnExecute = actMesExecute end object actSemana5: TAction Category = 'Calendario' Caption = 'Semana laboral' OnExecute = actSemana5Execute end end object cxSchedulerDBStorage: TcxSchedulerDBStorage Resources.Items = <> Resources.ResourceID = 'CODIGO' Resources.ResourceName = 'NOMBRE' CustomFields = <> DataSource = DADataSource FieldNames.Caption = 'CAPTION' FieldNames.EventType = 'TIPO' FieldNames.Finish = 'FINISH' FieldNames.ID = 'ID' FieldNames.LabelColor = 'LABELCOLOR' FieldNames.Location = 'LOCATION' FieldNames.Message = 'MENSAJE' FieldNames.Options = 'OPTIONS' FieldNames.ParentID = 'PARENTID' FieldNames.ResourceID = 'RESOURCEID' FieldNames.Start = 'START' FieldNames.State = 'STATE' Left = 32 Top = 80 end object DADataSource: TDADataSource Left = 64 Top = 80 end object dxComponentPrinter1: TdxComponentPrinter CurrentLink = dxComponentPrinter1Link2 PreviewOptions.EnableOptions = [peoPageSetup, peoPrint] PreviewOptions.Caption = 'Vista previa' PreviewOptions.VisibleOptions = [pvoPageSetup, pvoPrint, pvoPageMargins] Version = 0 Left = 32 Top = 112 object dxComponentPrinter1Link2: TcxSchedulerReportLink PrinterPage.DMPaper = 9 PrinterPage.Footer = 6350 PrinterPage.Header = 6350 PrinterPage.Margins.Bottom = 12700 PrinterPage.Margins.Left = 12700 PrinterPage.Margins.Right = 12700 PrinterPage.Margins.Top = 12700 PrinterPage.PageSize.X = 210000 PrinterPage.PageSize.Y = 297000 PrinterPage._dxMeasurementUnits_ = 0 PrinterPage._dxLastMU_ = 2 ReportDocument.CreationDate = 38869.819535011570000000 OptionsFormatting.SuppressBackgroundBitmaps = True OptionsFormatting.UseNativeStyles = True PrintRange.TimePrintFrom = 0.416666666666666700 PrintRange.TimePrintTo = 0.854166666666666600 PrintStyles.Weekly.Active = True SupportedCustomDraw = True BuiltInReportLink = True end end object dxPrintDialog1: TdxPrintDialog ButtonsEnabled = [pdbPrinterProperties, pdbNetwork, pdbPreview, pdbPageSetup] ButtonsVisible = [pdbPrinterProperties, pdbNetwork, pdbPreview] OptionsEnabled = [pdoAllPages, pdoPageRange] Top = 112 end end