examples: fixe compilation

git-svn-id: trunk@16359 -
2025-04-06 22:18:15 +02:00 · 2008-09-01 20:05:45 +00:00 · 2008-09-01 20:05:45 +00:00 · 66d5f5f3c3
commit 66d5f5f3c3
parent 7b88b53b94
12 changed files with 64 additions and 75 deletions
--- a/examples/anchordocking/dockform1unit.pas
+++ b/examples/anchordocking/dockform1unit.pas
@ -6,7 +6,7 @@ interface

 uses
  Classes, SysUtils, LCLProc, LResources, Forms, Controls, Graphics, Dialogs,
-  DockForm2Unit, Buttons, Menus, LDockCtrl, XMLPropStorage, StdCtrls;
+  FileUtil, DockForm2Unit, Buttons, Menus, LDockCtrl, XMLPropStorage, StdCtrls;

 type

--- a/examples/anchordocking/docking1.lpi
+++ b/examples/anchordocking/docking1.lpi
@ -52,10 +52,7 @@
    </Units>
  </ProjectOptions>
  <CompilerOptions>
-    <Version Value="5"/>
-    <CodeGeneration>
-      <Generate Value="Faster"/>
-    </CodeGeneration>
+    <Version Value="8"/>
    <Linking>
      <Options>
        <Win32>
--- a/examples/cleandir/cleandir.lpi
+++ b/examples/cleandir/cleandir.lpi
@ -2,7 +2,7 @@
 <CONFIG>
  <ProjectOptions>
    <PathDelim Value="/"/>
-    <Version Value="5"/>
+    <Version Value="6"/>
    <General>
      <SessionStorage Value="InProjectDir"/>
      <MainUnit Value="0"/>
@ -24,6 +24,11 @@
        <LaunchingApplication PathPlusParams="/usr/X11R6/bin/xterm -T 'Lazarus Run Output' -e $(LazarusDir)/tools/runwait.sh $(TargetCmdLine)"/>
      </local>
    </RunParams>
+    <RequiredPackages Count="1">
+      <Item1>
+        <PackageName Value="LCL"/>
+      </Item1>
+    </RequiredPackages>
    <Units Count="2">
      <Unit0>
        <Filename Value="cleandir.lpr"/>
@ -38,10 +43,7 @@
    </Units>
  </ProjectOptions>
  <CompilerOptions>
-    <Version Value="5"/>
-    <CodeGeneration>
-      <Generate Value="Faster"/>
-    </CodeGeneration>
+    <Version Value="8"/>
    <Other>
      <CompilerPath Value="$(CompPath)"/>
    </Other>
--- a/examples/cleandir/cleandirs.lpi
+++ b/examples/cleandir/cleandirs.lpi
@ -1,7 +1,7 @@
 <?xml version="1.0"?>
 <CONFIG>
  <ProjectOptions>
-    <PathDelim Value="\"/>
+    <PathDelim Value="/"/>
    <Version Value="6"/>
    <General>
      <Flags>
@ -10,7 +10,7 @@
      <SessionStorage Value="InProjectDir"/>
      <MainUnit Value="0"/>
      <AutoCreateForms Value="False"/>
-      <IconPath Value=".\"/>
+      <IconPath Value="./"/>
      <TargetFileExt Value=""/>
      <Title Value="Directory Cleaning service"/>
    </General>
@ -25,7 +25,7 @@
    <RunParams>
      <local>
        <FormatVersion Value="1"/>
-        <LaunchingApplication PathPlusParams="\usr\X11R6\bin\xterm -T 'Lazarus Run Output' -e $(LazarusDir)\tools\runwait.sh $(TargetCmdLine)"/>
+        <LaunchingApplication PathPlusParams="/usr/X11R6/bin/xterm -T 'Lazarus Run Output' -e $(LazarusDir)/tools/runwait.sh $(TargetCmdLine)"/>
      </local>
    </RunParams>
    <RequiredPackages Count="3">
@ -67,11 +67,7 @@
    </Units>
  </ProjectOptions>
  <CompilerOptions>
-    <Version Value="5"/>
-    <PathDelim Value="\"/>
-    <CodeGeneration>
-      <Generate Value="Faster"/>
-    </CodeGeneration>
+    <Version Value="8"/>
    <Other>
      <CustomOptions Value="-dUseCThreads"/>
      <CompilerPath Value="$(CompPath)"/>
