You've already forked lazarus-ccr
tvplanit: Unpublish ini datastore property Connected (was forgotten in r5034). Fix related for reading error ini datastore demo. (Demo is not working, though).
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@5064 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
@ -152,8 +152,12 @@ object Form1: TForm1
|
||||
DayNameStyle = dsShort
|
||||
DrawingStyle = dsFlat
|
||||
EventDayStyle = []
|
||||
HeadAttributes.Color = clBtnFace
|
||||
LineColor = clGray
|
||||
TimeFormat = tf12Hour
|
||||
TodayAttributes.Color = clSilver
|
||||
TodayAttributes.BorderPen.Color = clRed
|
||||
TodayAttributes.BorderPen.Width = 3
|
||||
OffDayColor = clSilver
|
||||
SelectedDayColor = clRed
|
||||
ShowEvents = True
|
||||
@ -295,9 +299,8 @@ object Form1: TForm1
|
||||
EnableEventTimer = True
|
||||
PlayEventSounds = True
|
||||
AutoConnect = True
|
||||
Connected = True
|
||||
FileName = 'data.ini'
|
||||
left = 140
|
||||
left = 136
|
||||
top = 200
|
||||
end
|
||||
object PopupMenu1: TPopupMenu
|
||||
|
@ -6,8 +6,9 @@ interface
|
||||
|
||||
uses
|
||||
Classes, SysUtils, FileUtil, Forms, Controls, Graphics, Dialogs, ExtCtrls,
|
||||
StdCtrls, ComCtrls, Menus, VpBaseDS, VpDayView, VpWeekView, VpTaskList,
|
||||
VpContactGrid, VpMonthView, VpResEditDlg, VpContactButtons, VpIniDs;
|
||||
StdCtrls, ComCtrls, Menus,
|
||||
VpBaseDS, VpDayView, VpWeekView, VpTaskList, VpContactGrid, VpMonthView,
|
||||
VpResEditDlg, VpContactButtons, VpIniDs;
|
||||
|
||||
type
|
||||
|
||||
|
@ -6,9 +6,9 @@ interface
|
||||
|
||||
uses
|
||||
Classes, SysUtils, FileUtil, Forms, Controls, Graphics, Dialogs, ExtCtrls,
|
||||
StdCtrls, ComCtrls, Menus, XMLPropStorage, VpBaseDS, VpDayView, VpWeekView,
|
||||
VpTaskList, VpContactGrid, VpMonthView, VpResEditDlg, VpContactButtons,
|
||||
VpXmlDs;
|
||||
StdCtrls, ComCtrls, Menus,
|
||||
VpBaseDS, VpDayView, VpWeekView, VpTaskList, VpContactGrid, VpMonthView,
|
||||
VpResEditDlg, VpContactButtons, VpXmlDs;
|
||||
|
||||
type
|
||||
|
||||
|
@ -52,7 +52,6 @@ type
|
||||
|
||||
published
|
||||
property AutoConnect default false;
|
||||
property Connected;
|
||||
property FileName: String read FFileName write SetfileName;
|
||||
|
||||
end;
|
||||
|
Reference in New Issue
Block a user