eu tenho um ListView1 no meu form que e carregado assim
SQL = "SELECT * FROM permissoes WHERE nom_mat like " & Criterio & "and ent_mat between #" & DataInicial & "# AND #" & DataFinal & "#" & "order by nom_mat"
rsPaciente.Open SQL, cnSQL, adOpenForwardOnly, adLockReadOnly
While Not rsPaciente.EOF
Set lst = ListaAlunos.ListItems.Add(, , rsPaciente("mat_mat"))
lst.SubItems(1) = rsPaciente("pgu_mat")
lst.SubItems(2) = rsPaciente("nom_mat")
lst.SubItems(3) = rsPaciente("ent_mat")
lst.SubItems(4) = rsPaciente("esc_mat")
rsPaciente.MoveNext
Wend
rsPaciente.Close
Set rsPaciente = Nothing
como faço pra imprimir no CrystalReport1 o que esta selecionado no ListView1