Un DBgrid cabezón

[[egostar]]

Parece que se donde está el problema

Código Delphi [-]
 
   DbGrid1.DataSource:=dm.T.Vacio;
   s:='SELECT CODIGO,DESCRIPCION, UNI, PVP, DTO,TOTAL,POS FROM LINTIK WHERE '+filtro;
   dm.t.DataSource1.DataSet.Close;
   dm.t.IBQuery1.Active:=FALSE;
   dm.t.IBQuery1.Close;

   dm.T.IBTquery.Active:=false;

   dm.t.IBQuery1.SQL.Clear;
   dm.t.IBQuery1.SQL.Add(S);
   dm.T.IBTquery.Active:=true;

   dm.t.IBQuery1.Open;
   dm.t.IBQuery1.Active:=TRUE;
   //DbGrid1.DataSource:=dm.T.DataSource1; Estas redeclarando el DBGrid1
   dbGrid1.Refresh;

Salud OS

PD Perdón por la nota anterior, todo por no leer