2 replies to this topic

[JoAnCa]

Hola a todos

Pues necesito imprimir un informe de un listado de solicitudes, que puede ser una o varias en dependencia de las filas que seleccione el usuario en un dbgrid

Buscando en los foros he visto como manipular las filas de un dbgrid con multiselect, pera la mayoria son para copiar de un dbgrid a otro

Mi idea es segun las filas seleccionadas, crear un filtro para la tabla en la que se basa el reporte, pero parece que me estoy poniendo algo bruto, pues no se me ocurre como hacerlo

Se como recorrer el multiselect del dbgrid, pero no se como conformar el filtro

Alguna idea de como hacerlo?

Edited by JoAnCa, 29 April 2019 - 09:55 AM.

[JoAnCa]

Ya encontre la respuesta

 

delphi

if dbgListaSolic.SelectedRows.Count > 1 then        
begin          
  for i:=0 to dbgListaSolic.SelectedRows.Count - 1 do          
  begin            
    ModuloBD.fdtRegSolicitud.BookMark:=dbgListaSolic.SelectedRows[i];            
    if Filtro = '' then 
      Filtro:='IdSolicitud = ' + IntToStr(ModuloBD.fdtRegSolicitudIdSolicitud.Value)            
    else 
      Filtro:=Filtro + ' or IdSolicitud = ' + IntToStr(ModuloBD.fdtRegSolicitudIdSolicitud.Value);          
  end;          
  FiltraTabla(ModuloBD.fdtRegSolicitud, Filtro);        
end      
else        
  FiltraTabla(ModuloBD.fdtRegSolicitud, 'IdSolicitud = '+ IntToStr(ModuloBD.fdtRegSolicitudIdSolicitud.Value));

[JoAnCa]

A pesar de funcionar bien, pues me imprime las filas seleccionadas, noto algo raro

Cuando cierro el reporte que regresa al formulario principal, el dbgrid me aparece con todas las filas seleccionadas.
Es esto normal?

Como hacer para que se queden seleccionadas solo las que habian anteriormente o si no, una sola?
Tambien serviria, sin ninguna seleccionada

Pues no quisiera que estuvieran todas seleccionadas, pues luce muy feo

PD: Rectifico, es un JvDBGrid

Edited by JoAnCa, 29 April 2019 - 11:31 AM.