Started appending F to classes on fpgui, to make its namespace more unique

3 files changed, 158 insertions, 158 deletions

diff --git a/examples/gui/concepttest/OpenSoftStyle.pas b/examples/gui/concepttest/OpenSoftStyle.pas
index 6d2b65f8..60a25f8d 100644
--- a/examples/gui/concepttest/OpenSoftStyle.pas
+++ b/examples/gui/concepttest/OpenSoftStyle.pas
@@ -20,7 +20,7 @@ type
     // Colors
     function    GetGUIColor(Color: TColor): TGfxColor; override;
     // Buttons (todo)
-    procedure   DrawButtonFace(Canvas: TGfxCanvas; const ARect: TRect; Flags: TButtonFlags); override;
+    procedure   DrawButtonFace(Canvas: TGfxCanvas; const ARect: TRect; Flags: TFButtonFlags); override;
     // GroupBox
     procedure   DrawGroupBox(Canvas: TGfxCanvas; const ARect: TRect; const ALabel: String; WidgetState: TWidgetState); override;
   end;
@@ -180,7 +180,7 @@ end;
 
 
 procedure TOpenSoftStyle.DrawButtonFace(Canvas: TGfxCanvas; const ARect: TRect;
-  Flags: TButtonFlags);
+  Flags: TFButtonFlags);
 begin
 //  inherited DrawButtonFace(Canvas, ARect, Flags);
   PaintGradient(Canvas, ARect, Flags);
diff --git a/examples/gui/concepttest/compileroptform.frm b/examples/gui/concepttest/compileroptform.frm
index 1aae5daa..054601db 100644
--- a/examples/gui/concepttest/compileroptform.frm
+++ b/examples/gui/concepttest/compileroptform.frm
@@ -1,137 +1,137 @@
-object CompilerOptForm: TCompilerOptForm
-  Text = 'Compiler Options - Code'
-  BorderWidth = 5
-  object Box1: TBoxLayout
-    Spacing = 8
-    Orientation = Vertical
-    object Box2: TBoxLayout
-      Orientation = Vertical
-      Spacing = 4
-      object Box4: TBoxLayout
-        object grpBox1: TGroupBox
-          Text = 'Unit Style:'
-          object grpBox1VBox1: TBoxLayout
-            Orientation = Vertical
-          	object cbSmartLink: TCheckbox
-          	  Checked = True
-          	  Text = 'Smart Linkable (-CX)'
-          	end
-          end
-        end
-        object grpBox2: TGroupBox
-          Text = 'Checks:'
-          object grpBox2VBox1: TBoxLayout
-            Orientation = Vertical
-          	object rbIO: TRadioButton
-          	  Checked = True
-          	  Text = 'I/O (-Ci)'
-          	end
-          	object rbOverflow: TRadioButton
-          	  Checked = True
-          	  Text = 'Overflow (-Co)'
-          	end
-          	object rbRange: TRadioButton
-          	  Checked = True
-          	  Text = 'Range (-Cr)'
-          	end
-          	object rbStack: TRadioButton
-          	  Checked = True
-          	  Text = 'Stack (-Ct)'
-          	end
-          end
-        end
-        object grpBox3: TGroupBox
-          Text = 'Heap Size (-Ch):'
-          object grpBox3VBox1: TBoxLayout
-            Orientation = Vertical
-          	object edHeapSize: TEdit
-          	  Text = '0'
-              CanExpandWidth = False
-          	end
-          end
-        end
-      end
-      object Box5: TBoxLayout
-        object grpBox4: TGroupBox
-          Text = 'Generate:'
-          object grpBox4VBox1: TBoxLayout
-            Orientation = Vertical
-          	object rbNormal: TRadioButton
-          	  Text = 'Normal Code (none)'
-          	end
-          	object rbFaster: TRadioButton
-          	  Checked = True
-          	  Text = 'Faster Code (-OG)'
-          	end
-          	object rbSmaller: TRadioButton
-          	  Text = 'Smaller Code (-Og)'
-          	end
-          end
-        end
-        object grpBox5: TGroupBox
-          Text = 'Target Platform:'
-          CanExpandHeight = True
-          object grpBox5VBox1: TBoxLayout
-            Orientation = Vertical
-            VertAlign = vertTop
-          	object lblTarget1: TLabel
-          	  Text = 'Target OS (-T)'
-          	end
-          	object lblTarget2: TLabel
-          	  Text = 'Target CPU (-P)'
-          	end
-          	object lblTarget3: TLabel
-          	  Text = 'Target i386'
-          	end
-          end
-        end
-      end
-      object Box6: TBoxLayout
-        object grpBox6: TGroupBox
-          Text = 'Optimizations:'
-          object grpBox6VBox1: TBoxLayout
-            Orientation = Vertical
-            CanExpandWidth = True
-          	object rbLevel0: TRadioButton
-          	  Text = 'Level 0 (no extra Optimizations) (none)'
-          	end
-          	object rbLevel1: TRadioButton
-          	  Checked = True
-          	  Text = 'Level 1 (Quick Optimizations) (-O1)'
-          	end
-          	object rbLevel2: TRadioButton
-          	  Text = 'Level 2 (Level 1 + Slower Optimizations) (-O2)'
-          	end
-          	object rbLevel3: TRadioButton
-          	  Text = 'Level 3 (Level 2 + Uncertain) (-O3)'
-          	end
-          	object rbKeepVarReg: TCheckbox
-          	  Text = 'Keep certain variables in registers (-Or)'
-          	end
-          	object rbUncOpt: TCheckbox
-          	  Text = 'Uncertain Optimizations (-Ou)'
-          	end
-          end
-        end
-      end
-    end
-    object Box3: TBoxLayout
-      object btnOK: TButton
-        Text = 'OK'
-        OnClick = btnCloseClick
-      end
-      object btnCancel: TButton
-        Text = 'Cancel'
-      end
-      object btnShowOpt: TButton
-        Text = 'Show Options'
-      end
-      object btnTest: TButton
-        Text = 'Test'
-      end
-      object btnLoadSave: TButton
-        Text = 'Load/Save'
-      end
-    end
-  end
-end
+object CompilerOptForm: TCompilerOptForm