--- a/examples/cleandir/confcleandirs.lpi
+++ b/examples/cleandir/confcleandirs.lpi
@ -2,7 +2,7 @@
 <CONFIG>
  <ProjectOptions>
    <PathDelim Value="/"/>
-    <Version Value="5"/>
+    <Version Value="6"/>
    <General>
      <SessionStorage Value="InProjectDir"/>
      <MainUnit Value="0"/>
@ -66,10 +66,7 @@
    </Units>
  </ProjectOptions>
  <CompilerOptions>
-    <Version Value="5"/>
-    <CodeGeneration>
-      <Generate Value="Faster"/>
-    </CodeGeneration>
+    <Version Value="8"/>
    <Linking>
      <Options>
        <Win32>
--- a/examples/cleandir/dircleaner.pp
+++ b/examples/cleandir/dircleaner.pp
@ -34,7 +34,7 @@ unit dircleaner;
 interface

 uses
-  Classes, SysUtils, inicol, inifiles;
+  Classes, SysUtils, inicol, IniFiles, FileUtil;
  
 Type
  TSubDir = (sdExtension,sdYear,sdMonth,sdDay,sdDate,sdHour,sdMin,sdTime);
--- a/examples/cleandir/frmlog.pp
+++ b/examples/cleandir/frmlog.pp
@ -36,7 +36,7 @@ interface

 uses
  Classes, SysUtils, LResources, Forms, Controls, Graphics, Dialogs,
-  StdCtrls, dircleaner;
+  FileUtil, StdCtrls, dircleaner;

 type

--- a/examples/cleandir/frmmain.pp
+++ b/examples/cleandir/frmmain.pp
@ -37,8 +37,8 @@ interface

 uses
  Classes, SysUtils, LResources, Forms, Controls, Graphics, Dialogs, Menus,
-  ActnList, ComCtrls, ExtDlgs, ExtCtrls, RTTICtrls, StdCtrls, Buttons, dircleaner,
-  RTTIGrids;
+  ActnList, ComCtrls, ExtDlgs, ExtCtrls, RTTICtrls, StdCtrls, Buttons,
+  dircleaner, FileUtil, RTTIGrids;

 type

--- a/examples/cleandir/svccleandirs.pp
+++ b/examples/cleandir/svccleandirs.pp
@ -34,7 +34,7 @@ unit svccleandirs;
 interface

 uses
-  Classes, SysUtils, LResources, daemonapp, eventlog, dircleaner;
+  Classes, SysUtils, LResources, daemonapp, eventlog, dircleaner, FileUtil;

 type
  { TCleanDirsThread }
--- a/examples/easter/holyday.lpi
+++ b/examples/easter/holyday.lpi
@ -1,55 +1,19 @@
 <?xml version="1.0"?>
 <CONFIG>
  <ProjectOptions>
-    <Version Value="3"/>
+    <PathDelim Value="/"/>
+    <Version Value="6"/>
    <General>
-      <ProjectType Value="Application"/>
      <Flags>
        <SaveClosedFiles Value="False"/>
        <SaveOnlyProjectUnits Value="True"/>
      </Flags>
      <MainUnit Value="0"/>
-      <ActiveEditorIndexAtStart Value="0"/>
      <IconPath Value="./"/>
      <TargetFileExt Value=""/>
      <Title Value="holyday"/>
+      <ActiveEditorIndexAtStart Value="0"/>
    </General>
