Que tal buenas tardes, pido su ayuda con un problema al correr un Query, ya que al hacer la búsqueda la primera vez lo hace bien, pero al querer generar una nueva búsqueda me marca error "exception class EOleException with message Óbjeto Parameter mal definido. Se proporcionó información incompleta o incoherente'
Pongo la parte del código donde se realiza el Query, ojala me puedan ayudar, soy principiante en la programación con Delphi.
De antemano Gracias¡¡¡
Código Delphi
[-]
bSql := 'SELECT clave, concepto, ' +
'unidad FROM CATALOGO WHERE CATALOGO.clave = :Clave';
ADOQuery2.Close;
ADOQuery2.SQL.Add(bSql);
ADOQuery2.Parameters[0].DataType := ftstring;
ADOQuery2.parameters.ParamByName('Clave').value := tclaves;
ADOQuery2.Open;
if ADOQuery2.IsEmpty then
begin
if ADOQuery2.active then
ADOQuery2.Close;
bSql := ' ';
tclaves := ' ';
showmessage('CLAVE NO ENCONTRADA');
tclave.SetFocus;
end
else IF ADOquery2.Fields[1].asstring <> '' THEN
begin
descripcion.Text := ADOquery2.Fields[1].asstring;
unidad.Text := ADOquery2.Fields[2].asstring;
ADOQuery2.Close;
memo1.SetFocus;
end;