+  Text = 'Compiler Options - Code'

+  BorderWidth = 5

+  object Box1: TFBoxLayout

+    Spacing = 8

+    Orientation = Vertical

+    object Box2: TFBoxLayout

+      Orientation = Vertical

+      Spacing = 4

+      object Box4: TFBoxLayout

+        object grpBox1: TGroupBox

+          Text = 'Unit Style:'

+          object grpBox1VBox1: TFBoxLayout

+            Orientation = Vertical

+          	object cbSmartLink: TCheckbox

+          	  Checked = True

+          	  Text = 'Smart Linkable (-CX)'

+          	end

+          end

+        end

+        object grpBox2: TGroupBox

+          Text = 'Checks:'

+          object grpBox2VBox1: TFBoxLayout

+            Orientation = Vertical

+          	object rbIO: TRadioButton

+          	  Checked = True

+          	  Text = 'I/O (-Ci)'

+          	end

+          	object rbOverflow: TRadioButton

+          	  Checked = True

+          	  Text = 'Overflow (-Co)'

+          	end

+          	object rbRange: TRadioButton

+          	  Checked = True

+          	  Text = 'Range (-Cr)'

+          	end

+          	object rbStack: TRadioButton

+          	  Checked = True

+          	  Text = 'Stack (-Ct)'

+          	end

+          end

+        end

+        object grpBox3: TGroupBox

+          Text = 'Heap Size (-Ch):'

+          object grpBox3VBox1: TFBoxLayout

+            Orientation = Vertical

+          	object edHeapSize: TEdit

+          	  Text = '0'

+              CanExpandWidth = False

+          	end

+          end

+        end

+      end

+      object Box5: TFBoxLayout

+        object grpBox4: TGroupBox

+          Text = 'Generate:'

+          object grpBox4VBox1: TFBoxLayout

+            Orientation = Vertical

+          	object rbNormal: TRadioButton

+          	  Text = 'Normal Code (none)'

+          	end

+          	object rbFaster: TRadioButton

+          	  Checked = True

+          	  Text = 'Faster Code (-OG)'

+          	end

+          	object rbSmaller: TRadioButton

+          	  Text = 'Smaller Code (-Og)'

+          	end

+          end

+        end

+        object grpBox5: TGroupBox

+          Text = 'Target Platform:'

+          CanExpandHeight = True

+          object grpBox5VBox1: TFBoxLayout

+            Orientation = Vertical

+            VertAlign = vertTop

+          	object lblTarget1: TFLabel

+          	  Text = 'Target OS (-T)'

+          	end

+          	object lblTarget2: TFLabel

+          	  Text = 'Target CPU (-P)'

+          	end

+          	object lblTarget3: TFLabel

+          	  Text = 'Target i386'

+          	end

+          end

+        end

+      end

+      object Box6: TFBoxLayout

+        object grpBox6: TGroupBox

