DUVIDAS - COMECANDO A USAR O CRVIEWER

FUTURA 10/05/2006 08:50:03
#145871

depois de muita luta, e ajuda de amigos aqui do fórum, consegui colocar o crviewer na aplicação, agora estou com algumas duvidas iniciais, que são:

1) ele substitui totalmente o componente crystl32.ocx ?

2) no crystl32.ocx tinha o botão para selecionar a impressora, no crviewer não, pelo menos no 8.5 não tem, então como fazer para implantar esta opção ?

3) deixei um formulario com o componente crviewer, e de qualquer tela do sistema passo o parametro, e informo qual relatório carregar, esta seria a opção mais correta ?

4) o motivo pelo qual quero usar o crviewer, é porque o selectionformula
em tabelas com muitos registros, fica lento demais, e o crviewer dizem que tem a opção de usar a sqlquery, só que testei e não funcionou, ou seja ele não respeita a sql, e trz a tabela toda, como resolver isto ?.

OBS: ABAIXO COMO FAÇO PARA EXIBIR O RELATÓ“RIO:

AQUI DE UM FORM QUALQUER CHAMANDO O FORM DO RELATÓ“RIO E PASSANDO PARAMETROS:

frmreport.Imprimir App.Path & "\listacli.rpt"
frmreport.Show 1

E AQUI O FORM QUE EXIBE O RELATÓ“RIO:

Public Sub Imprimir(Relatorio As String)
Dim Aplicacao As New CRAXDRT.Application
Dim Report As New CRAXDRT.Report
Set Report = Aplicacao.OpenReport(Relatorio)
Report.SQLQueryString ="select * from clientes where Tipo='Fornecedor'"
CRViewer1.ReportSource = Report
CRViewer1.ViewReport
End Sub

Private Sub Form_Resize()
CRViewer1.Top = 0
CRViewer1.Left = 0
CRViewer1.Height = ScaleHeight
CRViewer1.Width = ScaleWidth
End Sub