Questão #38333

Informática — Informática Diversos

Considere o código referente à procura de dados em uma tabela no DELPHI 7.0:

procedure TSearchDemo.SearchExactClick(Sender: TObject);

begin

Table 1 .SetKey;

Table 1 .Fields[0].AsString : Edit1.Text; (* Table1.Fieldbyname('Cidade') : Edit1.Text *)

Table 1 .GoToKey;

end;

O procedimento acima pode ser substituído por:

A procedure TSearchDemo.SearchExactClick(Sender: TObject); begin

Table 1 .SetKey([Edit1.text]);

end; B procedure TSearchDemo.SearchExactClick(Sender: TObject); begin

Table1.FindKey([Edit1.text]);

end; C procedure TSearchDemo.SearchExactClick(Sender: TObject); begin

Table 1 .GoToKey;

end; D procedure TSearchDemo.SearchExactClick(Sender: TObject); begin

Table 1 .SetKey([Edit1.text]);

Table 1 .GoToKey;

end;

Informática — Informática Diversos

Uma questão respondida. E as próximas?