Ver Mensaje Individual
  #1  
Antiguo 09-08-2017
Dergon Dergon is offline
Miembro
 
Registrado: nov 2015
Posts: 38
Reputación: 0
Dergon Va por buen camino
Usar Varias Ibquery En Dbgrid

Hola amigos,estoy con un inconveniente a la hora de usar una ibquery,hize una consulta via sql con ibquery de una tabla en la cual enlaze mi dbgrid,y tambien otra ibquery por si mi checkbox estubiera desactivada,y la otra si estubiera el checkbox activada,el codigo en sql va bien,lo que pasa es que mi dbgrid esta enlazada al primer ibquery y al ejecutar la otra ibquery no va por causa que mi dbgrid.datasour queda por el ibquery1.

Aqui el codigo
Código Delphi [-]
procedure TFrmConVenta.BitBtn1Click(Sender: TObject);
begin
      if CheckBox1.Checked = false then
         begin
         dm_dados.sqlConVenta.Close;
         dm_dados.sqlConVenta.ParamByName('mov').AsInteger:=StrToInt(editcodini.Text);
         dm_dados.sqlConVenta.ParamByName('numvend').AsInteger:=StrToInt(editcodvend.Text);
         dm_dados.sqlConVenta.ParamByName('numcli').AsInteger:=StrToInt(edtnumcli.Text);
         dm_dados.sqlConVenta.ParamByName('datavend').AsDate:=StrToDate(MaskEdit1.Text);
         dm_dados.sqlConVenta.Open;
         end
           else
           If CheckBox1.Checked = true then
           begin 
           sql_sem_filtro.Close;
           sql_sem_filtro.ParamByName('datavend').AsDate:=StrToDate(MaskEdit1.Text);
           sql_sem_filtro.Open;

Última edición por ecfisa fecha: 09-08-2017 a las 21:45:51. Razón: Agregar etiquetas [delphi]
Responder Con Cita