Segmentation Fault(11)

[Peter60]

Hallo zusammen,
ich habe ein Problem mit Delphi 10.1 FMX. Ich versuche eine kleine Anwendung für Android 5 zu schreiben.
Hier habe ich eine Form mit folgenden Code:

Delphi-Quellcode:

unit Unit6;

interface

uses
  System.SysUtils, System.Types, System.UITypes, System.Classes, System.Variants,
  FMX.Types, FMX.Controls, FMX.Forms, FMX.Graphics, FMX.Dialogs, FMX.Platform,
  FMX.Controls.Presentation, FMX.StdCtrls, FMX.Dialogservice, FMX.Edit;

type
  TForm1 = class(TForm)
    Button2: TButton;
    Button3: TButton;
    Edit1: TEdit;
    procedure Button2Click(Sender: TObject);
    procedure Button3Click(Sender: TObject);
    procedure Edit1Enter(Sender: TObject);
  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
  end;

var
  Form1: TForm1;
  MsgDlgResult: Integer;

implementation

{$R *.fmx}
{$R *.LgXhdpiTb.fmx ANDROID}



procedure TForm1.Button2Click(Sender: TObject);
begin
  self.Close;
end;

procedure TForm1.Button3Click(Sender: TObject);
begin
  FMX.Dialogs.MessageDlg(edit1.text, TMsgDlgType.mtInformation,  [TMsgDlgBtn.mbOk],0,
  procedure(const AResult: TModalResult)
  begin
    if AResult = mrOK then
    begin
      exit;
    end;
  end);
end;

procedure TForm1.Edit1Enter(Sender: TObject);
begin
  edit1.Text := '';
end;

end.

Das Problem ist folgendes wird die Anwendung im Debugger gestartet und nun tippe ich auf das Edit1 Feld.
Es erscheint im Debugger die Fehlermeldung Segmentation Fault(11). Was hat das zu bedeuten?

Ich freue mich auf eure Antworten.