2 files changed, 11 insertions, 11 deletions
diff --git a/examples/gui/dbftest/dbftest.pas b/examples/gui/dbftest/dbftest.pas
index 32c70484..3a76cea7 100644
--- a/examples/gui/dbftest/dbftest.pas
+++ b/examples/gui/dbftest/dbftest.pas
@@ -25,12 +25,12 @@ type
   TMainForm = class(TForm)
     DataSet: TDBF;
     DataSource: TDataSource;
-    Box: TBoxLayout;
+    Box: TFBoxLayout;
     ListBox: TListBox;
-    CurDatasetLabel: TLabel;
+    CurDataseTFLabel: TFLabel;
     CurNameText, CurEMailText: TDBText;
-    Navi: TBoxLayout;
-    FirstDataset, PrevDataset, NextDataset, LastDataset: TButton;
+    Navi: TFBoxLayout;
+    FirstDataset, PrevDataset, NextDataset, LastDataset: TFButton;
     procedure FormCreate(Sender: TObject);
     procedure FirstDatasetClick(Sender: TObject);
     procedure PrevDatasetClick(Sender: TObject);
diff --git a/examples/gui/dbftest/mainform.frm b/examples/gui/dbftest/mainform.frm
index 9508c21e..602336d4 100644
--- a/examples/gui/dbftest/mainform.frm
+++ b/examples/gui/dbftest/mainform.frm
@@ -2,12 +2,12 @@ object MainForm: TMainForm
   Text = 'DBF test'
   BorderWidth = 8
   OnCreate = FormCreate
-  object Box: TBoxLayout
+  object Box: TFBoxLayout
     Spacing = 8
     Orientation = Vertical
     object ListBox: TListBox
     end
-    object CurDatasetLabel: TLabel
+    object CurDataseTFLabel: TFLabel
       Text = 'Current dataset:'
     end
     object CurNameText: TDBText
@@ -16,20 +16,20 @@ object MainForm: TMainForm
     object CurEMailText: TDBText
       Text = '<e-mail>'
     end
-    object Navi: TBoxLayout
-      object FirstDataset: TButton
+    object Navi: TFBoxLayout
+      object FirstDataset: TFButton
         Text = 'First'
 	OnClick = FirstDatasetClick
       end
-      object PrevDataset: TButton
+      object PrevDataset: TFButton
         Text = 'Previous'
 	OnClick = PrevDatasetClick
       end
-      object NextDataset: TButton
+      object NextDataset: TFButton
         Text = 'Next'
 	OnClick = NextDatasetClick
       end
-      object LastDataset: TButton
+      object LastDataset: TFButton
         Text = 'Last'
 	OnClick = LastDatasetClick
       end