summaryrefslogtreecommitdiff
path: root/examples/gui/gridtest
diff options
context:
space:
mode:
authorgraemeg <graemeg@ae50a9b5-8222-0410-bf8d-8a13f76226bf>2008-10-01 15:11:44 +0000
committergraemeg <graemeg@ae50a9b5-8222-0410-bf8d-8a13f76226bf>2008-10-01 15:11:44 +0000
commit62d36211682ba17dd0d618a4f3aee2e42ca72767 (patch)
tree30729241fe2c1a67388100b096805e0b015380f5 /examples/gui/gridtest
parent9bc7fd4fff51fa7f25414cdebe01e8dff75b9617 (diff)
downloadfpGUI-62d36211682ba17dd0d618a4f3aee2e42ca72767.tar.xz
* Updated all demos to use the new unit names.
* Updated all packages like ide addons, fpcunit etc to use the new unit names.
Diffstat (limited to 'examples/gui/gridtest')
-rw-r--r--examples/gui/gridtest/gridtest.lpi5
-rw-r--r--examples/gui/gridtest/gridtest.lpr20
2 files changed, 11 insertions, 14 deletions
diff --git a/examples/gui/gridtest/gridtest.lpi b/examples/gui/gridtest/gridtest.lpi
index c048eb69..4dcc44f4 100644
--- a/examples/gui/gridtest/gridtest.lpi
+++ b/examples/gui/gridtest/gridtest.lpi
@@ -40,10 +40,7 @@
</Units>
</ProjectOptions>
<CompilerOptions>
- <Version Value="5"/>
- <CodeGeneration>
- <Generate Value="Faster"/>
- </CodeGeneration>
+ <Version Value="8"/>
<Other>
<CustomOptions Value="-FUunits
"/>
diff --git a/examples/gui/gridtest/gridtest.lpr b/examples/gui/gridtest/gridtest.lpr
index fa36442d..c6753332 100644
--- a/examples/gui/gridtest/gridtest.lpr
+++ b/examples/gui/gridtest/gridtest.lpr
@@ -8,15 +8,15 @@ uses
{$ENDIF}{$ENDIF}
Classes,
SysUtils,
- gfxbase,
- fpgfx,
- gui_form,
- gui_basegrid,
- gui_grid,
- gui_button,
- gui_checkbox,
- gui_tab,
- gui_edit;
+ fpg_base,
+ fpg_main,
+ fpg_form,
+ fpg_basegrid,
+ fpg_grid,
+ fpg_button,
+ fpg_checkbox,
+ fpg_tab,
+ fpg_edit;
type
@@ -128,7 +128,7 @@ begin
ADefaultDrawing := False;
StringGrid.Canvas.SetColor(clGreen);
fpgStyle.DrawDirectionArrow(StringGrid.Canvas, ARect.Left, ARect.Top,
- ARect.Height, ARect.Height, 3);
+ ARect.Height, ARect.Height, adRight);
StringGrid.Canvas.SetTextColor(clTeal);
StringGrid.Canvas.DrawString(ARect.Height + ARect.Left + 2, ARect.Top, StringGrid.Cells[ACol, ARow]);
end;