summaryrefslogtreecommitdiff
path: root/examples/corelib
diff options
context:
space:
mode:
Diffstat (limited to 'examples/corelib')
-rw-r--r--examples/corelib/canvastest/fpgcanvas.lpi7
-rw-r--r--examples/corelib/canvastest/fpgcanvas.lpr6
2 files changed, 7 insertions, 6 deletions
diff --git a/examples/corelib/canvastest/fpgcanvas.lpi b/examples/corelib/canvastest/fpgcanvas.lpi
index 71f908fb..7f1c6c21 100644
--- a/examples/corelib/canvastest/fpgcanvas.lpi
+++ b/examples/corelib/canvastest/fpgcanvas.lpi
@@ -1,7 +1,7 @@
<?xml version="1.0"?>
<CONFIG>
<ProjectOptions>
- <PathDelim Value="/"/>
+ <PathDelim Value="\"/>
<Version Value="5"/>
<General>
<Flags>
@@ -9,7 +9,7 @@
</Flags>
<SessionStorage Value="InProjectDir"/>
<MainUnit Value="0"/>
- <IconPath Value="./"/>
+ <IconPath Value=".\"/>
<TargetFileExt Value=""/>
<Title Value="fpcanvas"/>
</General>
@@ -24,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">
@@ -43,6 +43,7 @@
</ProjectOptions>
<CompilerOptions>
<Version Value="5"/>
+ <PathDelim Value="\"/>
<CodeGeneration>
<Generate Value="Faster"/>
</CodeGeneration>
diff --git a/examples/corelib/canvastest/fpgcanvas.lpr b/examples/corelib/canvastest/fpgcanvas.lpr
index 0f9919ff..b77c9a80 100644
--- a/examples/corelib/canvastest/fpgcanvas.lpr
+++ b/examples/corelib/canvastest/fpgcanvas.lpr
@@ -10,7 +10,7 @@ uses
fpgfx,
gfxbase,
gui_form,
- gfx_imgfmt_bmp, fpgui_package;
+ gfx_imgfmt_bmp, math;
type
@@ -158,11 +158,11 @@ begin
Canvas.SetColor(clBlack);
Canvas.DrawRectangle(5, 235, 50, 50);
Canvas.SetColor(clRed);
- Canvas.DrawArc(5, 235, 50, 50, 0, 360); // should overlap rectangle pixels
+ Canvas.DrawArc(5, 235, 50, 50, 0, 270); // should overlap rectangle pixels
Canvas.SetColor(clBlack);
Canvas.DrawRectangle(5, 290, 50, 50);
Canvas.SetColor(clRed);
- Canvas.FillArc(5, 290, 50, 50, 0, 360); // should overlap rectangle pixels
+ Canvas.FillArc(5, 290, 50, 50, 0, 270); // should overlap rectangle pixels
Canvas.EndDraw;