Record Not Found!?!?!?!?!

Delphi

19/09/2005

:shock: :shock: :shock: :shock:

Estou usando um ADODATASET.

No OnExit de um Edit eu coloco o seguinte codigo:

qClienteforn.Close;
qClienteForn.Open;
if qClienteForn.Locate(´CAEIDENT´, strtoint(edtCodCliente.Text), []) then
Edit1.text := qClienteFornCAERZSOC.AsString
else
showmessage (´Código não encontrado!´);


Quando dou o locate, o programa diz o seguinte:

qClienteForn: Record Not Found...

O q eh ?!?!?!??!??

Desde Já agradeço!


Diegus

Diegus

Curtidas 0

Respostas

Rjun

Rjun

19/09/2005

Como que tá o Select da sua Query?


GOSTEI 0
Diegus

Diegus

19/09/2005

Como que tá o Select da sua Query?



select * from CAEFORNE

Somente isto...

Estou chamando todos os registro cadastrados na tabela de FOrnecedores (CAEFORNE)


GOSTEI 0
Rjun

Rjun

19/09/2005

Aparentemente está tudo certo. Tente fazer isso:

qClienteForn.Open; 
try
  if qClienteForn.Locate(´CAEIDENT´, StrToInt(edtCodCliente.Text), []) then 
    Edit1.text := qClienteForn.FieldByName(´CAERZSOC´).AsString 
  else 
    showmessage (´Código não encontrado!´); 
finally
  qClienteForn.Close;
end;



GOSTEI 0
Diegus

Diegus

19/09/2005

Aparentemente está tudo certo. Tente fazer isso: 
qClienteForn.Open; 
try
  if qClienteForn.Locate(´CAEIDENT´, StrToInt(edtCodCliente.Text), []) then 
    Edit1.text := qClienteForn.FieldByName(´CAERZSOC´).AsString 
  else 
    showmessage (´Código não encontrado!´); 
finally
  qClienteForn.Close;
end;


Amigão!!! Num deu certo..... :´( :(

Mais alguma sugestão ?!?!?!?? :D

Agradeço desde já...


GOSTEI 0
Rjun

Rjun

19/09/2005

Bom, você esta usando ADODATASET. Certo? Vejamos as propriedades:

CommandText = ´SELECT * FROM CAEFORNE´;
CommandType = cmdText;


Você alterou mais alguma propriedade? Com certeza o erro não está no código, pois fiz um teste aqui e funcionou.


GOSTEI 0
Diegus

Diegus

19/09/2005

Bom, você esta usando ADODATASET. Certo? Vejamos as propriedades: 
CommandText = ´SELECT * FROM CAEFORNE´;
CommandType = cmdText;
Você alterou mais alguma propriedade? Com certeza o erro não está no código, pois fiz um teste aqui e funcionou.


Rjun! Vlw cara pela atenção... conferi todos as propriedades... sabe q q eu fiz pra acertar? coloquei outro adodataset.
Vlw!!


GOSTEI 0
Rjun

Rjun

19/09/2005

Rjun! Vlw cara pela atenção... conferi todos as propriedades... sabe q q eu fiz pra acertar? coloquei outro adodataset. Vlw!!


Mais uma para os mistérios da informática....


GOSTEI 0
Diegus

Diegus

19/09/2005

[quote:3c70c27cbe=´Diegus´]Rjun! Vlw cara pela atenção... conferi todos as propriedades... sabe q q eu fiz pra acertar? coloquei outro adodataset. Vlw!!


Mais uma para os mistérios da informática....[/quote:3c70c27cbe]

Rsrsrsr.... serah q eh pq o formulario q estou usando eh uma herança de outro formulário?

mas o select q coloquei no qClienteForn eh do formulario filho...

Doidera!!


GOSTEI 0
POSTAR