-    <Units Count="3">
-      <Unit0>
-        <CursorPos X="4" Y="14"/>
-        <EditorIndex Value="2"/>
-        <Filename Value="holyday.lpr"/>
-        <IsPartOfProject Value="True"/>
-        <Loaded Value="True"/>
-        <TopLine Value="1"/>
-        <UnitName Value="holyday"/>
-        <UsageCount Value="23"/>
-      </Unit0>
-      <Unit1>
-        <CursorPos X="13" Y="20"/>
-        <EditorIndex Value="0"/>
-        <Filename Value="main.pas"/>
-        <ComponentName Value="Form1"/>
-        <IsPartOfProject Value="True"/>
-        <Loaded Value="True"/>
-        <ResourceFilename Value="main.lrs"/>
-        <TopLine Value="1"/>
-        <UnitName Value="Main"/>
-        <UsageCount Value="23"/>
-      </Unit1>
-      <Unit2>
-        <CursorPos X="23" Y="26"/>
-        <EditorIndex Value="1"/>
-        <Filename Value="about.pas"/>
-        <ComponentName Value="AboutBox"/>
-        <IsPartOfProject Value="True"/>
-        <Loaded Value="True"/>
-        <ResourceFilename Value="about.lrs"/>
-        <TopLine Value="1"/>
-        <UnitName Value="about"/>
-        <UsageCount Value="23"/>
-      </Unit2>
-    </Units>
    <PublishOptions>
      <Version Value="2"/>
      <IgnoreBinaries Value="False"/>
@ -66,8 +30,45 @@
        <MinVersion Major="1" Valid="True"/>
      </Item1>
    </RequiredPackages>
+    <Units Count="3">
+      <Unit0>
+        <Filename Value="holyday.lpr"/>
+        <IsPartOfProject Value="True"/>
+        <UnitName Value="holyday"/>
+        <CursorPos X="4" Y="14"/>
+        <TopLine Value="1"/>
+        <EditorIndex Value="2"/>
+        <UsageCount Value="23"/>
+        <Loaded Value="True"/>
+      </Unit0>
+      <Unit1>
+        <Filename Value="main.pas"/>
+        <ComponentName Value="Form1"/>
+        <IsPartOfProject Value="True"/>
+        <ResourceFilename Value="main.lrs"/>
+        <UnitName Value="Main"/>
+        <CursorPos X="13" Y="20"/>
+        <TopLine Value="1"/>
+        <EditorIndex Value="0"/>
+        <UsageCount Value="23"/>
+        <Loaded Value="True"/>
+      </Unit1>
+      <Unit2>
+        <Filename Value="about.pas"/>
+        <ComponentName Value="AboutBox"/>
+        <IsPartOfProject Value="True"/>
+        <ResourceFilename Value="about.lrs"/>
+        <UnitName Value="about"/>
+        <CursorPos X="23" Y="26"/>
+        <TopLine Value="1"/>
+        <EditorIndex Value="1"/>
+        <UsageCount Value="23"/>
+        <Loaded Value="True"/>
+      </Unit2>
+    </Units>
  </ProjectOptions>
  <CompilerOptions>
+    <Version Value="8"/>
    <SearchPaths>
      <SrcPath Value="$(LazarusDir)/lcl/;$(LazarusDir)/lcl/interfaces/$(LCLWidgetType)/"/>
    </SearchPaths>
--- a/examples/imgviewer/frmmain.pas
+++ b/examples/imgviewer/frmmain.pas
@ -25,7 +25,7 @@ unit frmmain;
 interface

 uses
-  LCLIntf,SysUtils, Classes, Graphics, Controls, Forms,
+  LCLIntf,SysUtils, Classes, Graphics, Controls, Forms, FileUtil,
  Dialogs, StdCtrls, ComCtrls, ExtCtrls, ActnList, Menus,
  LResources, LCLType;

--- a/examples/imgviewer/imgview.lpi
+++ b/examples/imgviewer/imgview.lpi
@ -1,7 +1,7 @@
 <?xml version="1.0"?>
 <CONFIG>
  <ProjectOptions>
-    <PathDelim Value="\"/>
+    <PathDelim Value="/"/>
    <Version Value="6"/>
    <General>
      <Flags>
@ -48,14 +48,10 @@
    </Units>
  </ProjectOptions>
  <CompilerOptions>
-    <Version Value="5"/>
-    <PathDelim Value="\"/>
+    <Version Value="8"/>
    <SearchPaths>
-      <SrcPath Value="$(LazarusDir)\lcl\;$(LazarusDir)\lcl\interfaces\$(LCLWidgetType)\"/>
+      <SrcPath Value="$(LazarusDir)/lcl/;$(LazarusDir)/lcl/interfaces/$(LCLWidgetType)/"/>
    </SearchPaths>
-    <CodeGeneration>
-      <Generate Value="Faster"/>
-    </CodeGeneration>
    <Other>
      <CompilerPath Value="$(CompPath)"/>
    </Other>