Files
lazarus-ccr/components/jvcllaz/examples/JvTMTimeLine/TMTimeLineMainFormU.lfm

1257 lines
45 KiB
Plaintext
Raw Normal View History

object TMTimeLineMainForm: TTMTimeLineMainForm
Left = 371
Height = 591
Top = 154
Width = 926
Caption = 'Team Manager Timeline demo'
ClientHeight = 591
ClientWidth = 926
Color = clBtnFace
Constraints.MinHeight = 376
Constraints.MinWidth = 710
DefaultMonitor = dmDesktop
Font.Color = clWindowText
OnCloseQuery = FormCloseQuery
OnCreate = FormCreate
OnMouseWheelDown = FormMouseWheelDown
OnMouseWheelUp = FormMouseWheelUp
OnShow = FormShow
Position = poScreenCenter
ShowHint = True
LCLVersion = '1.9.0.0'
Scaled = False
object Panel1: TPanel
Left = 0
Height = 335
Top = 224
Width = 926
Align = alBottom
AutoSize = True
BevelOuter = bvNone
ClientHeight = 335
ClientWidth = 926
TabOrder = 0
TabStop = True
object LblImages: TLabel
AnchorSideLeft.Control = LbImages
AnchorSideTop.Control = Panel1
AnchorSideRight.Side = asrBottom
Left = 4
Height = 15
Top = 4
Width = 41
BorderSpacing.Top = 4
Caption = 'Images:'
ParentColor = False
end
object LblKeyboardNavigation: TLabel
AnchorSideLeft.Control = gbDates
AnchorSideTop.Control = gbDates
AnchorSideTop.Side = asrBottom
Left = 597
Height = 15
Top = 188
Width = 112
BorderSpacing.Top = 24
Caption = 'Keyboard navigation:'
ParentColor = False
end
object Label18: TLabel
AnchorSideLeft.Control = LblKeyboardNavigation
AnchorSideTop.Control = LblKeyboardNavigation
AnchorSideTop.Side = asrBottom
Left = 613
Height = 30
Top = 207
Width = 181
BorderSpacing.Left = 16
BorderSpacing.Top = 4
Caption = 'Left/Right arrow:'#13#10#9'move Small Change days'
ParentColor = False
end
object Label19: TLabel
AnchorSideLeft.Control = Label18
AnchorSideTop.Control = Label18
AnchorSideTop.Side = asrBottom
Left = 613
Height = 30
Top = 241
Width = 181
BorderSpacing.Top = 4
Caption = 'Ctrl+Left/Right arrow:'#13#10#9'move Large Change days'
ParentColor = False
end
object Label20: TLabel
AnchorSideLeft.Control = Label19
AnchorSideTop.Control = Label19
AnchorSideTop.Side = asrBottom
Left = 613
Height = 30
Top = 275
Width = 173
BorderSpacing.Top = 4
Caption = 'Shift+Left/Right arrow:'#13#10#9'move selection one day'
ParentColor = False
end
object gbDates: TGroupBox
AnchorSideLeft.Control = gbAppearance
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = gbWidths
Left = 597
Height = 160
Top = 4
Width = 230
AutoSize = True
BorderSpacing.Left = 24
Caption = ' Dates: '
ClientHeight = 140
ClientWidth = 226
TabOrder = 2
object Label2: TLabel
AnchorSideLeft.Control = gbDates
AnchorSideTop.Control = gbDates
Left = 12
Height = 15
Top = 0
Width = 87
BorderSpacing.Left = 12
Caption = 'First visible date:'
ParentColor = False
end
object Label3: TLabel
AnchorSideLeft.Control = Label2
AnchorSideTop.Control = dtpFirstDate
AnchorSideTop.Side = asrBottom
Left = 12
Height = 15
Top = 48
Width = 73
BorderSpacing.Top = 8
Caption = 'Selected date:'
ParentColor = False
end
object Label4: TLabel
AnchorSideLeft.Control = edImageNo
AnchorSideTop.Control = Label2
Left = 131
Height = 15
Top = 0
Width = 61
Caption = 'Add image:'
ParentColor = False
end
object Label5: TLabel
AnchorSideLeft.Control = edImageNo
AnchorSideTop.Control = Label3
Left = 131
Height = 15
Top = 48
Width = 39
Caption = 'at date:'
ParentColor = False
end
object dtpFirstDate: TDateTimePicker
AnchorSideLeft.Control = Label2
AnchorSideTop.Control = Label2
AnchorSideTop.Side = asrBottom
Left = 12
Height = 23
Hint = 'Sets the first displayed date'
Top = 17
Width = 79
CenturyFrom = 1941
MaxDate = 2958465
MinDate = -53780
TabOrder = 0
BorderSpacing.Top = 2
TrailingSeparator = False
LeadingZeros = True
Kind = dtkDate
TimeFormat = tf24
TimeDisplay = tdHMS
DateMode = dmComboBox
Date = 36854
Time = 0.425169305599411
UseDefaultSeparators = True
HideDateTimeParts = []
MonthNames = 'Long'
CalAlignment = dtaLeft
OnChange = dtpFirstDateChange
end
object dtpSelDate: TDateTimePicker
AnchorSideLeft.Control = Label2
AnchorSideTop.Control = Label3
AnchorSideTop.Side = asrBottom
Left = 12
Height = 23
Hint = 'Sets the selected day'
Top = 65
Width = 79
CenturyFrom = 1941
MaxDate = 2958465
MinDate = -53780
TabOrder = 1
BorderSpacing.Top = 2
TrailingSeparator = False
LeadingZeros = True
Kind = dtkDate
TimeFormat = tf24
TimeDisplay = tdHMS
DateMode = dmComboBox
Date = 36854
Time = 0.425169305599411
UseDefaultSeparators = True
HideDateTimeParts = []
MonthNames = 'Long'
CalAlignment = dtaLeft
OnChange = dtpSelDateChange
end
object edImageNo: TEdit
AnchorSideLeft.Control = dtpFirstDate
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = Label2
AnchorSideTop.Side = asrBottom
Left = 131
Height = 23
Hint = 'Sets the imageindex to insert at the current date'#13#10'(use -1 to remove image)'
Top = 17
Width = 68
BorderSpacing.Left = 40
BorderSpacing.Top = 2
TabOrder = 2
Text = '-1'
end
object udImageNo: TUpDown
AnchorSideLeft.Control = edImageNo
AnchorSideLeft.Side = asrBottom
Left = 199
Height = 23
Top = 17
Width = 15
Associate = edImageNo
BorderSpacing.Right = 12
Min = -1
Position = -1
TabOrder = 3
Wrap = False
end
object dtpImageDate: TDateTimePicker
AnchorSideLeft.Control = edImageNo
AnchorSideTop.Control = Label5
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = udImageNo
AnchorSideRight.Side = asrBottom
Left = 131
Height = 23
Hint = 'Sets the date to insert / delete an image'
Top = 65
Width = 83
CenturyFrom = 1941
MaxDate = 2958465
MinDate = -53780
TabOrder = 4
BorderSpacing.Top = 2
TrailingSeparator = False
LeadingZeros = True
Anchors = [akTop, akLeft, akRight]
Kind = dtkDate
TimeFormat = tf24
TimeDisplay = tdHMS
DateMode = dmComboBox
Date = 36854
Time = 0.587075949100836
UseDefaultSeparators = True
HideDateTimeParts = []
MonthNames = 'Long'
CalAlignment = dtaLeft
end
object btnAdd: TButton
AnchorSideRight.Control = udImageNo
AnchorSideRight.Side = asrBottom
Left = 166
Height = 25
Hint = 'Adds an image to the chosen date'
Top = 103
Width = 48
Anchors = [akTop, akRight]
AutoSize = True
BorderSpacing.Bottom = 12
Caption = '&Add'
OnClick = btnAddClick
TabOrder = 5
end
end
object gbAppearance: TGroupBox
AnchorSideLeft.Control = gbWidths
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = gbWidths
Left = 315
Height = 194
Top = 4
Width = 258
AutoSize = True
BorderSpacing.Left = 24
Caption = ' Appearance: '
ClientHeight = 174
ClientWidth = 254
TabOrder = 1
object Label13: TLabel
AnchorSideLeft.Control = chkRClick
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = chkEnabled
Left = 128
Height = 15
Top = 63
Width = 114
BorderSpacing.Left = 8
BorderSpacing.Right = 12
Caption = 'Assigned object style:'
ParentColor = False
end
object chkReadOnly: TCheckBox
AnchorSideLeft.Control = gbAppearance
AnchorSideTop.Control = gbAppearance
Left = 12
Height = 19
Hint = 'Makes the control read-only'
Top = 0
Width = 74
BorderSpacing.Left = 12
Caption = 'Read-only'
OnClick = chkReadOnlyClick
TabOrder = 0
end
object chkFlat: TCheckBox
AnchorSideLeft.Control = chkReadOnly
AnchorSideTop.Control = chkReadOnly
AnchorSideTop.Side = asrBottom
Left = 12
Height = 19
Hint = 'Makes the control flat'
Top = 21
Width = 39
BorderSpacing.Top = 2
Caption = 'Flat'
OnClick = chkFlatClick
TabOrder = 1
end
object chkRClick: TCheckBox
AnchorSideLeft.Control = chkReadOnly
AnchorSideTop.Control = chkFlat
AnchorSideTop.Side = asrBottom
Left = 12
Height = 19
Hint = 'Moves the selection on right-click too'
Top = 42
Width = 108
BorderSpacing.Top = 2
Caption = 'Right click select'
OnClick = chkRClickClick
TabOrder = 2
end
object chkEnabled: TCheckBox
AnchorSideLeft.Control = chkReadOnly
AnchorSideTop.Control = chkRClick
AnchorSideTop.Side = asrBottom
Left = 12
Height = 19
Hint = 'Enables the control'
Top = 63
Width = 62
BorderSpacing.Top = 2
Caption = 'Enabled'
Checked = True
OnClick = chkEnabledClick
State = cbChecked
TabOrder = 3
end
object chkShowToday: TCheckBox
AnchorSideLeft.Control = chkReadOnly
AnchorSideTop.Control = chkEnabled
AnchorSideTop.Side = asrBottom
Left = 12
Height = 19
Top = 84
Width = 82
BorderSpacing.Top = 2
Caption = 'Show today'
Checked = True
OnClick = chkShowTodayClick
State = cbChecked
TabOrder = 4
end
object chkShowWeeks: TCheckBox
AnchorSideLeft.Control = chkReadOnly
AnchorSideTop.Control = chkShowTodayIcon
AnchorSideTop.Side = asrBottom
Left = 12
Height = 19
Top = 126
Width = 84
BorderSpacing.Top = 2
Caption = 'Show weeks'
Checked = True
OnClick = chkShowWeeksClick
State = cbChecked
TabOrder = 6
end
object chkShowMonths: TCheckBox
AnchorSideLeft.Control = chkReadOnly
AnchorSideTop.Control = chkShowWeeks
AnchorSideTop.Side = asrBottom
AnchorSideBottom.Side = asrBottom
Left = 12
Height = 19
Top = 147
Width = 93
BorderSpacing.Top = 2
BorderSpacing.Bottom = 8
Caption = 'Show months'
Checked = True
OnClick = chkShowMonthsClick
State = cbChecked
TabOrder = 7
end
object lbObjFontStyle: TCheckListBox
AnchorSideLeft.Control = Label13
AnchorSideTop.Control = Label13
AnchorSideTop.Side = asrBottom
AnchorSideRight.Side = asrBottom
AnchorSideBottom.Control = chkShowMonths
AnchorSideBottom.Side = asrBottom
Left = 128
Height = 86
Hint = 'Sets the font to use for day items that'#13#10'have a non-nil Objects item'
Top = 80
Width = 107
Anchors = [akTop, akLeft, akBottom]
BorderSpacing.Top = 2
BorderSpacing.Right = 12
IntegralHeight = True
Items.Strings = (
'Bold'
'Italic'
'Underline'
'Strikeout'
)
ItemHeight = 17
OnClickCheck = lbObjFontStyleClickCheck
TabOrder = 8
Data = {
0400000000000000
}
end
object chkShowTodayIcon: TCheckBox
AnchorSideLeft.Control = chkReadOnly
AnchorSideTop.Control = chkShowToday
AnchorSideTop.Side = asrBottom
Left = 12
Height = 19
Top = 105
Width = 108
BorderSpacing.Top = 2
Caption = 'Show today icon'
Checked = True
OnClick = chkShowTodayIconClick
State = cbChecked
TabOrder = 5
end
end
object gbMisc: TGroupBox
AnchorSideLeft.Control = gbFonts
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = gbFonts
AnchorSideBottom.Side = asrBottom
Left = 369
Height = 94
Top = 206
Width = 145
AutoSize = True
BorderSpacing.Left = 24
BorderSpacing.Bottom = 16
Caption = ' Misc. '
ClientHeight = 74
ClientWidth = 141
TabOrder = 4
object btnLoad: TButton
AnchorSideLeft.Control = gbMisc
AnchorSideTop.Control = gbMisc
Left = 16
Height = 25
Hint = 'Loads a previously saved timeline file'
Top = 4
Width = 109
AutoSize = True
BorderSpacing.Left = 16
BorderSpacing.Top = 4
BorderSpacing.Right = 16
Caption = 'Load from file...'
OnClick = btnLoadClick
TabOrder = 0
end
object btnSave: TButton
AnchorSideLeft.Control = btnLoad
AnchorSideTop.Control = btnLoad
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = btnLoad
AnchorSideRight.Side = asrBottom
Left = 16
Height = 25
Hint = 'Saves the current content to a timeline file'
Top = 37
Width = 109
Anchors = [akTop, akLeft, akRight]
AutoSize = True
BorderSpacing.Top = 8
BorderSpacing.Bottom = 12
Caption = 'Save to file...'
OnClick = btnSaveClick
TabOrder = 1
end
end
object gbFonts: TGroupBox
AnchorSideLeft.Control = gbWidths
AnchorSideTop.Control = gbAppearance
AnchorSideTop.Side = asrBottom
Left = 100
Height = 129
Top = 206
Width = 245
AutoSize = True
BorderSpacing.Top = 8
Caption = ' Fonts and colors: '
ClientHeight = 109
ClientWidth = 241
TabOrder = 3
object btnFont: TButton
AnchorSideLeft.Control = btnColor
AnchorSideTop.Control = btnColor
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = btnMonthFont
AnchorSideRight.Side = asrBottom
Left = 12
Height = 25
Hint = 'Sets the font for days'
Top = 37
Width = 96
Anchors = [akTop, akLeft, akRight]
AutoSize = True
BorderSpacing.Top = 8
Caption = 'Font...'
OnClick = btnFontClick
TabOrder = 1
end
object btnColor: TButton
AnchorSideLeft.Control = btnMonthFont
AnchorSideTop.Control = gbFonts
AnchorSideRight.Control = btnMonthFont
AnchorSideRight.Side = asrBottom
Left = 12
Height = 25
Hint = 'Sets the background color'
Top = 4
Width = 96
Anchors = [akTop, akLeft, akRight]
AutoSize = True
BorderSpacing.Top = 4
Caption = 'Color...'
OnClick = btnColorClick
TabOrder = 0
end
object btnMonthFont: TButton
AnchorSideLeft.Control = gbFonts
AnchorSideTop.Control = btnFont
AnchorSideTop.Side = asrBottom
Left = 12
Height = 25
Hint = 'Sets the font for months and years'
Top = 70
Width = 96
AutoSize = True
BorderSpacing.Left = 12
BorderSpacing.Top = 8
Caption = 'Month font...'
OnClick = btnMonthFontClick
TabOrder = 2
end
object btnTodayColor: TButton
AnchorSideLeft.Control = btnPenColor
AnchorSideTop.Control = btnFont
AnchorSideRight.Control = btnPenColor
AnchorSideRight.Side = asrBottom
Left = 116
Height = 25
Hint = 'Sets the background color for the today item'
Top = 37
Width = 113
Anchors = [akTop, akLeft, akRight]
AutoSize = True
Caption = 'Today color...'
OnClick = btnTodayColorClick
TabOrder = 4
end
object btnLineColor: TButton
AnchorSideLeft.Control = btnPenColor
AnchorSideTop.Control = btnColor
AnchorSideRight.Control = btnPenColor
AnchorSideRight.Side = asrBottom
Left = 116
Height = 25
Top = 4
Width = 113
Anchors = [akTop, akLeft, akRight]
AutoSize = True
Caption = 'Line color...'
OnClick = btnLineColorClick
TabOrder = 3
end
object btnPenColor: TButton
AnchorSideLeft.Control = btnMonthFont
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = btnMonthFont
Left = 116
Height = 25
Hint = 'Sets the color of the selection frame'
Top = 70
Width = 113
AutoSize = True
BorderSpacing.Left = 8
BorderSpacing.Right = 12
BorderSpacing.Bottom = 14
Caption = 'Selection color...'
OnClick = btnPenColorClick
TabOrder = 5
end
end
object gbWidths: TGroupBox
AnchorSideLeft.Control = LbImages
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = LblImages
Left = 100
Height = 161
Top = 4
Width = 191
AutoSize = True
BorderSpacing.Left = 12
Caption = ' Widths and sizes: '
ClientHeight = 141
ClientWidth = 187
TabOrder = 0
object Label1: TLabel
AnchorSideTop.Control = edDayWidth
AnchorSideTop.Side = asrCenter
AnchorSideRight.Control = Label9
AnchorSideRight.Side = asrBottom
Left = 30
Height = 15
Top = 60
Width = 56
Anchors = [akTop, akRight]
BorderSpacing.Left = 8
Caption = 'Day width:'
ParentColor = False
end
object Label8: TLabel
AnchorSideTop.Control = edPenWidth
AnchorSideTop.Side = asrCenter
AnchorSideRight.Control = Label9
AnchorSideRight.Side = asrBottom
Left = 10
Height = 15
Top = 87
Width = 76
Anchors = [akTop, akRight]
BorderSpacing.Left = 8
Caption = 'Sel. line width:'
ParentColor = False
end
object Label9: TLabel
AnchorSideTop.Control = edScrollSmall
AnchorSideTop.Side = asrCenter
AnchorSideRight.Control = edScrollSmall
Left = 12
Height = 15
Top = 6
Width = 74
Anchors = [akTop, akRight]
BorderSpacing.Left = 12
BorderSpacing.Right = 4
Caption = 'Small change:'
ParentColor = False
end
object Label10: TLabel
AnchorSideTop.Control = edScrollLarge
AnchorSideTop.Side = asrCenter
AnchorSideRight.Control = Label9
AnchorSideRight.Side = asrBottom
Left = 12
Height = 15
Top = 33
Width = 74
Anchors = [akTop, akRight]
BorderSpacing.Left = 9
Caption = 'Large change:'
ParentColor = False
end
object Label12: TLabel
AnchorSideTop.Control = edButtonWidth
AnchorSideTop.Side = asrCenter
AnchorSideRight.Control = Label9
AnchorSideRight.Side = asrBottom
Left = 14
Height = 15
Top = 114
Width = 72
Anchors = [akTop, akRight]
BorderSpacing.Left = 8
Caption = 'Button width:'
ParentColor = False
end
object Label11: TLabel
AnchorSideLeft.Control = Label15
AnchorSideTop.Control = edScrollSmall
AnchorSideTop.Side = asrCenter
Left = 146
Height = 15
Top = 6
Width = 24
Caption = 'days'
ParentColor = False
end
object Label14: TLabel
AnchorSideLeft.Control = Label15
AnchorSideTop.Control = edScrollLarge
AnchorSideTop.Side = asrCenter
Left = 146
Height = 15
Top = 33
Width = 24
Caption = 'days'
ParentColor = False
end
object Label15: TLabel
AnchorSideTop.Control = edDayWidth
AnchorSideTop.Side = asrCenter
AnchorSideRight.Side = asrBottom
Left = 146
Height = 15
Top = 60
Width = 29
Anchors = [akTop, akRight]
BorderSpacing.Right = 12
Caption = 'pixels'
ParentColor = False
end
object Label16: TLabel
AnchorSideLeft.Control = Label15
AnchorSideTop.Control = edPenWidth
AnchorSideTop.Side = asrCenter
Left = 146
Height = 15
Top = 87
Width = 29
Caption = 'pixels'
ParentColor = False
end
object Label17: TLabel
AnchorSideLeft.Control = Label15
AnchorSideTop.Control = edButtonWidth
AnchorSideTop.Side = asrCenter
Left = 146
Height = 15
Top = 114
Width = 29
Caption = 'pixels'
ParentColor = False
end
object edDayWidth: TEdit
AnchorSideLeft.Control = edScrollSmall
AnchorSideTop.Control = edScrollLarge
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = edScrollSmall
AnchorSideRight.Side = asrBottom
Left = 90
Height = 23
Hint = 'Sets the width in pixels of a single day'
Top = 56
Width = 33
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Top = 4
TabOrder = 4
Text = '19'
end
object udDayWidth: TUpDown
AnchorSideRight.Control = udScrollSmall
AnchorSideRight.Side = asrBottom
Left = 127
Height = 23
Top = 56
Width = 15
Anchors = [akTop, akRight]
Associate = edDayWidth
Max = 32000
Min = 0
OnClick = udDayWidthClick
Position = 19
TabOrder = 5
Wrap = False
end
object edPenWidth: TEdit
AnchorSideLeft.Control = edScrollSmall
AnchorSideTop.Control = edDayWidth
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = edScrollSmall
AnchorSideRight.Side = asrBottom
Left = 90
Height = 23
Hint = 'Sets the width of the selection frame'
Top = 83
Width = 33
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Top = 4
TabOrder = 6
Text = '2'
end
object udPenWidth: TUpDown
AnchorSideRight.Control = udScrollSmall
AnchorSideRight.Side = asrBottom
Left = 127
Height = 23
Top = 83
Width = 15
Anchors = [akTop, akRight]
Associate = edPenWidth
Min = 0
OnClick = udPenWidthClick
Position = 2
TabOrder = 7
Wrap = False
end
object edScrollSmall: TEdit
AnchorSideTop.Control = gbWidths
AnchorSideRight.Control = udScrollSmall
Left = 90
Height = 23
Hint = 'Sets the number of days to scroll when clicking the buttons '#13#10'or when using the arrow-keys'
Top = 2
Width = 33
Anchors = [akTop, akRight]
BorderSpacing.Top = 2
BorderSpacing.Right = 4
TabOrder = 0
Text = '7'
end
object udScrollSmall: TUpDown
AnchorSideRight.Control = Label11
Left = 127
Height = 23
Top = 2
Width = 15
Anchors = [akTop, akRight]
Associate = edScrollSmall
BorderSpacing.Right = 4
Max = 365
Min = 1
OnClick = udScrollSmallClick
Position = 7
TabOrder = 1
Wrap = False
end
object edScrollLarge: TEdit
AnchorSideLeft.Control = edScrollSmall
AnchorSideTop.Control = edScrollSmall
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = edScrollSmall
AnchorSideRight.Side = asrBottom
Left = 90
Height = 23
Hint = 'Sets the number of days to scroll when Ctrl + clicking the buttons '#13#10'or when using Ctrl+left arrow or Ctrl+right arrow'
Top = 29
Width = 33
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Top = 4
TabOrder = 2
Text = '30'
end
object udScrollLarge: TUpDown
AnchorSideRight.Control = udScrollSmall
AnchorSideRight.Side = asrBottom
Left = 127
Height = 23
Top = 29
Width = 15
Anchors = [akTop, akRight]
Associate = edScrollLarge
Max = 365
Min = 1
OnClick = udScrollLargeClick
Position = 30
TabOrder = 3
Wrap = False
end
object edButtonWidth: TEdit
AnchorSideLeft.Control = edScrollSmall
AnchorSideTop.Control = edPenWidth
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = edScrollSmall
AnchorSideRight.Side = asrBottom
Left = 90
Height = 23
Hint = 'Sets the width of the scrollbuttons'
Top = 110
Width = 33
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Top = 4
BorderSpacing.Bottom = 8
TabOrder = 8
Text = '12'
end
object udButtonWidth: TUpDown
AnchorSideRight.Control = udScrollSmall
AnchorSideRight.Side = asrBottom
Left = 127
Height = 23
Top = 110
Width = 15
Anchors = [akTop, akRight]
Associate = edButtonWidth
Max = 35
Min = 0
OnClick = udButtonWidthClick
Position = 12
TabOrder = 9
Wrap = False
end
end
object LbImages: TListBox
AnchorSideLeft.Control = Panel1
AnchorSideTop.Control = LblImages
AnchorSideTop.Side = asrBottom
AnchorSideBottom.Control = Panel1
AnchorSideBottom.Side = asrBottom
Left = 4
Height = 312
Top = 23
Width = 84
Anchors = [akTop, akLeft, akBottom]
BorderSpacing.Left = 4
BorderSpacing.Top = 4
ItemHeight = 0
OnDrawItem = LbImagesDrawItem
OnSelectionChange = LbImagesSelectionChange
Style = lbOwnerDrawFixed
TabOrder = 5
end
end
object StatusBar: TStatusBar
Left = 0
Height = 23
Hint = 'Displays info about the control'
Top = 568
Width = 926
BorderSpacing.Top = 9
Panels = <
item
Width = 300
end
item
Width = 50
end>
SimplePanel = False
OnResize = StatusBarResize
end
object popTimeLine: TPopupMenu
left = 240
top = 43
object mnuEditMemo: TMenuItem
Caption = 'Edit memo...'
Default = True
OnClick = mnuEditMemoClick
end
object mnuInsertImage: TMenuItem
Caption = 'Insert image'
ShortCut = 45
OnClick = mnuInsertImageClick
end
object mnuRemoveImage: TMenuItem
Caption = 'Remove image'
ShortCut = 46
OnClick = mnuRemoveImageClick
end
object N1: TMenuItem
Caption = '-'
end
object mnuToday: TMenuItem
Caption = 'Go to today'
ShortCut = 116
OnClick = mnuTodayClick
end
object mnuGotoDate: TMenuItem
Caption = 'Go to selected day'
ShortCut = 118
OnClick = mnuGotoDateClick
end
end
object il16: TImageList
Height = 18
Width = 14
left = 360
top = 43
Bitmap = {
4C69080000000E00000012000000000000000000000000000000000000000000
000000000000000000FF000000FF000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000FF0000
00FF000000FF000000FF00000000000000000000000000000000000000000000
0000000000000000000000000000000000FF000000FF000000FF000000FF0000
00FF000000FF0000000000000000000000000000000000000000000000000000
0000000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
00FF0000000000000000000000000000000000000000000000FF000000FF0000
00FF000000FF0000000000000000000000FF000000FF000000FF000000FF0000
00000000000000000000000000FF000000FF000000FF000000FF000000000000
00FF000000FF00000000000000FF000000FF000000FF000000FF000000000000
00FF000000FF000000FF000000FF00000000000000FF000000FF000000FF0000
00FF00000000000000FF000000FF000000FF000000FF00000000000000FF0000
00FF00000000000000FF000000FF000000FF000000FF000000FF000000FF0000
0000000000FF000000FF00000000000000000000000000000000000000FF0000
00FF000000FF000000FF000000FF000000FF000000FF000000FF000000000000
0000000000000000000000000000000000FF000000FF000000FF000000FF0000
00FF000000FF000000FF000000FF000000FF000000FF00000000000000000000
0000000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
00FF000000FF000000FF000000FF000000FF00000000000000FF000000FF0000
00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
00FF000000FF000000FF000000FF00000000000000FF000000FF000000FF0000
00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
00FF000000000000000000000000000000FF000000FF000000FF000000FF0000
00FF000000FF000000FF000000FF000000FF000000FF00000000000000000000
00000000000000000000000000FF000000FF000000FF000000FF000000FF0000
00FF000000FF000000FF00000000000000000000000000000000000000000000
000000000000000000FF000000FF000000FF000000FF000000FF000000FF0000
0000000000000000000000000000000000000000000000000000000000000000
0000000000FF000000FF000000FF000000FF0000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
00FF000000FF0000000000000000000000000000000000000000000000000000
000000000000000000000000000000000000000000000000F8FF0000F8FF0000
0000000000000000000000000000000000000000000000000000000000000000
000000000000000000000000F8FF0000F8FF0000F8FF0000F8FF000000000000
0000000000000000000000000000000000000000000000000000000000000000
F8FF0000F8FF0000F8FF0000F8FF0000F8FF0000F8FF00000000000000000000
0000000000000000000000000000000000000000F8FF0000F8FF0000F8FF0000
F8FF0000F8FF0000F8FF0000F8FF0000F8FF0000000000000000000000000000
0000000000000000F8FF0000F8FF0000F8FF0000F8FF00000000000000000000
F8FF0000F8FF0000F8FF0000F8FF0000000000000000000000000000F8FF0000
F8FF0000F8FF0000F8FF000000000000F8FF0000F8FF000000000000F8FF0000
F8FF0000F8FF0000F8FF000000000000F8FF0000F8FF0000F8FF0000F8FF0000
00000000F8FF0000F8FF0000F8FF0000F8FF000000000000F8FF0000F8FF0000
F8FF0000F8FF000000000000F8FF0000F8FF000000000000F8FF0000F8FF0000
F8FF0000F8FF0000F8FF0000F8FF000000000000F8FF0000F8FF000000000000
000000000000000000000000F8FF0000F8FF0000F8FFF8F8F8FFF8F8F8FF0000
F8FF0000F8FF0000F8FF00000000000000000000000000000000000000000000
F8FF0000F8FF0000F8FF0000F8FFF8F8F8FFF8F8F8FF0000F8FF0000F8FF0000
F8FF0000F8FF0000000000000000000000000000F8FF0000F8FF0000F8FF0000
F8FF0000F8FFF8F8F8FFF8F8F8FF0000F8FF0000F8FF0000F8FF0000F8FF0000
F8FF000000000000F8FF0000F8FF0000F8FF0000F8FF0000F8FF0000F8FFF8F8
F8FFF8F8F8FF0000F8FF0000F8FF0000F8FF0000F8FF0000F8FF0000F8FF0000
00000000F8FF0000F8FF0000F8FF0000F8FF0000F8FFF8F8F8FFF8F8F8FF0000
F8FF0000F8FF0000F8FF0000F8FF0000F8FF0000000000000000000000000000
F8FF0000F8FF0000F8FF0000F8FF0000F8FF0000F8FF0000F8FF0000F8FF0000
F8FF0000F8FF00000000000000000000000000000000000000000000F8FF0000
F8FF0000F8FFF8F8F8FFF8F8F8FF0000F8FF0000F8FF0000F8FF000000000000
000000000000000000000000000000000000000000000000F8FF0000F8FF0000
F8FF0000F8FF0000F8FF0000F8FF000000000000000000000000000000000000
0000000000000000000000000000000000000000F8FF0000F8FF0000F8FF0000
F8FF000000000000000000000000000000000000000000000000000000000000
00000000000000000000000000000000F8FF0000F8FF00000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
000000000000000000000000000000000000000000000000F8FF0000F8FF0000
0000000000000000000000000000000000000000000000000000000000000000
000000000000000000000000F8FF0000F8FF0000F8FF0000F8FF000000000000
0000000000000000000000000000000000000000000000000000000000000000
F8FF0000F8FF0000F8FF0000F8FF0000F8FF0000F8FF00000000000000000000
0000000000000000000000000000000000000000F8FF0000F8FF0000F8FFF8F8
F8FFF8F8F8FF0000F8FF0000F8FF0000F8FF0000000000000000000000000000
0000000000000000F8FF0000F8FF0000F8FF0000F8FFF8F8F8FFF8F8F8FF0000
F8FF0000F8FF0000F8FF0000F8FF0000000000000000000000000000F8FF0000
F8FF0000F8FF0000F8FF0000F8FFF8F8F8FFF8F8F8FF0000F8FF0000F8FF0000
F8FF0000F8FF0000F8FF000000000000F8FF0000F8FF0000F8FF0000F8FF0000
F8FF0000F8FFF8F8F8FFF8F8F8FF0000F8FF0000F8FF0000F8FF0000F8FF0000
F8FF0000F8FF000000000000F8FF0000F8FF0000F8FF0000F8FF0000F8FFF8F8
F8FFF8F8F8FF0000F8FF0000F8FF0000F8FF0000F8FF0000F8FF000000000000
0000000000000000F8FF0000F8FF0000F8FF0000F8FF0000F8FF0000F8FF0000
F8FF0000F8FF0000F8FF0000F8FF000000000000000000000000000000000000
00000000F8FF0000F8FF0000F8FFF8F8F8FFF8F8F8FF0000F8FF0000F8FF0000
F8FF000000000000000000000000000000000000000000000000000000000000
F8FF0000F8FF0000F8FF0000F8FF0000F8FF0000F8FF00000000000000000000
00000000000000000000000000000000000000000000000000000000F8FF0000
F8FF0000F8FF0000F8FF00000000000000000000000000000000000000000000
000000000000000000000000000000000000000000000000F8FF0000F8FF0000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
00000000000000000000000000000000000000000000000000FF000000000000
0000000000000000000000000000000000000000000000000000000000000000
00000000000000000000000000FF000000FF000000FF00000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
00FF000000FF000000FF000000FF000000FF0000000000000000000000000000
000000000000000000000000000000000000000000FF000000FF000000FF0000
00FF000000FF000000FF000000FF000000000000000000000000000000000000
000000000000000000FF000000FF000000FF000000FF000000FF000000FF0000
00FF000000FF000000FF00000000000000000000000000000000000000000000
0000000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
0000000000000000000000000000000000000000000000000000000000000000
00FF000000FF000000FF000000FF000000FF0000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000FF0000
00FF000000FF0000000000000000000000000000000000000000000000000000
00000000000000000000000000000000000000000000000000FF000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000F8FF0000F8FF0000F8FF0000F8FF0000F8FF000000000000
000000000000000000000000000000000000000000000000F8FF0000F8FF0000
F8FF0000F8FF0000F8FF0000F8FF0000F8FF0000F8FF0000F8FF000000000000
00000000000000000000000000000000F8FF0000F8FF0000F8FF0000F8FF0000
F8FF0000F8FF0000F8FF0000F8FF0000F8FF0000000000000000000000000000
00000000F8FF0000F8FFF8F8F8FFF8F8F8FF0000F8FF0000F8FF0000F8FFF8F8
F8FFF8F8F8FF0000F8FF0000F8FF0000000000000000000000000000F8FF0000
F8FF0000F8FFF8F8F8FFF8F8F8FF0000F8FFF8F8F8FFF8F8F8FF0000F8FF0000
F8FF0000F8FF0000000000000000000000000000F8FF0000F8FF0000F8FF0000
F8FFF8F8F8FFF8F8F8FFF8F8F8FF0000F8FF0000F8FF0000F8FF0000F8FF0000
000000000000000000000000F8FF0000F8FF0000F8FFF8F8F8FFF8F8F8FF0000
F8FFF8F8F8FFF8F8F8FF0000F8FF0000F8FF0000F8FF00000000000000000000
00000000F8FF0000F8FFF8F8F8FFF8F8F8FF0000F8FF0000F8FF0000F8FFF8F8
F8FFF8F8F8FF0000F8FF0000F8FF000000000000000000000000000000000000
F8FF0000F8FF0000F8FF0000F8FF0000F8FF0000F8FF0000F8FF0000F8FF0000
F8FF00000000000000000000000000000000000000000000F8FF0000F8FF0000
F8FF0000F8FF0000F8FF0000F8FF0000F8FF0000F8FF0000F8FF000000000000
000000000000000000000000000000000000000000000000F8FF0000F8FF0000
F8FF0000F8FF0000F8FF00000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
00000000000000000000000000000000000000000000808080FF808080FF8080
80FF808080FF808080FF00000000000000000000000000000000000000000000
00000000000000000000808080FFF8F8F8FFF8F8F8FFF8F8F8FFF8F8F8FFF8F8
F8FF000000FF0000000000000000000000000000000000000000000000008080
80FFF8F8F8FFF8F8F8FFF8F8F8FFF8F8F8FFF8F8F8FFF8F8F8FFF8F8F8FF0000
00FF00000000000000000000000000000000808080FFF8F8F8FFF8F8F8FFF8F8
F8FFF8F8F8FFF8F8F8FFF8F8F8FF008000FFF8F8F8FFF8F8F8FF000000FF0000
00000000000000000000808080FFF8F8F8FFF8F8F8FFF8F8F8FFF8F8F8FFF8F8
F8FF008000FF008000FFF8F8F8FFF8F8F8FF000000FF00000000000000000000
0000808080FFF8F8F8FFF8F8F8FF008000FFF8F8F8FF008000FF008000FFF8F8
F8FFF8F8F8FFF8F8F8FF000000FF000000000000000000000000808080FFF8F8
F8FFF8F8F8FF008000FF008000FF008000FFF8F8F8FFF8F8F8FFF8F8F8FFF8F8
F8FF000000FF000000000000000000000000808080FFF8F8F8FFF8F8F8FFF8F8
F8FF008000FFF8F8F8FFF8F8F8FFF8F8F8FFF8F8F8FFF8F8F8FF000000FF0000
0000000000000000000000000000808080FFF8F8F8FFF8F8F8FFF8F8F8FFF8F8
F8FFF8F8F8FFF8F8F8FFF8F8F8FF000000FF0000000000000000000000000000
00000000000000000000808080FFF8F8F8FFF8F8F8FFF8F8F8FFF8F8F8FFF8F8
F8FF000000FF0000000000000000000000000000000000000000000000000000
000000000000000000FF000000FF000000FF000000FF000000FF000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
000000000000808080FF808080FF808080FF808080FF808080FF000000000000
0000000000000000000000000000000000000000000000000000808080FFF8F8
F8FFF8F8F8FFF8F8F8FFF8F8F8FFF8F8F8FF000000FF00000000000000000000
0000000000000000000000000000808080FFF8F8F8FFF8F8F8FF000000FF0000
00FF000000FFF8F8F8FFF8F8F8FF000000FF0000000000000000000000000000
0000808080FFF8F8F8FFF8F8F8FF000000FFF8F8F8FFF8F8F8FF000000FF0000
00FFF8F8F8FFF8F8F8FF000000FF000000000000000000000000808080FFF8F8
F8FFF8F8F8FF000000FFF8F8F8FFF8F8F8FF000000FF000000FFF8F8F8FFF8F8
F8FF000000FF000000000000000000000000808080FFF8F8F8FFF8F8F8FFF8F8
F8FFF8F8F8FF000000FF000000FFF8F8F8FFF8F8F8FFF8F8F8FF000000FF0000
00000000000000000000808080FFF8F8F8FFF8F8F8FFF8F8F8FFF8F8F8FFF8F8
F8FFF8F8F8FFF8F8F8FFF8F8F8FFF8F8F8FF000000FF00000000000000000000
0000808080FFF8F8F8FFF8F8F8FFF8F8F8FFF8F8F8FF000000FF000000FFF8F8
F8FFF8F8F8FFF8F8F8FF000000FF000000000000000000000000000000008080
80FFF8F8F8FFF8F8F8FFF8F8F8FF000000FF000000FFF8F8F8FFF8F8F8FF0000
00FF000000000000000000000000000000000000000000000000808080FFF8F8
F8FFF8F8F8FFF8F8F8FFF8F8F8FFF8F8F8FF000000FF00000000000000000000
00000000000000000000000000000000000000000000000000FF000000FF0000
00FF000000FF000000FF00000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
000000000000000000000000000000000000000000000000F8FF0000F8FF0000
F8FF0000F8FF0000F8FF00000000000000000000000000000000000000000000
000000000000000000000000F8FF0000F8FF0000F8FF0000F8FF0000F8FF0000
F8FF0000F8FF0000000000000000000000000000000000000000000000000000
F8FF0000F8FF0000F8FFF8F8F8FFF8F8F8FFF8F8F8FF0000F8FF0000F8FF0000
F8FF000000000000000000000000000000000000F8FF0000F8FF0000F8FF0000
F8FFF8F8F8FFF8F8F8FFF8F8F8FF0000F8FF0000F8FF0000F8FF0000F8FF0000
000000000000000000000000F8FF0000F8FF0000F8FF0000F8FFF8F8F8FFF8F8
F8FFF8F8F8FF0000F8FF0000F8FF0000F8FF0000F8FF00000000000000000000
00000000F8FF0000F8FF0000F8FF0000F8FF0000F8FFF8F8F8FF0000F8FF0000
F8FF0000F8FF0000F8FF0000F8FF0000000000000000000000000000F8FF0000
F8FF0000F8FF0000F8FF0000F8FF0000F8FF0000F8FF0000F8FF0000F8FF0000
F8FF0000F8FF0000000000000000000000000000F8FF0000F8FF0000F8FF0000
F8FF0000F8FFF8F8F8FF0000F8FF0000F8FF0000F8FF0000F8FF0000F8FF0000
00000000000000000000000000000000F8FF0000F8FF0000F8FFF8F8F8FFF8F8
F8FFF8F8F8FF0000F8FF0000F8FF0000F8FF0000000000000000000000000000
000000000000000000000000F8FF0000F8FF0000F8FFF8F8F8FF0000F8FF0000
F8FF0000F8FF0000000000000000000000000000000000000000000000000000
0000000000000000F8FF0000F8FF0000F8FF0000F8FF0000F8FF000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000
}
end
end