Analise o trecho de programa abaixo:

type

TFigura = class

procedure Desenha; virtual; abstract;

end;

TRetangulo= class(TFigura)

procedure Desenha; override;

end;

TElipse = class(TFigura)

procedure Desenha; override;

end;

É correto afirmar que:

Analise o programa Delphi abaixo:

O programa tem um erro de sintaxe. Esse erro ocorre no trecho de código compreendido entre as linhas:

Analise o trecho de programa abaixo:

procedure TForm1.Button1Click(Sender: TObject);

var

x : Integer;

y : Real;

z : AnsiString;

begin

x := 10;

y := 10.1;

z := 'Delphi'; Form1.Caption := IntToStr(Length(IntToStr(X) +

FloatToStr(Y) + Z));

end;

O valor armazenado na propriedade Caption do Form1 será:

Analise o trecho de programa Delphi a seguir:

procedure TForm1.Vendedor1Click(Sender: TObject);
begin
  with Query1 do begin
    Close;
    SQL.Clear;
    SQL.ADD('SELECT * FROM PEÇAS');
    ExecSQL;
  end;
end;

É correto afirmar que:

A declaração da linguagem Object Pascal que suscita uma exceção é.

Com relação ao evento OnCreate de um formulário, é correto afirmar que:

No ambiente de desenvolvimento do Delphi, ao clicar-se com o botão direito do mouse sobre um formulário qualquer do projeto e escolher-se o comando View as Text, será exibido(a):

Analise o trecho de programa Delphi abaixo:

procedure TForm1.Button1Click(Sender: TObject);
var
  i, j : integer;
begin
  label1.Caption := '';
  for i := 1 to 3 do
    for J:= 5 downto 2 do
      label1.Caption := label1.Caption + '*';
end;

O valor impresso no componente Label1 é:

A propriedade do componente BitBtn usada para definir o bitmap exibido no botão da figura abaixo é:

Considere o programa em Object Pascal listado abaixo e responda à questão

O valor impresso pelo programa é: