Avalie o trecho de um programa Object Pascal mostrado abaixo e, considerando que o projeto tem um formulário de nome Form1 e que compilou corretamente, assinale a alternativa CORRETA.

procedure TForm1.BtnClick(Sender: TObject);

begin

showmessage('Hello World!');

end;

procedure TForm1.FormCreate(Sender: TObject);

var b:TButton;

begin

b := TButton.Create(form1);

b.Caption := 'Teste';

b.Visible:=true;

b.OnClick := btnClick;

end;