TvPlanIt: Activate dayview drag-and-drop in the examples/datastores demos.

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@8175 8e941d3f-bd1b-0410-a28a-d453659cc2b4

components/tvplanit/examples/datastores/bufdataset/project1.lpi

@@ -58,6 +58,9 @@
       <UnitOutputDirectory Value="lib\$(TargetCPU)-$(TargetOS)"/>
     </SearchPaths>
     <Linking>
+      <Debugging>
+        <DebugInfoType Value="dsDwarf2Set"/>
+      </Debugging>
       <Options>
         <Win32>
           <GraphicApplication Value="True"/>

components/tvplanit/examples/datastores/bufdataset/unit1.lfm

@@ -7,7 +7,7 @@ object Form1: TForm1
   ClientHeight = 686
   ClientWidth = 980
   OnCreate = FormCreate
-  LCLVersion = '1.9.0.0'
+  LCLVersion = '2.3.0.0'
   object Panel1: TPanel
     Left = 0
     Height = 34
@@ -99,6 +99,7 @@ object Form1: TForm1
         AllDayEventAttributes.EventBorderColor = cl3DDkShadow
         AllDayEventAttributes.EventBackgroundColor = clBtnFace
         AllDayEventAttributes.Font.Height = -12
+        AllowDragAndDrop = True
         ShowEventTimes = False
         DrawingStyle = dsFlat
         TimeSlotColors.Active = clWhite
@@ -176,7 +177,6 @@ object Form1: TForm1
           Align = alBottom
           TabStop = True
           TabOrder = 1
-          KBNavigation = True
           DateLabelFormat = 'mmmm yyyy'
           DayHeadAttributes.Font.Height = -13
           DayHeadAttributes.Font.Name = 'Tahoma'
@@ -187,6 +187,7 @@ object Form1: TForm1
           EventDayStyle = []
           EventFont.Height = -12
           HeadAttributes.Color = clBtnFace
+          KBNavigation = True
           OffDayColor = clSilver
           SelectedDayColor = clRed
           ShowEvents = True
@@ -287,20 +288,16 @@ object Form1: TForm1
   end
   object VpControlLink1: TVpControlLink
     DataStore = VpBufDSDataStore1
-    Printer.BottomMargin = 0
     Printer.DayStart = h_08
     Printer.DayEnd = h_05
     Printer.Granularity = gr30Min
-    Printer.LeftMargin = 0
     Printer.MarginUnits = imAbsolutePixel
     Printer.PrintFormats = <>
-    Printer.RightMargin = 0
-    Printer.TopMargin = 0
-    left = 136
-    top = 264
+    Left = 136
+    Top = 264
   end
   object VpResourceEditDialog1: TVpResourceEditDialog
-    Version = 'v1.05'
+    Version = 'v1.12'
     DataStore = VpBufDSDataStore1
     Options = []
     Placement.Position = mpCenter
@@ -308,8 +305,8 @@ object Form1: TForm1
     Placement.Left = 10
     Placement.Height = 250
     Placement.Width = 400
-    left = 136
-    top = 335
+    Left = 136
+    Top = 335
   end
   object VpBufDSDataStore1: TVpBufDSDataStore
     CategoryColorMap.Category0.Color = clNavy
@@ -340,7 +337,7 @@ object Form1: TForm1
     AutoCreate = True
     DayBuffer = 31
     UseAutoIncFields = False
-    left = 136
-    top = 192
+    Left = 136
+    Top = 192
   end
 end