2008-02-03 12:05:55 +00:00
|
|
|
object frmDatePropertyEditor: TfrmDatePropertyEditor
|
|
|
|
Left = 349
|
2016-06-12 10:57:47 +00:00
|
|
|
Height = 201
|
2008-02-03 12:05:55 +00:00
|
|
|
Top = 233
|
2016-06-12 10:57:47 +00:00
|
|
|
Width = 231
|
2008-02-03 12:05:55 +00:00
|
|
|
HorzScrollBar.Page = 218
|
|
|
|
VertScrollBar.Page = 192
|
|
|
|
BorderStyle = bsDialog
|
|
|
|
Caption = 'Select Date'
|
2016-06-12 10:57:47 +00:00
|
|
|
ClientHeight = 201
|
|
|
|
ClientWidth = 231
|
2008-02-03 12:05:55 +00:00
|
|
|
Position = poDefaultPosOnly
|
2016-06-09 23:49:35 +00:00
|
|
|
LCLVersion = '1.7'
|
2008-02-03 12:05:55 +00:00
|
|
|
object Button1: TButton
|
2016-06-12 10:57:47 +00:00
|
|
|
Left = 69
|
2008-02-03 12:05:55 +00:00
|
|
|
Height = 25
|
2016-06-12 10:57:47 +00:00
|
|
|
Top = 168
|
2008-02-03 12:05:55 +00:00
|
|
|
Width = 75
|
|
|
|
Caption = 'OK'
|
|
|
|
ModalResult = 1
|
|
|
|
TabOrder = 0
|
|
|
|
end
|
|
|
|
object Button2: TButton
|
2016-06-12 10:57:47 +00:00
|
|
|
Left = 149
|
2008-02-03 12:05:55 +00:00
|
|
|
Height = 25
|
2016-06-12 10:57:47 +00:00
|
|
|
Top = 168
|
2008-02-03 12:05:55 +00:00
|
|
|
Width = 75
|
|
|
|
Caption = 'Cancel'
|
|
|
|
ModalResult = 2
|
|
|
|
TabOrder = 1
|
|
|
|
end
|
|
|
|
object VpCalendar1: TVpCalendar
|
|
|
|
Left = 8
|
2016-06-12 10:57:47 +00:00
|
|
|
Height = 152
|
2008-02-03 12:05:55 +00:00
|
|
|
Top = 8
|
2016-06-12 10:57:47 +00:00
|
|
|
Width = 216
|
2016-06-09 23:49:35 +00:00
|
|
|
ParentFont = False
|
|
|
|
BorderStyle = bsNone
|
2008-02-03 12:05:55 +00:00
|
|
|
Colors.ActiveDay = clRed
|
2016-06-09 23:49:35 +00:00
|
|
|
Colors.ColorScheme = cscalCustom
|
2008-02-03 12:05:55 +00:00
|
|
|
Colors.DayNames = clMaroon
|
2016-06-09 23:49:35 +00:00
|
|
|
Colors.Days = clBlack
|
2008-02-03 12:05:55 +00:00
|
|
|
Colors.InactiveDays = clGray
|
|
|
|
Colors.MonthAndYear = clBlue
|
|
|
|
Colors.Weekend = clRed
|
2016-06-09 23:49:35 +00:00
|
|
|
Colors.EventDays = clBlack
|
2008-02-03 12:05:55 +00:00
|
|
|
DateFormat = dfLong
|
|
|
|
DayNameWidth = 3
|
|
|
|
Options = [cdoShortNames, cdoShowYear, cdoShowRevert, cdoShowToday, cdoShowNavBtns]
|
2016-06-09 23:49:35 +00:00
|
|
|
ReadOnly = False
|
2008-02-03 12:05:55 +00:00
|
|
|
TabOrder = 2
|
|
|
|
TabStop = True
|
|
|
|
WantDblClicks = True
|
2016-06-09 23:49:35 +00:00
|
|
|
WeekStarts = dtSunday
|
2008-02-03 12:05:55 +00:00
|
|
|
end
|
|
|
|
end
|