Mejor respuesta JoAnCa , 29 abril 2019 - 11:16
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));
Ir al mensaje completo