examples: barchart fixed compilation

git-svn-id: trunk@31484 -

examples/barchart/chartdemo.lpi

@@ -1,39 +1,20 @@
 <?xml version="1.0"?>
 <CONFIG>
   <ProjectOptions>
-    <Version Value="4"/>
+    <Version Value="9"/>
     <General>
-      <ProjectType Value="Application"/>
       <Flags>
         <SaveClosedFiles Value="False"/>
         <SaveOnlyProjectUnits Value="True"/>
+        <LRSInOutputDirectory Value="False"/>
       </Flags>
       <MainUnit Value="0"/>
-      <ActiveEditorIndexAtStart Value="1"/>
-      <IconPath Value="./"/>
-      <TargetFileExt Value=""/>
       <Title Value="chartdemo"/>
+      <ActiveWindowIndexAtStart Value="0"/>
     </General>
-    <Units Count="2">
+    <BuildModes Count="1">
-      <Unit0>
+      <Item1 Name="default" Default="True"/>
-        <Filename Value="chartdemo.lpr"/>
+    </BuildModes>
-        <IsPartOfProject Value="True"/>
-        <UnitName Value="chartdemo"/>
-        <UsageCount Value="20"/>
-      </Unit0>
-      <Unit1>
-        <CursorPos X="71" Y="8"/>
-        <EditorIndex Value="0"/>
-        <Filename Value="frmmain.pas"/>
-        <ComponentName Value="Form1"/>
-        <IsPartOfProject Value="True"/>
-        <Loaded Value="True"/>
-        <ResourceFilename Value="frmmain.lrs"/>
-        <TopLine Value="1"/>
-        <UnitName Value="frmmain"/>
-        <UsageCount Value="20"/>
-      </Unit1>
-    </Units>
     <PublishOptions>
       <Version Value="2"/>
       <IgnoreBinaries Value="False"/>
@@ -52,15 +33,40 @@
         <MinVersion Major="1" Valid="True"/>
       </Item1>
     </RequiredPackages>
+    <Units Count="2">
+      <Unit0>
+        <Filename Value="chartdemo.lpr"/>
+        <IsPartOfProject Value="True"/>
+        <UnitName Value="chartdemo"/>
+        <UsageCount Value="20"/>
+      </Unit0>
+      <Unit1>
+        <Filename Value="frmmain.pas"/>
+        <IsPartOfProject Value="True"/>
+        <ComponentName Value="Form1"/>
+        <ResourceBaseClass Value="Form"/>
+        <UnitName Value="frmmain"/>
+        <IsVisibleTab Value="True"/>
+        <EditorIndex Value="0"/>
+        <WindowIndex Value="0"/>
+        <TopLine Value="1"/>
+        <CursorPos X="73" Y="8"/>
+        <UsageCount Value="20"/>
+        <Loaded Value="True"/>
+        <LoadedDesigner Value="True"/>
+      </Unit1>
+    </Units>
   </ProjectOptions>
   <CompilerOptions>
-    <Version Value="2"/>
+    <Version Value="10"/>
     <SearchPaths>
-      <SrcPath Value="$(LazarusDir)/lcl/;$(LazarusDir)/lcl/interfaces/$(LCLWidgetType)/"/>
+      <SrcPath Value="$(LazarusDir)/lcl;$(LazarusDir)/lcl/interfaces/$(LCLWidgetType)"/>
     </SearchPaths>
-    <CodeGeneration>
+    <Parsing>
-      <Generate Value="Faster"/>
+      <SyntaxOptions>
-    </CodeGeneration>
+        <UseAnsiStrings Value="False"/>
+      </SyntaxOptions>
+    </Parsing>
     <Other>
       <CompilerPath Value="$(CompPath)"/>
     </Other>

examples/barchart/frmmain.lfm

@@ -1,25 +1,25 @@
 object Form1: TForm1
-  Caption = 'Form1'
-  ClientHeight = 300
-  ClientWidth = 400
-  OnShow = Form1Show
-  PixelsPerInch = 90
-  HorzScrollBar.Page = 401
-  VertScrollBar.Page = 301
   Left = 440
   Height = 300
   Top = 209
   Width = 400
+  HorzScrollBar.Page = 401
+  VertScrollBar.Page = 301
+  Caption = 'Form1'
+  ClientHeight = 300
+  ClientWidth = 400
+  OnShow = Form1Show
+  LCLVersion = '0.9.31'
   object BarChart1: TBarChart
-    Depth = 20
-    Caption = 'My Data'
-    ClientHeight = 256
-    ClientWidth = 368
-    FullRepaint = False
-    TabOrder = 0
     Left = 16
     Height = 256
     Top = 16
     Width = 368
+    Caption = 'My Data'
+    FullRepaint = False
+    TabOrder = 0
+    Bars = <>
+    Depth = 20
+    LabelPosition = plLeft
   end
 end

examples/barchart/frmmain.lrs

@@ -1,9 +1,11 @@
+{ This is an automatically generated lazarus resource file }
+
 LazarusResources.Add('TForm1','FORMDATA',[
-  'TPF0'#6'TForm1'#5'Form1'#7'Caption'#6#5'Form1'#12'ClientHeight'#3','#1#11'Cl'
+  'TPF0'#6'TForm1'#5'Form1'#4'Left'#3#184#1#6'Height'#3','#1#3'Top'#3#209#0#5'W'
-  +'ientWidth'#3#144#1#6'OnShow'#7#9'Form1Show'#13'PixelsPerInch'#2'Z'#18'HorzS'
+  +'idth'#3#144#1#18'HorzScrollBar.Page'#3#145#1#18'VertScrollBar.Page'#3'-'#1#7
-  +'crollBar.Page'#3#145#1#18'VertScrollBar.Page'#3'-'#1#4'Left'#3#184#1#6'Heig'
+  +'Caption'#6#5'Form1'#12'ClientHeight'#3','#1#11'ClientWidth'#3#144#1#6'OnSho'
-  +'ht'#3','#1#3'Top'#3#209#0#5'Width'#3#144#1#0#9'TBarChart'#9'BarChart1'#5'De'
+  +'w'#7#9'Form1Show'#10'LCLVersion'#6#6'0.9.31'#0#9'TBarChart'#9'BarChart1'#4
-  +'pth'#2#20#7'Caption'#6#7'My Data'#12'ClientHeight'#3#0#1#11'ClientWidth'#3
+  +'Left'#2#16#6'Height'#3#0#1#3'Top'#2#16#5'Width'#3'p'#1#7'Caption'#6#7'My Da'
-  +'p'#1#11'FullRepaint'#8#8'TabOrder'#2#0#4'Left'#2#16#6'Height'#3#0#1#3'Top'#2
+  +'ta'#11'FullRepaint'#8#8'TabOrder'#2#0#4'Bars'#14#0#5'Depth'#2#20#13'LabelPo'
-  +#16#5'Width'#3'p'#1#0#0#0
+  +'sition'#7#6'plLeft'#0#0#0
 ]);

examples/barchart/frmmain.pas

@@ -5,7 +5,7 @@ unit frmmain;
 interface
 
 uses
-  Classes, SysUtils, LResources, Forms, Controls, Graphics, Dialogs, chart;
+  Classes, SysUtils, LResources, Forms, Controls, Graphics, Dialogs, BarChart;
 
 type
   TForm1 = class(TForm)