+          Text = 'Optimizations:'

+          object grpBox6VBox1: TFBoxLayout

+            Orientation = Vertical

+            CanExpandWidth = True

+          	object rbLevel0: TRadioButton

+          	  Text = 'Level 0 (no extra Optimizations) (none)'

+          	end

+          	object rbLevel1: TRadioButton

+          	  Checked = True

+          	  Text = 'Level 1 (Quick Optimizations) (-O1)'

+          	end

+          	object rbLevel2: TRadioButton

+          	  Text = 'Level 2 (Level 1 + Slower Optimizations) (-O2)'

+          	end

+          	object rbLevel3: TRadioButton

+          	  Text = 'Level 3 (Level 2 + Uncertain) (-O3)'

+          	end

+          	object rbKeepVarReg: TCheckbox

+          	  Text = 'Keep certain variables in registers (-Or)'

+          	end

+          	object rbUncOpt: TCheckbox

+          	  Text = 'Uncertain Optimizations (-Ou)'

+          	end

+          end

+        end

+      end

+    end

+    object Box3: TFBoxLayout

+      object btnOK: TFButton

+        Text = 'OK'

+        OnClick = btnCloseClick

+      end

+      object btnCancel: TFButton

+        Text = 'Cancel'

+      end

+      object btnShowOpt: TFButton

+        Text = 'Show Options'

+      end

+      object btnTest: TFButton

+        Text = 'Test'

+      end

+      object btnLoadSave: TFButton

+        Text = 'Load/Save'

+      end

+    end

+  end

+end

diff --git a/examples/gui/concepttest/frmCompilerOpt.pas b/examples/gui/concepttest/frmCompilerOpt.pas
index b2f84a6f..b472e2ab 100644
--- a/examples/gui/concepttest/frmCompilerOpt.pas
+++ b/examples/gui/concepttest/frmCompilerOpt.pas
@@ -21,43 +21,43 @@ type
     procedure SmartLinkClick(Sender: TObject);
   published
     procedure btnCloseClick(Sender: TObject);
-    Box1: TBoxLayout;
-    Box2: TBoxLayout;
-    Box3: TBoxLayout;
-    Box4: TBoxLayout;
-    Box5: TBoxLayout;
-    Box6: TBoxLayout;
-    btnOK, btnCancel, btnShowOp, btnTest, btnLoadSave : TButton;
+    Box1: TFBoxLayout;
+    Box2: TFBoxLayout;
+    Box3: TFBoxLayout;
+    Box4: TFBoxLayout;
+    Box5: TFBoxLayout;
+    Box6: TFBoxLayout;
+    btnOK, btnCancel, btnShowOp, btnTest, btnLoadSave : TFButton;
     grpBox1: TGroupBox;
-      grpBox1VBox1: TBoxLayout;
-        cbSmartLink: TCheckbox;
+      grpBox1VBox1: TFBoxLayout;
+        cbSmartLink: TFCheckbox;
     grpBox2: TGroupBox;
-      grpBox2VBox1: TBoxLayout;
+      grpBox2VBox1: TFBoxLayout;
         rbIO: TRadioButton;
         rbOverflow: TRadioButton;
         rbRange: TRadioButton;
         rbStack: TRadioButton;
     grpBox3: TGroupBox;
-      grpBox3VBox1: TBoxLayout;
+      grpBox3VBox1: TFBoxLayout;
         edHeapSize: TEdit;
     grpBox4: TGroupBox;
-      grpBox4VBox1: TBoxLayout;
+      grpBox4VBox1: TFBoxLayout;
         rbNormal: TRadioButton;
         rbFaster: TRadioButton;
         rbSmaller: TRadioButton;
     grpBox5: TGroupBox;
-      grpBox5VBox1: TBoxLayout;
-        lblTarget1: TLabel;
-        lblTarget2: TLabel;
-        lblTarget3: TLabel;
+      grpBox5VBox1: TFBoxLayout;
+        lblTarget1: TFLabel;
+        lblTarget2: TFLabel;
+        lblTarget3: TFLabel;
     grpBox6: TGroupBox;
-      grpBox6VBox1: TBoxLayout;
+      grpBox6VBox1: TFBoxLayout;
         rbLevel0: TRadioButton;
         rbLevel1: TRadioButton;
         rbLevel2: TRadioButton;
         rbLevel3: TRadioButton;
-        rbKeepVarReg: TCheckbox;
-        rbUncOpt: TCheckbox;
+        rbKeepVarReg: TFCheckbox;
+        rbUncOpt: TFCheckbox;
   end;
 
 var