Código Delphi
[-]procedure TfrmDatosClienta.Consultar();
begin
dm.VentasSQL.Close;
dm.VentasSQL.SQL.Clear;
dm.VentasSQL.SQL.Text := 'SELECT Cantidad, Fecha, Vendedora FROM Ventas WHERE Clienta='+QuotedStr(eNombre.Text);
dm.VentasSQL.Active := True; dm.DVentasSQL.Enabled := True;
dm.VentasSQL.Open;
DBGrid1.DataSource := dm.DVentasSQL;
DBGrid1.Columns.Items[0].Width := 50;
DBGrid1.Columns.Items[1].Width := 100;
DBGrid1.Columns.Items[2].Width := 150;
end;
En cuanto a que la rejilla esté vacia, has comprobado si realmente devuelve datos la consulta?
Un Saludo.