Hola
Me parece que primero completas el SQL de tu consulta y luego le haces open.
Código Delphi [-]
begin qProductos.close;
qProductos.SQL.clear;
qProductos.SQL.Text:='Select * from producto';
case radiog.ItemIndex of
0: qProductos.SQL.ADD(' where estado=1') ;
1: qProductos.SQL.ADD(' where estado=0');
end;
qProductos.Open;
Saludos
__________________
Caminante, son tus huellas el camino y nada más; Caminante, no hay camino, se hace camino al andar.
Antonio Machado
|