TOPIC:

unit Project1;

{$mode objfpc}{$H+}
{$modeswitch unicodestrings}
{$namespace com.zeljus.button}
interface
uses
   androidr14;
type
  MainActivity = class(AAActivity)
    procedure onCreate(savedInstanceState: AOBundle); override;
  end;
implementation
procedure MainActivity.onCreate(savedInstanceState: AOBundle);
var
 layout: AWLinearLayout;
begin
  inherited onCreate(savedInstanceState);
  layout:= AWLinearLayout.Create(Self);
  layout.setOrientation(AWLinearLayout.VERTICAL);
  setContentView(layout);
end;
end.