object MainForm: TMainForm Left = 225 Height = 686 Top = 155 Width = 980 Caption = 'MainForm' ClientHeight = 686 ClientWidth = 980 OnCreate = FormCreate object PageControl1: TPageControl Left = 0 Height = 686 Top = 0 Width = 980 ActivePage = TabSheet1 Align = alClient TabIndex = 0 TabOrder = 0 object TabSheet1: TTabSheet Caption = 'Events and tasks' ClientHeight = 658 ClientWidth = 972 object VpDayView1: TVpDayView Left = 0 Height = 658 Top = 0 Width = 301 PopupMenu = VpDayView1.default DataStore = VpIniDatastore1 ControlLink = VpControlLink1 Align = alLeft TabOrder = 0 AllowDragAndDrop = True ShowEventTimes = False DrawingStyle = dsFlat TimeSlotColors.Active = clWhite TimeSlotColors.Inactive = 8454143 TimeSlotColors.Holiday = 16744703 TimeSlotColors.Weekend = 16777088 TimeSlotColors.ActiveRange.RangeBegin = h_00 TimeSlotColors.ActiveRange.RangeEnd = h_00 HeadAttributes.Font.Height = -13 RowHeadAttributes.HourFont.Height = -24 RowHeadAttributes.MinuteFont.Height = -12 LineColor = clGray DateLabelFormat = 'dddd, mmmm dd, yyyy' TimeFormat = tf24Hour end object Panel2: TPanel Left = 306 Height = 658 Top = 0 Width = 386 Align = alLeft BevelOuter = bvNone Caption = 'Panel2' ClientHeight = 658 ClientWidth = 386 TabOrder = 1 object VpWeekView1: TVpWeekView Left = 0 Height = 412 Top = 0 Width = 386 PopupMenu = VpWeekView1.default DataStore = VpIniDatastore1 ControlLink = VpControlLink1 AllDayEventAttributes.BackgroundColor = clWindow AllDayEventAttributes.EventBorderColor = clGray DateLabelFormat = 'dddd, mmmm dd, yyyy' DayHeadAttributes.DateFormat = 'ddddd' DayHeadAttributes.Font.Height = -13 DayHeadAttributes.Font.Name = 'Tahoma' DrawingStyle = dsFlat LineColor = clGray TimeFormat = tf24Hour WeekStartsOn = dtMonday Align = alClient TabOrder = 0 end object VpMonthView1: TVpMonthView Left = 0 Height = 241 Top = 417 Width = 386 PopupMenu = VpMonthView1.default DataStore = VpIniDatastore1 ControlLink = VpControlLink1 Align = alBottom TabOrder = 1 DayHeadAttributes.Font.Height = -13 DayHeadAttributes.Font.Name = 'Tahoma' DrawingStyle = dsFlat OffDayColor = clSilver TimeFormat = tf24Hour TodayAttributes.Color = clSilver TodayAttributes.BorderPen.Color = clRed TodayAttributes.BorderPen.Width = 3 WeekStartsOn = dtMonday end object Splitter2: TSplitter Cursor = crVSplit Left = 0 Height = 5 Top = 412 Width = 386 Align = alBottom ResizeAnchor = akBottom end end object VpTaskList1: TVpTaskList Left = 697 Height = 658 Top = 0 Width = 275 PopupMenu = VpTaskList1.default DataStore = VpIniDatastore1 ControlLink = VpControlLink1 Align = alClient TabOrder = 2 DisplayOptions.ShowAll = True DisplayOptions.NormalColor = clBlack DrawingStyle = dsFlat LineColor = clGray TaskHeadAttributes.Color = clSilver end object Splitter1: TSplitter Left = 692 Height = 658 Top = 0 Width = 5 end object Splitter3: TSplitter Left = 301 Height = 658 Top = 0 Width = 5 end end object TabSheet2: TTabSheet Caption = 'Contacts' ClientHeight = 658 ClientWidth = 972 object VpContactButtonBar1: TVpContactButtonBar Left = 0 Height = 658 Top = 0 Width = 40 DrawingStyle = dsFlat RadioStyle = False Align = alLeft end object VpContactGrid1: TVpContactGrid Left = 40 Height = 658 Top = 0 Width = 932 PopupMenu = VpContactGrid1.default DataStore = VpIniDatastore1 ControlLink = VpControlLink1 Align = alClient TabOrder = 1 ColumnWidth = 200 DrawingStyle = dsFlat end end end object VpControlLink1: TVpControlLink DataStore = VpIniDatastore1 Printer.DayStart = h_08 Printer.DayEnd = h_05 Printer.Granularity = gr30Min Printer.MarginUnits = imAbsolutePixel Printer.PrintFormats = <> Left = 136 Top = 264 end object VpResourceEditDialog1: TVpResourceEditDialog Version = 'v1.0.7' DataStore = VpIniDatastore1 Options = [] Placement.Position = mpCenter Placement.Top = 10 Placement.Left = 10 Placement.Height = 250 Placement.Width = 400 Left = 136 Top = 335 end object VpIniDatastore1: TVpIniDatastore CategoryColorMap.Category0.Description = 'Category 0' CategoryColorMap.Category1.Description = 'Category 1' CategoryColorMap.Category2.Description = 'Category 2' CategoryColorMap.Category3.Description = 'Category 3' CategoryColorMap.Category4.Description = 'Category 4' CategoryColorMap.Category5.Description = 'Category 5' CategoryColorMap.Category6.Description = 'Category 6' CategoryColorMap.Category7.Description = 'Category 7' CategoryColorMap.Category8.Description = 'Category 8' CategoryColorMap.Category9.Description = 'Category 9' HiddenCategories.BackgroundColor = clSilver HiddenCategories.Color = clGray AutoConnect = True FileName = 'data.ini' Left = 136 Top = 200 end object PopupMenu1: TPopupMenu Left = 129 Top = 527 end end