podria ser por que no has cerrado el query?
deberia ser:
query.close;
query.<lo_que_sea>
query.open;
Cita:
|
Empezado por jpcancino
procedure Tbprodn.busClick(Sender: TObject);
var mysql:string;
begin
mysql:='SELECT CODIGO.CODIGO, CODIGO.NOMBRE, CODIGO.UNIDAD, PRECICAT.PRE'+
' FROM CODIGO INNER JOIN PRECICAT'+
' ON CODIGO.CODIGO = PRECICAT.COD WHERE CODIGO.NOMBRE LIKE '+#39+bprodn.edit1.text+'%'+#39+' AND PRECICAT.PRE > 0';
rprod.query1.sql.Clear;
rprod.query1.SQL.Add(mysql);
bprodn.Visible:=false;
busc.Show;
rprod.query1.Open;
rprod.Show;
bprodn.Visible:=true;
bprodn.Close;
ese es el código completo en el boton de busqueda, en este caso es otro formulario, no dode está el query, pero me pasa el mismo problema
|
__________________
“Plantad la semilla de la avaricia en la infértil tierra de la estupidez y obtendreis la bella flor de la mierda”
(Confucio)
|