A questão referem-se ao programa Agenda, cujo formulário principal sendo executado é mostrado na figura abaixo.Os dois pequenos botões, à direita e à esquerda do Form, quando pressionados, fazem com que, respectivamente, o próximo registro ou o registro anteriorde um arquivo binário sejam mostrados na editbox.

Ainda em relação ao programa Agenda, o campo Edit é protegido contra escrita a fim de que o usuário não possa alterar o seu conteúdo. A propriedade do controle TEdit que deve ser utilizada para atingir esse objetivo é:

A questão referem-se ao programa Agenda, cujo formulário principal sendo executado é mostrado na figura abaixo.Os dois pequenos botões, à direita e à esquerda do Form, quando pressionados, fazem com que, respectivamente, o próximo registro ou o registro anteriorde um arquivo binário sejam mostrados na editbox.

O trecho de código abaixo mostra o tratamento do evento OnClick do botão esquerdo do Form (pega o registro anterior). Sua tarefa é completar a linha que está faltando de modo que o programa funcione corretamente.

if filepos(arq) > 0 then begin

seek(arq, filepos(arq)-1); read(arq, umaPessoa);

// complete a linha a seguir

edit1.text := umaPessoa.nome;

end;

A instrução que está faltando é:

A questão referem-se ao aplicativo LeArquivo,cujo formulário principal em execução é mostrado na figura a seguir. O projeto é constituído por 3 Units Delphi: uApresentacao, uControle e uArmazenamento. Os métodos oferecidos pela Unit uControle em sua interface são:

procedure uControle_abrirArquivo(nome :

string); function uControle_fimArquivo:

boolean; function uControle_leLinha :

string; procedure uControle_fecharArquivo;

Observe o trecho de código abaixo (o tratamento do evento associado ao botão Ler), no qual uma linha foi suprimida:

uControle_abrirArquivo(edit1.Text);

while not uControle_fimArquivo do begin

// complete a linha a seguir

listbox1.Items.Add(linha);

end;

Das opções abaixo, aquela que tem maiores chances de completar o código anterior corretamente é:

A questão referem-se ao aplicativo LeArquivo,cujo formulário principal em execução é mostrado na figura a seguir. O projeto é constituído por 3 Units Delphi: uApresentacao, uControle e uArmazenamento. Os métodos oferecidos pela Unit uControle em sua interface são:

procedure uControle_abrirArquivo(nome :

string); function uControle_fimArquivo:

boolean; function uControle_leLinha :

string; procedure uControle_fecharArquivo;

O programa, quando o usuário usa a combinação deteclas Alt+L, apresenta na listbox o conteúdo do arquivo especificado na EditBox. O evento associado ao botão Ler, usado para a codificação da ação acima é:

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: