DLLS DO CRYSTAL REPORTS FOR VISUAL STUDIO
Citação::
Acho que deu certo:
O comando simples:
[txt-color=#0000f0]Dim cryRpt As New ReportDocument[/txt-color]
abre todos as DLL iniciais do crystal Reports
Nos testes que fiz um relatório que na primeira vez levava 35 segundos
e com o [txt-color=#0000f0]Dim cryRpt As New ReportDocument[/txt-color] no inicio do sistema levou 10 segundos para abrir o mesmo relatório
Agora o sistema demora para abrir por causa do carregamento das DLLS do Crystal.
Basta colocar [txt-color=#0000f0]Dim cryRpt As New ReportDocument[/txt-color] em uma thread para que o sistema não demore para abrir
http://www.cjsystem.com.br
___________________________________________________________________________4 Engenheiros entram em um carro, mas o carro não liga.
O engenheiro mecânico diz:
A ignição está quebrada.
O engenheiro elétrico diz:
A bateria morreu.
O engenheiro quimico diz:
Tem impurezas na gasolina
O engenheiro de TI diz:
Galera, tive uma ideia. Que tal, todos
sairem do carro e entrar denovo.
JCM0867,
eu declarei la em cima no imports.
Imports CrystalDecisions.CrystalReports.Engine
mais nao deu certo falou q ta invalido.
Dim cryRpt As New ReportDocument
e chamei no meu load do meu frmAguarde [Ô] cryRpt()
no meu caso. eu tenho o fromLogin. depois do login tenho um formAguarde, onde demonstro umas informações do meu sistema. ai depois disso passo para o Menu do sistema.
ficaria excelente nesse FormAguarde,
Citação:Private t1 As Thread
--------------
:
t1 = New Thread(AddressOf DllCrystal)
t1.Start()
:
------------------
Public Sub DllCrystal()
Dim cryRpt As New ReportDocument
End Sub
Até ele vai pra frente, mas se arrastando até que as DLL terminem de carregar
Tem como melhorar pra deixa-lo 100%
Depois de compilado (release) a thread passa despercebida não interfirindo na inicialização do sistema
Assunto resolvido
Todos aqui deram suas dicas e agradeço