summaryrefslogtreecommitdiff
path: root/examples/gui/helloworld/helloworld.pas
diff options
context:
space:
mode:
Diffstat (limited to 'examples/gui/helloworld/helloworld.pas')
-rw-r--r--examples/gui/helloworld/helloworld.pas8
1 files changed, 4 insertions, 4 deletions
diff --git a/examples/gui/helloworld/helloworld.pas b/examples/gui/helloworld/helloworld.pas
index b09ec498..16af32f5 100644
--- a/examples/gui/helloworld/helloworld.pas
+++ b/examples/gui/helloworld/helloworld.pas
@@ -11,8 +11,8 @@ uses
type
TMainForm = class(TForm)
private
- BoxLayout: TBoxLayout;
- btnHello: TButton;
+ BoxLayout: TFBoxLayout;
+ btnHello: TFButton;
public
procedure AfterConstruction; override;
end;
@@ -30,13 +30,13 @@ begin
Text := 'fpGUI Application';
{ every fpGUI app needs a layout manager }
- BoxLayout := TBoxLayout.Create(self);
+ BoxLayout := TFBoxLayout.Create(self);
BoxLayout.Spacing := 8;
BoxLayout.VertAlign := vertFill;
InsertChild(BoxLayout);
{ create our button }
- btnHello := TButton.Create('Hello World!', self);
+ btnHello := TFButton.Create('Hello World!', self);
btnHello.CanExpandWidth := True;
btnHello.CanExpandHeight := True;
BoxLayout.InsertChild(btnHello);