From 94daafcf939c33640fc197e239576452d9e6bba1 Mon Sep 17 00:00:00 2001
From: sekelsenmat <sekelsenmat@8e941d3f-bd1b-0410-a28a-d453659cc2b4>
Date: Fri, 9 Aug 2013 12:25:19 +0000
Subject: [PATCH] fpvviewer: Updates to compile with the latest fpvectorial

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@2771 8e941d3f-bd1b-0410-a28a-d453659cc2b4
---
 applications/fpvviewer/fpvv_mainform.pas | 10 +++++-----
 applications/fpvviewer/fpvviewer.lpi     |  5 +++--
 2 files changed, 8 insertions(+), 7 deletions(-)

diff --git a/applications/fpvviewer/fpvv_mainform.pas b/applications/fpvviewer/fpvv_mainform.pas
index 0a9609370..d9c6506c1 100644
--- a/applications/fpvviewer/fpvv_mainform.pas
+++ b/applications/fpvviewer/fpvv_mainform.pas
@@ -127,10 +127,10 @@ begin
     Drawer.Drawing.Canvas.Brush.Color := clWhite;
     Drawer.Drawing.Canvas.Brush.Style := bsSolid;
     Drawer.Drawing.Canvas.FillRect(0, 0, Drawer.Drawing.Width, Drawer.Drawing.Height);
-    if checkForceWhiteBackground.Checked then Vec.GetPage(0).BackgroundColor := colWhite;
+    if checkForceWhiteBackground.Checked then Vec.GetPageAsVectorial(0).BackgroundColor := colWhite;
     if not checkForceWhiteBackground.Checked then
-      Vec.GetPage(0).DrawBackground(Drawer.Drawing.Canvas);
-    Vec.GetPage(0).Render(
+      Vec.GetPageAsVectorial(0).DrawBackground(Drawer.Drawing.Canvas);
+    Vec.GetPageAsVectorial(0).Render(
       Drawer.Drawing.Canvas,
       FPVVIEWER_SPACE_FOR_NEGATIVE_COORDS + Drawer.PosX,
       Drawer.Drawing.Height - FPVVIEWER_SPACE_FOR_NEGATIVE_COORDS + Drawer.PosY,
@@ -168,7 +168,7 @@ begin
 
   Vec := TvVectorialDocument.Create;
   Vec.ReadFromFile(editFileName.FileName);
-  lPage := Vec.GetPage(0);
+  lPage := Vec.GetPageAsVectorial(0);
   lRasterImage := TvRasterImage(lPage.GetEntity(0));
 
   // create dynamicaly the vectors and datafield
@@ -311,7 +311,7 @@ begin
 
     // Generate the positioning info
     for i := 0 to Vec.GetPageCount()-1 do
-      Vec.GetPage(i).PositionEntitySubparts(Canvas, 0, 0);
+      Vec.GetPageAsVectorial(i).PositionEntitySubparts(Canvas, 0, 0);
 
     TokensTreeView.Items.Clear;
     Vec.GenerateDebugTree(@FPVDebugAddItemProc);
diff --git a/applications/fpvviewer/fpvviewer.lpi b/applications/fpvviewer/fpvviewer.lpi
index 30ab188b9..4df94b6f2 100644
--- a/applications/fpvviewer/fpvviewer.lpi
+++ b/applications/fpvviewer/fpvviewer.lpi
@@ -61,9 +61,11 @@
             </CompilerMessages>
             <CompilerPath Value="$(CompPath)"/>
           </Other>
-          <LCLWidgetType Value="qt"/>
         </CompilerOptions>
       </Item3>
+      <SharedMatrixOptions Count="1">
+        <Item1 ID="194024408686" Modes="qt" Type="IDEMacro" MacroName="LCLWidgetType" Value="qt"/>
+      </SharedMatrixOptions>
     </BuildModes>
     <PublishOptions>
       <Version Value="2"/>
@@ -73,7 +75,6 @@
     <RunParams>
       <local>
         <FormatVersion Value="1"/>
-        <LaunchingApplication PathPlusParams="/usr/bin/xterm -T 'Lazarus Run Output' -e $(LazarusDir)/tools/runwait.sh $(TargetCmdLine)"/>
       </local>
     </RunParams>
     <RequiredPackages Count="3">