examples: tv_add_remove: updated

git-svn-id: trunk@38146 -

.gitattributes

@@ -4206,7 +4206,6 @@ examples/treeview/TV_Add_Remove.res svneol=native#unset
 examples/treeview/TV_Add_Remove_U1.dfm svneol=native#unset
 examples/treeview/tv_add_remove.lpi svneol=native#text/plain
 examples/treeview/tv_add_remove_u1.lfm svneol=native#text/plain
-examples/treeview/tv_add_remove_u1.lrs svneol=native#text/pascal
 examples/treeview/tv_add_remove_u1.pas svneol=native#text/pascal
 examples/turbopower_ipro/defaultimage.lrs svneol=native#text/pascal
 examples/turbopower_ipro/defaultimage.xpm -text svneol=native#image/x-pixmap

examples/treeview/TV_Add_Remove.dpr

@@ -5,10 +5,6 @@ uses
   Forms,
   TV_Add_Remove_U1 in 'TV_Add_Remove_U1.pas' {Form1};
 
-{$ifdef win32}
-{$R *.res}
-{$endif}
-
 begin
   Application.Title:='TV_Add_Remove';
   Application.Initialize;

examples/treeview/tv_add_remove.lpi

@@ -1,19 +1,21 @@
 <?xml version="1.0"?>
 <CONFIG>
   <ProjectOptions>
+    <Version Value="9"/>
     <PathDelim Value="\"/>
-    <Version Value="6"/>
     <General>
       <Flags>
         <SaveClosedFiles Value="False"/>
         <SaveOnlyProjectUnits Value="True"/>
+        <LRSInOutputDirectory Value="False"/>
       </Flags>
       <SessionStorage Value="InIDEConfig"/>
       <MainUnit Value="0"/>
-      <IconPath Value="./"/>
-      <TargetFileExt Value=""/>
       <Title Value="TV_Add_Remove"/>
     </General>
+    <BuildModes Count="1">
+      <Item1 Name="default" Default="True"/>
+    </BuildModes>
     <PublishOptions>
       <Version Value="2"/>
       <IncludeFileFilter Value="*.(pas|pp|inc|lfm|lpr|lrs|lpi|lpk|sh|xml)"/>
@@ -22,7 +24,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="1">
@@ -38,22 +40,28 @@
       </Unit0>
       <Unit1>
         <Filename Value="tv_add_remove_u1.pas"/>
-        <ComponentName Value="Form1"/>
         <IsPartOfProject Value="True"/>
-        <ResourceFilename Value="tv_add_remove_u1.lrs"/>
+        <ComponentName Value="Form1"/>
         <UnitName Value="TV_Add_Remove_U1"/>
       </Unit1>
     </Units>
   </ProjectOptions>
   <CompilerOptions>
-    <Version Value="5"/>
+    <Version Value="11"/>
     <PathDelim Value="\"/>
+    <Target>
+      <Filename Value="TV_Add_Remove"/>
+    </Target>
     <SearchPaths>
-      <SrcPath Value="$(LazarusDir)\lcl\;$(LazarusDir)\lcl\interfaces\$(LCLWidgetType)\"/>
+      <UnitOutputDirectory Value="lib\$(TargetCPU)-$(TargetOS)"/>
     </SearchPaths>
-    <CodeGeneration>
-      <Generate Value="Faster"/>
-    </CodeGeneration>
+    <Linking>
+      <Options>
+        <Win32>
+          <GraphicApplication Value="True"/>
+        </Win32>
+      </Options>
+    </Linking>
     <Other>
       <CompilerPath Value="$(CompPath)"/>
     </Other>

examples/treeview/tv_add_remove_u1.lrs

@@ -1,17 +0,0 @@
-{ This is an automatically generated lazarus resource file }
-
-LazarusResources.Add('TForm1','FORMDATA',[
-  'TPF0'#6'TForm1'#5'Form1'#4'Left'#3':'#2#6'Height'#3#171#1#3'Top'#3#249#0#5'W'
-  +'idth'#3#199#1#13'ActiveControl'#7#7'but_Add'#7'Caption'#6#18'TreeView Examp'
-  +'le 1'#12'ClientHeight'#3#171#1#11'ClientWidth'#3#199#1#11'Font.Height'#2#245
-  +#9'Font.Name'#6#13'MS Sans Serif'#10'LCLVersion'#6#6'0.9.27'#0#9'TTreeView'#6
-  +'tv_eg1'#4'Left'#2#0#6'Height'#3#171#1#3'Top'#2#0#5'Width'#3#196#0#5'Align'#7
-  +#6'alLeft'#17'DefaultItemHeight'#2#14#13'HideSelection'#8#6'Indent'#2#19#11
-  +'ParentCtl3D'#8#8'ReadOnly'#9#8'TabOrder'#2#0#7'Options'#11#17'tvoAutoItemHe'
-  +'ight'#21'tvoKeepCollapsedNodes'#11'tvoReadOnly'#14'tvoShowButtons'#12'tvoSh'
-  +'owLines'#11'tvoShowRoot'#11'tvoToolTips'#0#0#0#7'TButton'#7'but_Add'#4'Left'
-  +#3#208#0#6'Height'#2#25#3'Top'#2#8#5'Width'#2'K'#7'Caption'#6#3'Add'#7'OnCli'
-  +'ck'#7#12'but_AddClick'#8'TabOrder'#2#1#0#0#7'TButton'#10'but_Remove'#4'Left'
-  +#3#208#0#6'Height'#2#25#3'Top'#2'('#5'Width'#2'K'#7'Caption'#6#6'Remove'#7'O'
-  +'nClick'#7#15'but_RemoveClick'#8'TabOrder'#2#2#0#0#0
-]);

examples/treeview/tv_add_remove_u1.pas

@@ -25,9 +25,7 @@ type
     procedure but_AddClick(Sender: TObject);
     procedure but_RemoveClick(Sender: TObject);
   private
-    { Private declarations }
   public
-    { Public declarations }
     constructor Create(TheOwner: TComponent); override;
   end;
 
@@ -36,8 +34,6 @@ var
 
 implementation
 
-//{$R *.DFM}
-
 procedure TForm1.but_AddClick(Sender: TObject);
 var
    sText : ansistring;
@@ -113,7 +109,6 @@ begin
   RootNode.Expanded:=true;
 end;
 
-Initialization
-{$I tv_add_remove_u1.lrs}
+{$R *.lfm}
 
 end.