Pesquisa/Consulta em ADO com Access 2000
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;
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
Curtidas 0
Respostas
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
...
Exemplos:
if not ADODataSet1.Locate(´CMAN_MAN´, Trim(EdtManif.Text), []) then
...
if ADODataSet1.Locate(´NOME´, edtNome.Text, [loPartialKey]) then
...
GOSTEI 0