diff options
author | Graeme Geldenhuys <graemeg@gmail.com> | 2015-09-02 23:25:41 +0100 |
---|---|---|
committer | Graeme Geldenhuys <graemeg@gmail.com> | 2015-09-02 23:25:41 +0100 |
commit | b0a9f3d90d7a8127ba41ab77a7054d797e816c83 (patch) | |
tree | b11cdae78c316a7b728522e9a4bfb43880fad8f5 /examples/corelib/canvastest | |
parent | db31f06d5e7adf28fad60e36fd9e5d2cf0519e84 (diff) | |
parent | f52bde1cd49d0d01002e8b684909268b723a3edb (diff) | |
download | fpGUI-master.tar.xz |
Diffstat (limited to 'examples/corelib/canvastest')
-rw-r--r-- | examples/corelib/canvastest/fpgcanvas.lpr | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/examples/corelib/canvastest/fpgcanvas.lpr b/examples/corelib/canvastest/fpgcanvas.lpr index 9d0656e4..14c87a82 100644 --- a/examples/corelib/canvastest/fpgcanvas.lpr +++ b/examples/corelib/canvastest/fpgcanvas.lpr @@ -96,7 +96,7 @@ begin // Testing Text and Fonts y := 60; Canvas.SetTextColor(clBlack); - Canvas.DrawString(5, y, 'This text must be black and default font (' + fpgApplication.DefaultFont.FontDesc + ')'); + Canvas.DrawString(5, y, 'This text must be black and default font (' + fpgStyle.DefaultFont.FontDesc + ')'); // red dot indicates top/left corner of where previous text was started Canvas.Pixels[5,y] := clRed; @@ -117,7 +117,7 @@ begin // Testing basic style drawings - Canvas.Font := fpgApplication.DefaultFont; + Canvas.Font := fpgStyle.DefaultFont; Canvas.DrawString(320, 3, 'DrawButtonFace():'); r.SetRect(300, 20, 75, 25); @@ -138,7 +138,7 @@ begin Canvas.DrawString(45, y, 'DrawControlFrame():'); y := y + Canvas.Font.Height; - Canvas.DrawControlFrame(5, y, 200, 23); + fpgStyle.DrawControlFrame(Canvas, 5, y, 200, 23); // Testing Bitmap painting |