O dicionário de onde foi retirado o texto mostra a simbologia das coisas do mundo real e imaginário; o segmento do texto em que a simbologia da planta é mais bem identificada é:

Seja o seguinte Form onde foram dispostos um controle Table, do tipo TTable, um controle DataSource, do Tipo TdataSource, e um controle DBEdit, do tipo TDBEdit.

Relacione as propriedades na coluna à esquerda com os valores na coluna à direita de modo a conectar o controle DBEdit ao campo Nome da tabela Cadastro (uma tabela Paradox criada com o Database Desktop e localizada no diretório raiz do disco rígido).

Após a correta associação, os valores preenchidos na coluna da esquerda são, na ordem:

O princípio da Orientação a Objetos que torna possível o mecanismo do polimorfismo é:

Considere o programa em Object Pascal listado abaixo:

uses SysUtils;

{$APPTYPE CONSOLE}

const

c = 5;

var

a: integer;

b, d: real;

function p1(c:integer):integer;

begin

if c=1 then exit;

result := c*p1(c-1);

end;

begin

a:= c;

b:= 4.0;

d:= 2;

writeln(intToStr(p1(a)), intToStr(a));

end.

A saída produzida pelo programa será:

Observe no trecho de código abaixo a implementação do chamado padrão de projeto singleton em Delphi:

type

TFila = class

private

…

public

constructor Create;

class function getInstance:TFila;

…

end;

implementation

var

Fila : TFila;

class function TFila.getInstance: TFila;

begin

if not assigned(Fila) then

Fila := TFila.Create;

result := Fila;

end;

Em relação ao prefixo class, usado na declaração do método de classe getInstance, é correto afirmar que:

Seja uma aplicação bancária, desenvolvida em uma arquitetura de 3 camadas. A arquitetura da aplicação consiste de uma camada de apresentação, rodando em uma máquina cliente, objetos de negócio e objetos de dados, rodando em um servidor de aplicações e um servidor de Banco de Dados. Sejam as seguintes alternativas para o método retirar do objeto de negócio ContaCorrente:

1ª alternativa:

if valor > 0 then begin

I := CreateComObject(CLASS_OD_) as IOD;

I.retirar(banco, cc, valor);

I := nil;

end

else

showmessage('quantia inválida');

2ª alternativa:

if valor > 0 then begin

I:= CreateComObject(CLASS_OD_) as IOD;

I.retirar(banco, cc, valor);

I := nil;

end

else

raise exception.create('');

Em relação às duas alternativas propostas, é correto afirmar que:

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 é: