diff options
author | graemeg <graemeg@ae50a9b5-8222-0410-bf8d-8a13f76226bf> | 2007-07-25 10:35:50 +0000 |
---|---|---|
committer | graemeg <graemeg@ae50a9b5-8222-0410-bf8d-8a13f76226bf> | 2007-07-25 10:35:50 +0000 |
commit | 7c58e9f2f93efb2afbd3855c3ce8cc8492006433 (patch) | |
tree | a717d8eb74596d7e817b3e1829e7f7618a991419 /examples/corelib | |
parent | 1a5fd690766d2dd1805a9b9d0b76d5caa9ffe528 (diff) | |
download | fpGUI-7c58e9f2f93efb2afbd3855c3ce8cc8492006433.tar.xz |
* Fixed the Windows implementation of Canvas.DrawArc and Canvas.FillArc.
Diffstat (limited to 'examples/corelib')
-rw-r--r-- | examples/corelib/canvastest/fpgcanvas.lpi | 7 | ||||
-rw-r--r-- | examples/corelib/canvastest/fpgcanvas.lpr | 6 |
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; |