_ Partial Class frmCalendar Inherits System.Windows.Forms.Form 'Das Formular überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen. _ Protected Overrides Sub Dispose(ByVal disposing As Boolean) Try If disposing AndAlso components IsNot Nothing Then components.Dispose() End If Finally MyBase.Dispose(disposing) End Try End Sub 'Wird vom Windows Form-Designer benötigt. Private components As System.ComponentModel.IContainer 'Hinweis: Die folgende Prozedur ist für den Windows Form-Designer erforderlich. 'Das Bearbeiten ist mit dem Windows Form-Designer möglich. 'Das Bearbeiten mit dem Code-Editor ist nicht möglich. _ Private Sub InitializeComponent() Me.components = New System.ComponentModel.Container() Dim TimeRuler1 As DevExpress.XtraScheduler.TimeRuler = New DevExpress.XtraScheduler.TimeRuler() Dim TimeRuler2 As DevExpress.XtraScheduler.TimeRuler = New DevExpress.XtraScheduler.TimeRuler() Dim TimeRuler3 As DevExpress.XtraScheduler.TimeRuler = New DevExpress.XtraScheduler.TimeRuler() Me.SchedulerControl1 = New DevExpress.XtraScheduler.SchedulerControl() Me.ribbonCalendar = New DevExpress.XtraBars.Ribbon.RibbonControl() Me.SwitchToDayViewItem1 = New DevExpress.XtraScheduler.UI.SwitchToDayViewItem() Me.SwitchToWorkWeekViewItem1 = New DevExpress.XtraScheduler.UI.SwitchToWorkWeekViewItem() Me.SwitchToWeekViewItem1 = New DevExpress.XtraScheduler.UI.SwitchToWeekViewItem() Me.SwitchToFullWeekViewItem1 = New DevExpress.XtraScheduler.UI.SwitchToFullWeekViewItem() Me.SwitchToMonthViewItem1 = New DevExpress.XtraScheduler.UI.SwitchToMonthViewItem() Me.SwitchToTimelineViewItem1 = New DevExpress.XtraScheduler.UI.SwitchToTimelineViewItem() Me.SwitchToGanttViewItem1 = New DevExpress.XtraScheduler.UI.SwitchToGanttViewItem() Me.SwitchTimeScalesItem1 = New DevExpress.XtraScheduler.UI.SwitchTimeScalesItem() Me.ChangeScaleWidthItem1 = New DevExpress.XtraScheduler.UI.ChangeScaleWidthItem() Me.RepositoryItemSpinEdit1 = New DevExpress.XtraEditors.Repository.RepositoryItemSpinEdit() Me.SwitchTimeScalesCaptionItem1 = New DevExpress.XtraScheduler.UI.SwitchTimeScalesCaptionItem() Me.SwitchCompressWeekendItem1 = New DevExpress.XtraScheduler.UI.SwitchCompressWeekendItem() Me.SwitchShowWorkTimeOnlyItem1 = New DevExpress.XtraScheduler.UI.SwitchShowWorkTimeOnlyItem() Me.SwitchCellsAutoHeightItem1 = New DevExpress.XtraScheduler.UI.SwitchCellsAutoHeightItem() Me.ChangeSnapToCellsUIItem1 = New DevExpress.XtraScheduler.UI.ChangeSnapToCellsUIItem() Me.EditAppointmentQueryItem1 = New DevExpress.XtraScheduler.UI.EditAppointmentQueryItem() Me.EditOccurrenceUICommandItem1 = New DevExpress.XtraScheduler.UI.EditOccurrenceUICommandItem() Me.EditSeriesUICommandItem1 = New DevExpress.XtraScheduler.UI.EditSeriesUICommandItem() Me.DeleteAppointmentsItem1 = New DevExpress.XtraScheduler.UI.DeleteAppointmentsItem() Me.DeleteOccurrenceItem1 = New DevExpress.XtraScheduler.UI.DeleteOccurrenceItem() Me.DeleteSeriesItem1 = New DevExpress.XtraScheduler.UI.DeleteSeriesItem() Me.SplitAppointmentItem1 = New DevExpress.XtraScheduler.UI.SplitAppointmentItem() Me.ChangeAppointmentStatusItem1 = New DevExpress.XtraScheduler.UI.ChangeAppointmentStatusItem() Me.ChangeAppointmentLabelItem1 = New DevExpress.XtraScheduler.UI.ChangeAppointmentLabelItem() Me.ToggleRecurrenceItem1 = New DevExpress.XtraScheduler.UI.ToggleRecurrenceItem() Me.ChangeAppointmentReminderItem1 = New DevExpress.XtraScheduler.UI.ChangeAppointmentReminderItem() Me.RepositoryItemDuration1 = New DevExpress.XtraScheduler.UI.RepositoryItemDuration() Me.NewAppointmentItem1 = New DevExpress.XtraScheduler.UI.NewAppointmentItem() Me.NewRecurringAppointmentItem1 = New DevExpress.XtraScheduler.UI.NewRecurringAppointmentItem() Me.NavigateViewBackwardItem1 = New DevExpress.XtraScheduler.UI.NavigateViewBackwardItem() Me.NavigateViewForwardItem1 = New DevExpress.XtraScheduler.UI.NavigateViewForwardItem() Me.GotoTodayItem1 = New DevExpress.XtraScheduler.UI.GotoTodayItem() Me.ViewZoomInItem1 = New DevExpress.XtraScheduler.UI.ViewZoomInItem() Me.ViewZoomOutItem1 = New DevExpress.XtraScheduler.UI.ViewZoomOutItem() Me.GroupByNoneItem1 = New DevExpress.XtraScheduler.UI.GroupByNoneItem() Me.GroupByDateItem1 = New DevExpress.XtraScheduler.UI.GroupByDateItem() Me.GroupByResourceItem1 = New DevExpress.XtraScheduler.UI.GroupByResourceItem() Me.CalendarToolsRibbonPageCategory1 = New DevExpress.XtraScheduler.UI.CalendarToolsRibbonPageCategory() Me.pageAppointment = New DevExpress.XtraScheduler.UI.AppointmentRibbonPage() Me.ActionsRibbonPageGroup1 = New DevExpress.XtraScheduler.UI.ActionsRibbonPageGroup() Me.OptionsRibbonPageGroup1 = New DevExpress.XtraScheduler.UI.OptionsRibbonPageGroup() Me.pageCalendar = New DevExpress.XtraScheduler.UI.HomeRibbonPage() Me.AppointmentRibbonPageGroup1 = New DevExpress.XtraScheduler.UI.AppointmentRibbonPageGroup() Me.NavigatorRibbonPageGroup1 = New DevExpress.XtraScheduler.UI.NavigatorRibbonPageGroup() Me.ArrangeRibbonPageGroup1 = New DevExpress.XtraScheduler.UI.ArrangeRibbonPageGroup() Me.GroupByRibbonPageGroup1 = New DevExpress.XtraScheduler.UI.GroupByRibbonPageGroup() Me.SchedulerStorage1 = New DevExpress.XtraScheduler.SchedulerStorage(Me.components) Me.TBPMOAPPOINTMENTSBindingSource = New System.Windows.Forms.BindingSource(Me.components) Me.DD_DMSDataSetCalendar = New DD_Record_Organizer.DD_DMSDataSetCalendar() Me.TBPMORESOURCESBindingSource = New System.Windows.Forms.BindingSource(Me.components) Me.TBPMO_APPOINTMENTSTableAdapter = New DD_Record_Organizer.DD_DMSDataSetCalendarTableAdapters.TBPMO_APPOINTMENTSTableAdapter() Me.TBPMO_RESOURCESTableAdapter = New DD_Record_Organizer.DD_DMSDataSetCalendarTableAdapters.TBPMO_RESOURCESTableAdapter() Me.SchedulerBarController1 = New DevExpress.XtraScheduler.UI.SchedulerBarController() CType(Me.SchedulerControl1, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.ribbonCalendar, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.RepositoryItemSpinEdit1, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.RepositoryItemDuration1, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.SchedulerStorage1, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.TBPMOAPPOINTMENTSBindingSource, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.DD_DMSDataSetCalendar, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.TBPMORESOURCESBindingSource, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.SchedulerBarController1, System.ComponentModel.ISupportInitialize).BeginInit() Me.SuspendLayout() ' 'SchedulerControl1 ' Me.SchedulerControl1.Dock = System.Windows.Forms.DockStyle.Fill Me.SchedulerControl1.Location = New System.Drawing.Point(0, 141) Me.SchedulerControl1.MenuManager = Me.ribbonCalendar Me.SchedulerControl1.Name = "SchedulerControl1" Me.SchedulerControl1.Size = New System.Drawing.Size(926, 456) Me.SchedulerControl1.Start = New Date(2014, 12, 23, 0, 0, 0, 0) Me.SchedulerControl1.Storage = Me.SchedulerStorage1 Me.SchedulerControl1.TabIndex = 0 Me.SchedulerControl1.Text = "SchedulerControl1" Me.SchedulerControl1.Views.DayView.TimeRulers.Add(TimeRuler1) Me.SchedulerControl1.Views.FullWeekView.Enabled = True Me.SchedulerControl1.Views.FullWeekView.TimeRulers.Add(TimeRuler2) Me.SchedulerControl1.Views.WorkWeekView.TimeRulers.Add(TimeRuler3) ' 'ribbonCalendar ' Me.ribbonCalendar.ExpandCollapseItem.Id = 0 Me.ribbonCalendar.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.ribbonCalendar.ExpandCollapseItem, Me.SwitchToDayViewItem1, Me.SwitchToWorkWeekViewItem1, Me.SwitchToWeekViewItem1, Me.SwitchToFullWeekViewItem1, Me.SwitchToMonthViewItem1, Me.SwitchToTimelineViewItem1, Me.SwitchToGanttViewItem1, Me.SwitchTimeScalesItem1, Me.ChangeScaleWidthItem1, Me.SwitchTimeScalesCaptionItem1, Me.SwitchCompressWeekendItem1, Me.SwitchShowWorkTimeOnlyItem1, Me.SwitchCellsAutoHeightItem1, Me.ChangeSnapToCellsUIItem1, Me.EditAppointmentQueryItem1, Me.EditOccurrenceUICommandItem1, Me.EditSeriesUICommandItem1, Me.DeleteAppointmentsItem1, Me.DeleteOccurrenceItem1, Me.DeleteSeriesItem1, Me.SplitAppointmentItem1, Me.ChangeAppointmentStatusItem1, Me.ChangeAppointmentLabelItem1, Me.ToggleRecurrenceItem1, Me.ChangeAppointmentReminderItem1, Me.NewAppointmentItem1, Me.NewRecurringAppointmentItem1, Me.NavigateViewBackwardItem1, Me.NavigateViewForwardItem1, Me.GotoTodayItem1, Me.ViewZoomInItem1, Me.ViewZoomOutItem1, Me.GroupByNoneItem1, Me.GroupByDateItem1, Me.GroupByResourceItem1}) Me.ribbonCalendar.Location = New System.Drawing.Point(0, 0) Me.ribbonCalendar.MaxItemId = 1 Me.ribbonCalendar.Name = "ribbonCalendar" Me.ribbonCalendar.PageCategories.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageCategory() {Me.CalendarToolsRibbonPageCategory1}) Me.ribbonCalendar.Pages.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPage() {Me.pageCalendar}) Me.ribbonCalendar.RepositoryItems.AddRange(New DevExpress.XtraEditors.Repository.RepositoryItem() {Me.RepositoryItemSpinEdit1, Me.RepositoryItemDuration1}) Me.ribbonCalendar.Size = New System.Drawing.Size(926, 141) ' 'SwitchToDayViewItem1 ' Me.SwitchToDayViewItem1.Id = 1 Me.SwitchToDayViewItem1.Name = "SwitchToDayViewItem1" ' 'SwitchToWorkWeekViewItem1 ' Me.SwitchToWorkWeekViewItem1.Id = 2 Me.SwitchToWorkWeekViewItem1.Name = "SwitchToWorkWeekViewItem1" ' 'SwitchToWeekViewItem1 ' Me.SwitchToWeekViewItem1.Caption = "&Wochenansicht (Arbeitswoche)" Me.SwitchToWeekViewItem1.Id = 3 Me.SwitchToWeekViewItem1.Name = "SwitchToWeekViewItem1" ' 'SwitchToFullWeekViewItem1 ' Me.SwitchToFullWeekViewItem1.Caption = "&Ganze Woche anzeigen" Me.SwitchToFullWeekViewItem1.Id = 4 Me.SwitchToFullWeekViewItem1.Name = "SwitchToFullWeekViewItem1" ' 'SwitchToMonthViewItem1 ' Me.SwitchToMonthViewItem1.Id = 5 Me.SwitchToMonthViewItem1.Name = "SwitchToMonthViewItem1" ' 'SwitchToTimelineViewItem1 ' Me.SwitchToTimelineViewItem1.Id = 6 Me.SwitchToTimelineViewItem1.Name = "SwitchToTimelineViewItem1" ' 'SwitchToGanttViewItem1 ' Me.SwitchToGanttViewItem1.Id = 7 Me.SwitchToGanttViewItem1.Name = "SwitchToGanttViewItem1" ' 'SwitchTimeScalesItem1 ' Me.SwitchTimeScalesItem1.Id = 8 Me.SwitchTimeScalesItem1.Name = "SwitchTimeScalesItem1" ' 'ChangeScaleWidthItem1 ' Me.ChangeScaleWidthItem1.Edit = Me.RepositoryItemSpinEdit1 Me.ChangeScaleWidthItem1.Id = 9 Me.ChangeScaleWidthItem1.Name = "ChangeScaleWidthItem1" Me.ChangeScaleWidthItem1.UseCommandCaption = True ' 'RepositoryItemSpinEdit1 ' Me.RepositoryItemSpinEdit1.AutoHeight = False Me.RepositoryItemSpinEdit1.Buttons.AddRange(New DevExpress.XtraEditors.Controls.EditorButton() {New DevExpress.XtraEditors.Controls.EditorButton(DevExpress.XtraEditors.Controls.ButtonPredefines.Combo)}) Me.RepositoryItemSpinEdit1.EditValueChangedFiringMode = DevExpress.XtraEditors.Controls.EditValueChangedFiringMode.[Default] Me.RepositoryItemSpinEdit1.MaxValue = New Decimal(New Integer() {200, 0, 0, 0}) Me.RepositoryItemSpinEdit1.MinValue = New Decimal(New Integer() {10, 0, 0, 0}) Me.RepositoryItemSpinEdit1.Name = "RepositoryItemSpinEdit1" ' 'SwitchTimeScalesCaptionItem1 ' Me.SwitchTimeScalesCaptionItem1.Id = 10 Me.SwitchTimeScalesCaptionItem1.Name = "SwitchTimeScalesCaptionItem1" ' 'SwitchCompressWeekendItem1 ' Me.SwitchCompressWeekendItem1.Id = 11 Me.SwitchCompressWeekendItem1.Name = "SwitchCompressWeekendItem1" ' 'SwitchShowWorkTimeOnlyItem1 ' Me.SwitchShowWorkTimeOnlyItem1.Id = 12 Me.SwitchShowWorkTimeOnlyItem1.Name = "SwitchShowWorkTimeOnlyItem1" ' 'SwitchCellsAutoHeightItem1 ' Me.SwitchCellsAutoHeightItem1.Id = 13 Me.SwitchCellsAutoHeightItem1.Name = "SwitchCellsAutoHeightItem1" ' 'ChangeSnapToCellsUIItem1 ' Me.ChangeSnapToCellsUIItem1.Id = 14 Me.ChangeSnapToCellsUIItem1.Name = "ChangeSnapToCellsUIItem1" ' 'EditAppointmentQueryItem1 ' Me.EditAppointmentQueryItem1.Id = 15 Me.EditAppointmentQueryItem1.LinksPersistInfo.AddRange(New DevExpress.XtraBars.LinkPersistInfo() {New DevExpress.XtraBars.LinkPersistInfo(Me.EditOccurrenceUICommandItem1), New DevExpress.XtraBars.LinkPersistInfo(Me.EditSeriesUICommandItem1)}) Me.EditAppointmentQueryItem1.Name = "EditAppointmentQueryItem1" Me.EditAppointmentQueryItem1.PaintStyle = DevExpress.XtraBars.BarItemPaintStyle.CaptionGlyph ' 'EditOccurrenceUICommandItem1 ' Me.EditOccurrenceUICommandItem1.Id = 16 Me.EditOccurrenceUICommandItem1.Name = "EditOccurrenceUICommandItem1" ' 'EditSeriesUICommandItem1 ' Me.EditSeriesUICommandItem1.Id = 17 Me.EditSeriesUICommandItem1.Name = "EditSeriesUICommandItem1" ' 'DeleteAppointmentsItem1 ' Me.DeleteAppointmentsItem1.Id = 18 Me.DeleteAppointmentsItem1.LinksPersistInfo.AddRange(New DevExpress.XtraBars.LinkPersistInfo() {New DevExpress.XtraBars.LinkPersistInfo(Me.DeleteOccurrenceItem1), New DevExpress.XtraBars.LinkPersistInfo(Me.DeleteSeriesItem1)}) Me.DeleteAppointmentsItem1.Name = "DeleteAppointmentsItem1" Me.DeleteAppointmentsItem1.PaintStyle = DevExpress.XtraBars.BarItemPaintStyle.CaptionGlyph ' 'DeleteOccurrenceItem1 ' Me.DeleteOccurrenceItem1.Id = 19 Me.DeleteOccurrenceItem1.Name = "DeleteOccurrenceItem1" ' 'DeleteSeriesItem1 ' Me.DeleteSeriesItem1.Id = 20 Me.DeleteSeriesItem1.Name = "DeleteSeriesItem1" ' 'SplitAppointmentItem1 ' Me.SplitAppointmentItem1.Id = 21 Me.SplitAppointmentItem1.Name = "SplitAppointmentItem1" ' 'ChangeAppointmentStatusItem1 ' Me.ChangeAppointmentStatusItem1.Id = 22 Me.ChangeAppointmentStatusItem1.Name = "ChangeAppointmentStatusItem1" ' 'ChangeAppointmentLabelItem1 ' Me.ChangeAppointmentLabelItem1.Id = 23 Me.ChangeAppointmentLabelItem1.Name = "ChangeAppointmentLabelItem1" ' 'ToggleRecurrenceItem1 ' Me.ToggleRecurrenceItem1.Id = 24 Me.ToggleRecurrenceItem1.Name = "ToggleRecurrenceItem1" ' 'ChangeAppointmentReminderItem1 ' Me.ChangeAppointmentReminderItem1.Edit = Me.RepositoryItemDuration1 Me.ChangeAppointmentReminderItem1.Id = 25 Me.ChangeAppointmentReminderItem1.Name = "ChangeAppointmentReminderItem1" ' 'RepositoryItemDuration1 ' Me.RepositoryItemDuration1.AllowNullInput = DevExpress.Utils.DefaultBoolean.[False] Me.RepositoryItemDuration1.AutoHeight = False Me.RepositoryItemDuration1.Buttons.AddRange(New DevExpress.XtraEditors.Controls.EditorButton() {New DevExpress.XtraEditors.Controls.EditorButton(DevExpress.XtraEditors.Controls.ButtonPredefines.Combo)}) Me.RepositoryItemDuration1.DisabledStateText = Nothing Me.RepositoryItemDuration1.Name = "RepositoryItemDuration1" Me.RepositoryItemDuration1.NullValuePromptShowForEmptyValue = True Me.RepositoryItemDuration1.ShowEmptyItem = True Me.RepositoryItemDuration1.ValidateOnEnterKey = True ' 'NewAppointmentItem1 ' Me.NewAppointmentItem1.Id = 26 Me.NewAppointmentItem1.Name = "NewAppointmentItem1" ' 'NewRecurringAppointmentItem1 ' Me.NewRecurringAppointmentItem1.Id = 27 Me.NewRecurringAppointmentItem1.Name = "NewRecurringAppointmentItem1" ' 'NavigateViewBackwardItem1 ' Me.NavigateViewBackwardItem1.Id = 28 Me.NavigateViewBackwardItem1.Name = "NavigateViewBackwardItem1" ' 'NavigateViewForwardItem1 ' Me.NavigateViewForwardItem1.Id = 29 Me.NavigateViewForwardItem1.Name = "NavigateViewForwardItem1" ' 'GotoTodayItem1 ' Me.GotoTodayItem1.Id = 30 Me.GotoTodayItem1.Name = "GotoTodayItem1" ' 'ViewZoomInItem1 ' Me.ViewZoomInItem1.Id = 31 Me.ViewZoomInItem1.Name = "ViewZoomInItem1" ' 'ViewZoomOutItem1 ' Me.ViewZoomOutItem1.Id = 32 Me.ViewZoomOutItem1.Name = "ViewZoomOutItem1" ' 'GroupByNoneItem1 ' Me.GroupByNoneItem1.Id = 33 Me.GroupByNoneItem1.Name = "GroupByNoneItem1" ' 'GroupByDateItem1 ' Me.GroupByDateItem1.Id = 34 Me.GroupByDateItem1.Name = "GroupByDateItem1" ' 'GroupByResourceItem1 ' Me.GroupByResourceItem1.Id = 35 Me.GroupByResourceItem1.Name = "GroupByResourceItem1" ' 'CalendarToolsRibbonPageCategory1 ' Me.CalendarToolsRibbonPageCategory1.Control = Me.SchedulerControl1 Me.CalendarToolsRibbonPageCategory1.Name = "CalendarToolsRibbonPageCategory1" Me.CalendarToolsRibbonPageCategory1.Pages.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPage() {Me.pageAppointment}) Me.CalendarToolsRibbonPageCategory1.Visible = False ' 'pageAppointment ' Me.pageAppointment.Groups.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageGroup() {Me.ActionsRibbonPageGroup1, Me.OptionsRibbonPageGroup1}) Me.pageAppointment.Name = "pageAppointment" Me.pageAppointment.Visible = False ' 'ActionsRibbonPageGroup1 ' Me.ActionsRibbonPageGroup1.ItemLinks.Add(Me.EditAppointmentQueryItem1) Me.ActionsRibbonPageGroup1.ItemLinks.Add(Me.DeleteAppointmentsItem1) Me.ActionsRibbonPageGroup1.ItemLinks.Add(Me.SplitAppointmentItem1) Me.ActionsRibbonPageGroup1.Name = "ActionsRibbonPageGroup1" ' 'OptionsRibbonPageGroup1 ' Me.OptionsRibbonPageGroup1.ItemLinks.Add(Me.ChangeAppointmentStatusItem1) Me.OptionsRibbonPageGroup1.ItemLinks.Add(Me.ChangeAppointmentLabelItem1) Me.OptionsRibbonPageGroup1.ItemLinks.Add(Me.ToggleRecurrenceItem1) Me.OptionsRibbonPageGroup1.ItemLinks.Add(Me.ChangeAppointmentReminderItem1) Me.OptionsRibbonPageGroup1.Name = "OptionsRibbonPageGroup1" ' 'pageCalendar ' Me.pageCalendar.Groups.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageGroup() {Me.AppointmentRibbonPageGroup1, Me.NavigatorRibbonPageGroup1, Me.ArrangeRibbonPageGroup1, Me.GroupByRibbonPageGroup1}) Me.pageCalendar.Name = "pageCalendar" Me.pageCalendar.Text = "Kalender" ' 'AppointmentRibbonPageGroup1 ' Me.AppointmentRibbonPageGroup1.ItemLinks.Add(Me.NewAppointmentItem1) Me.AppointmentRibbonPageGroup1.ItemLinks.Add(Me.NewRecurringAppointmentItem1) Me.AppointmentRibbonPageGroup1.Name = "AppointmentRibbonPageGroup1" ' 'NavigatorRibbonPageGroup1 ' Me.NavigatorRibbonPageGroup1.ItemLinks.Add(Me.NavigateViewBackwardItem1) Me.NavigatorRibbonPageGroup1.ItemLinks.Add(Me.NavigateViewForwardItem1) Me.NavigatorRibbonPageGroup1.ItemLinks.Add(Me.GotoTodayItem1) Me.NavigatorRibbonPageGroup1.ItemLinks.Add(Me.ViewZoomInItem1) Me.NavigatorRibbonPageGroup1.ItemLinks.Add(Me.ViewZoomOutItem1) Me.NavigatorRibbonPageGroup1.Name = "NavigatorRibbonPageGroup1" ' 'ArrangeRibbonPageGroup1 ' Me.ArrangeRibbonPageGroup1.ItemLinks.Add(Me.SwitchToDayViewItem1) Me.ArrangeRibbonPageGroup1.ItemLinks.Add(Me.SwitchToWorkWeekViewItem1) Me.ArrangeRibbonPageGroup1.ItemLinks.Add(Me.SwitchToWeekViewItem1) Me.ArrangeRibbonPageGroup1.ItemLinks.Add(Me.SwitchToFullWeekViewItem1) Me.ArrangeRibbonPageGroup1.ItemLinks.Add(Me.SwitchToMonthViewItem1) Me.ArrangeRibbonPageGroup1.ItemLinks.Add(Me.SwitchToTimelineViewItem1) Me.ArrangeRibbonPageGroup1.ItemLinks.Add(Me.SwitchToGanttViewItem1) Me.ArrangeRibbonPageGroup1.Name = "ArrangeRibbonPageGroup1" ' 'GroupByRibbonPageGroup1 ' Me.GroupByRibbonPageGroup1.ItemLinks.Add(Me.GroupByNoneItem1) Me.GroupByRibbonPageGroup1.ItemLinks.Add(Me.GroupByDateItem1) Me.GroupByRibbonPageGroup1.ItemLinks.Add(Me.GroupByResourceItem1) Me.GroupByRibbonPageGroup1.Name = "GroupByRibbonPageGroup1" ' 'SchedulerStorage1 ' Me.SchedulerStorage1.Appointments.CustomFieldMappings.Add(New DevExpress.XtraScheduler.AppointmentCustomFieldMapping("RecordID", "CustomField1")) Me.SchedulerStorage1.Appointments.CustomFieldMappings.Add(New DevExpress.XtraScheduler.AppointmentCustomFieldMapping("ControlID", "CustomField2")) Me.SchedulerStorage1.Appointments.DataSource = Me.TBPMOAPPOINTMENTSBindingSource Me.SchedulerStorage1.Appointments.Mappings.AllDay = "AllDay" Me.SchedulerStorage1.Appointments.Mappings.Description = "Description" Me.SchedulerStorage1.Appointments.Mappings.End = "EndDate" Me.SchedulerStorage1.Appointments.Mappings.Label = "Label" Me.SchedulerStorage1.Appointments.Mappings.Location = "Location" Me.SchedulerStorage1.Appointments.Mappings.RecurrenceInfo = "RecurrenceInfo" Me.SchedulerStorage1.Appointments.Mappings.ReminderInfo = "ReminderInfo" Me.SchedulerStorage1.Appointments.Mappings.ResourceId = "ResourceID" Me.SchedulerStorage1.Appointments.Mappings.Start = "StartDate" Me.SchedulerStorage1.Appointments.Mappings.Status = "Status" Me.SchedulerStorage1.Appointments.Mappings.Subject = "Subject" Me.SchedulerStorage1.Appointments.Mappings.Type = "Type" Me.SchedulerStorage1.Resources.DataSource = Me.TBPMORESOURCESBindingSource Me.SchedulerStorage1.Resources.Mappings.Caption = "ResourceName" Me.SchedulerStorage1.Resources.Mappings.Color = "Color" Me.SchedulerStorage1.Resources.Mappings.Id = "ResourceID" Me.SchedulerStorage1.Resources.Mappings.Image = "Image" Me.SchedulerStorage1.Resources.Mappings.ParentId = "UniqueID" ' 'TBPMOAPPOINTMENTSBindingSource ' Me.TBPMOAPPOINTMENTSBindingSource.DataMember = "TBPMO_APPOINTMENTS" Me.TBPMOAPPOINTMENTSBindingSource.DataSource = Me.DD_DMSDataSetCalendar ' 'DD_DMSDataSetCalendar ' Me.DD_DMSDataSetCalendar.DataSetName = "DD_DMSDataSetCalendar" Me.DD_DMSDataSetCalendar.SchemaSerializationMode = System.Data.SchemaSerializationMode.IncludeSchema ' 'TBPMORESOURCESBindingSource ' Me.TBPMORESOURCESBindingSource.DataMember = "TBPMO_RESOURCES" Me.TBPMORESOURCESBindingSource.DataSource = Me.DD_DMSDataSetCalendar ' 'TBPMO_APPOINTMENTSTableAdapter ' Me.TBPMO_APPOINTMENTSTableAdapter.ClearBeforeFill = True ' 'TBPMO_RESOURCESTableAdapter ' Me.TBPMO_RESOURCESTableAdapter.ClearBeforeFill = True ' 'SchedulerBarController1 ' Me.SchedulerBarController1.BarItems.Add(Me.SwitchToDayViewItem1) Me.SchedulerBarController1.BarItems.Add(Me.SwitchToWorkWeekViewItem1) Me.SchedulerBarController1.BarItems.Add(Me.SwitchToWeekViewItem1) Me.SchedulerBarController1.BarItems.Add(Me.SwitchToFullWeekViewItem1) Me.SchedulerBarController1.BarItems.Add(Me.SwitchToMonthViewItem1) Me.SchedulerBarController1.BarItems.Add(Me.SwitchToTimelineViewItem1) Me.SchedulerBarController1.BarItems.Add(Me.SwitchToGanttViewItem1) Me.SchedulerBarController1.BarItems.Add(Me.SwitchTimeScalesItem1) Me.SchedulerBarController1.BarItems.Add(Me.ChangeScaleWidthItem1) Me.SchedulerBarController1.BarItems.Add(Me.SwitchTimeScalesCaptionItem1) Me.SchedulerBarController1.BarItems.Add(Me.SwitchCompressWeekendItem1) Me.SchedulerBarController1.BarItems.Add(Me.SwitchShowWorkTimeOnlyItem1) Me.SchedulerBarController1.BarItems.Add(Me.SwitchCellsAutoHeightItem1) Me.SchedulerBarController1.BarItems.Add(Me.ChangeSnapToCellsUIItem1) Me.SchedulerBarController1.BarItems.Add(Me.EditAppointmentQueryItem1) Me.SchedulerBarController1.BarItems.Add(Me.EditOccurrenceUICommandItem1) Me.SchedulerBarController1.BarItems.Add(Me.EditSeriesUICommandItem1) Me.SchedulerBarController1.BarItems.Add(Me.DeleteAppointmentsItem1) Me.SchedulerBarController1.BarItems.Add(Me.DeleteOccurrenceItem1) Me.SchedulerBarController1.BarItems.Add(Me.DeleteSeriesItem1) Me.SchedulerBarController1.BarItems.Add(Me.SplitAppointmentItem1) Me.SchedulerBarController1.BarItems.Add(Me.ChangeAppointmentStatusItem1) Me.SchedulerBarController1.BarItems.Add(Me.ChangeAppointmentLabelItem1) Me.SchedulerBarController1.BarItems.Add(Me.ToggleRecurrenceItem1) Me.SchedulerBarController1.BarItems.Add(Me.ChangeAppointmentReminderItem1) Me.SchedulerBarController1.BarItems.Add(Me.NewAppointmentItem1) Me.SchedulerBarController1.BarItems.Add(Me.NewRecurringAppointmentItem1) Me.SchedulerBarController1.BarItems.Add(Me.NavigateViewBackwardItem1) Me.SchedulerBarController1.BarItems.Add(Me.NavigateViewForwardItem1) Me.SchedulerBarController1.BarItems.Add(Me.GotoTodayItem1) Me.SchedulerBarController1.BarItems.Add(Me.ViewZoomInItem1) Me.SchedulerBarController1.BarItems.Add(Me.ViewZoomOutItem1) Me.SchedulerBarController1.BarItems.Add(Me.GroupByNoneItem1) Me.SchedulerBarController1.BarItems.Add(Me.GroupByDateItem1) Me.SchedulerBarController1.BarItems.Add(Me.GroupByResourceItem1) Me.SchedulerBarController1.Control = Me.SchedulerControl1 ' 'frmCalendar ' Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font Me.ClientSize = New System.Drawing.Size(926, 597) Me.Controls.Add(Me.SchedulerControl1) Me.Controls.Add(Me.ribbonCalendar) Me.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.Name = "frmCalendar" Me.Text = "Kalender Ansicht" CType(Me.SchedulerControl1, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.ribbonCalendar, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.RepositoryItemSpinEdit1, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.RepositoryItemDuration1, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.SchedulerStorage1, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.TBPMOAPPOINTMENTSBindingSource, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.DD_DMSDataSetCalendar, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.TBPMORESOURCESBindingSource, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.SchedulerBarController1, System.ComponentModel.ISupportInitialize).EndInit() Me.ResumeLayout(False) Me.PerformLayout() End Sub Friend WithEvents SchedulerControl1 As DevExpress.XtraScheduler.SchedulerControl Friend WithEvents SchedulerStorage1 As DevExpress.XtraScheduler.SchedulerStorage Friend WithEvents DD_DMSDataSetCalendar As DD_Record_Organizer.DD_DMSDataSetCalendar Friend WithEvents TBPMOAPPOINTMENTSBindingSource As System.Windows.Forms.BindingSource Friend WithEvents TBPMO_APPOINTMENTSTableAdapter As DD_Record_Organizer.DD_DMSDataSetCalendarTableAdapters.TBPMO_APPOINTMENTSTableAdapter Friend WithEvents TBPMORESOURCESBindingSource As System.Windows.Forms.BindingSource Friend WithEvents TBPMO_RESOURCESTableAdapter As DD_Record_Organizer.DD_DMSDataSetCalendarTableAdapters.TBPMO_RESOURCESTableAdapter Friend WithEvents ribbonCalendar As DevExpress.XtraBars.Ribbon.RibbonControl Friend WithEvents SwitchToDayViewItem1 As DevExpress.XtraScheduler.UI.SwitchToDayViewItem Friend WithEvents SwitchToWorkWeekViewItem1 As DevExpress.XtraScheduler.UI.SwitchToWorkWeekViewItem Friend WithEvents SwitchToWeekViewItem1 As DevExpress.XtraScheduler.UI.SwitchToWeekViewItem Friend WithEvents SwitchToFullWeekViewItem1 As DevExpress.XtraScheduler.UI.SwitchToFullWeekViewItem Friend WithEvents SwitchToMonthViewItem1 As DevExpress.XtraScheduler.UI.SwitchToMonthViewItem Friend WithEvents SwitchToTimelineViewItem1 As DevExpress.XtraScheduler.UI.SwitchToTimelineViewItem Friend WithEvents SwitchToGanttViewItem1 As DevExpress.XtraScheduler.UI.SwitchToGanttViewItem Friend WithEvents SwitchTimeScalesItem1 As DevExpress.XtraScheduler.UI.SwitchTimeScalesItem Friend WithEvents ChangeScaleWidthItem1 As DevExpress.XtraScheduler.UI.ChangeScaleWidthItem Friend WithEvents RepositoryItemSpinEdit1 As DevExpress.XtraEditors.Repository.RepositoryItemSpinEdit Friend WithEvents SwitchTimeScalesCaptionItem1 As DevExpress.XtraScheduler.UI.SwitchTimeScalesCaptionItem Friend WithEvents SwitchCompressWeekendItem1 As DevExpress.XtraScheduler.UI.SwitchCompressWeekendItem Friend WithEvents SwitchShowWorkTimeOnlyItem1 As DevExpress.XtraScheduler.UI.SwitchShowWorkTimeOnlyItem Friend WithEvents SwitchCellsAutoHeightItem1 As DevExpress.XtraScheduler.UI.SwitchCellsAutoHeightItem Friend WithEvents ChangeSnapToCellsUIItem1 As DevExpress.XtraScheduler.UI.ChangeSnapToCellsUIItem Friend WithEvents SchedulerBarController1 As DevExpress.XtraScheduler.UI.SchedulerBarController Friend WithEvents EditAppointmentQueryItem1 As DevExpress.XtraScheduler.UI.EditAppointmentQueryItem Friend WithEvents EditOccurrenceUICommandItem1 As DevExpress.XtraScheduler.UI.EditOccurrenceUICommandItem Friend WithEvents EditSeriesUICommandItem1 As DevExpress.XtraScheduler.UI.EditSeriesUICommandItem Friend WithEvents DeleteAppointmentsItem1 As DevExpress.XtraScheduler.UI.DeleteAppointmentsItem Friend WithEvents DeleteOccurrenceItem1 As DevExpress.XtraScheduler.UI.DeleteOccurrenceItem Friend WithEvents DeleteSeriesItem1 As DevExpress.XtraScheduler.UI.DeleteSeriesItem Friend WithEvents SplitAppointmentItem1 As DevExpress.XtraScheduler.UI.SplitAppointmentItem Friend WithEvents ChangeAppointmentStatusItem1 As DevExpress.XtraScheduler.UI.ChangeAppointmentStatusItem Friend WithEvents ChangeAppointmentLabelItem1 As DevExpress.XtraScheduler.UI.ChangeAppointmentLabelItem Friend WithEvents ToggleRecurrenceItem1 As DevExpress.XtraScheduler.UI.ToggleRecurrenceItem Friend WithEvents ChangeAppointmentReminderItem1 As DevExpress.XtraScheduler.UI.ChangeAppointmentReminderItem Friend WithEvents RepositoryItemDuration1 As DevExpress.XtraScheduler.UI.RepositoryItemDuration Friend WithEvents CalendarToolsRibbonPageCategory1 As DevExpress.XtraScheduler.UI.CalendarToolsRibbonPageCategory Friend WithEvents pageAppointment As DevExpress.XtraScheduler.UI.AppointmentRibbonPage Friend WithEvents ActionsRibbonPageGroup1 As DevExpress.XtraScheduler.UI.ActionsRibbonPageGroup Friend WithEvents OptionsRibbonPageGroup1 As DevExpress.XtraScheduler.UI.OptionsRibbonPageGroup Friend WithEvents NewAppointmentItem1 As DevExpress.XtraScheduler.UI.NewAppointmentItem Friend WithEvents NewRecurringAppointmentItem1 As DevExpress.XtraScheduler.UI.NewRecurringAppointmentItem Friend WithEvents NavigateViewBackwardItem1 As DevExpress.XtraScheduler.UI.NavigateViewBackwardItem Friend WithEvents NavigateViewForwardItem1 As DevExpress.XtraScheduler.UI.NavigateViewForwardItem Friend WithEvents GotoTodayItem1 As DevExpress.XtraScheduler.UI.GotoTodayItem Friend WithEvents ViewZoomInItem1 As DevExpress.XtraScheduler.UI.ViewZoomInItem Friend WithEvents ViewZoomOutItem1 As DevExpress.XtraScheduler.UI.ViewZoomOutItem Friend WithEvents GroupByNoneItem1 As DevExpress.XtraScheduler.UI.GroupByNoneItem Friend WithEvents GroupByDateItem1 As DevExpress.XtraScheduler.UI.GroupByDateItem Friend WithEvents GroupByResourceItem1 As DevExpress.XtraScheduler.UI.GroupByResourceItem Friend WithEvents pageCalendar As DevExpress.XtraScheduler.UI.HomeRibbonPage Friend WithEvents AppointmentRibbonPageGroup1 As DevExpress.XtraScheduler.UI.AppointmentRibbonPageGroup Friend WithEvents NavigatorRibbonPageGroup1 As DevExpress.XtraScheduler.UI.NavigatorRibbonPageGroup Friend WithEvents ArrangeRibbonPageGroup1 As DevExpress.XtraScheduler.UI.ArrangeRibbonPageGroup Friend WithEvents GroupByRibbonPageGroup1 As DevExpress.XtraScheduler.UI.GroupByRibbonPageGroup End Class