Pesquisa/Consulta em ADO com Access 2000

Delphi

18/07/2004

Gostaria de saber o que substitui em ADO o SetKey e FindKey.
Pois quero realizar uma pesquisa em ADO só que com FindKey e SetKey, não consigo, se poderem me mandar um exemplo de como posso fazer uma consulta/Pesquisa em ADO e que tambem substitua o exemplo abaixo, eu agradeço.

Desde já OBRIGADO

Dm.TbManifesto.SetKey;
Dm.TbManifesto.FieldByName(´CMAN_MAN´).AsString := Trim(EdtManif.Text);
if not Dm.TbManifesto.FindKey([Trim(EdtManif.Text)]) then
begin
TOper := ´I´;
MskCMot.Enabled := True;
end;


Canastra

Canastra

Curtidas 0

Respostas

Bon Jovi

Bon Jovi

18/07/2004

Substituto acho q não tem. Mas tem uma alternativa que é o Locate:

Exemplos:

if not ADODataSet1.Locate(´CMAN_MAN´, Trim(EdtManif.Text), []) then
...

if ADODataSet1.Locate(´NOME´, edtNome.Text, [loPartialKey]) then
...


GOSTEI 0
POSTAR