CENTRALIZAR DATAREPORT
Alguém saberia porque esta função não funciona?
Dá erro nesta linha:
Dsr.width
Tenho a mesma Função, porém para centralizar Forms.
E funciona de boa.
Se eu colocar este código direto no click do botão que chama o DataReport, funciona. Mas chamando-a de uma função não rola.
Alguém tem uma explicação pra isto.
Até mais,
Guardião!
Public Function CenterReport(Dsr As DataReport)
Dim strLeft As String
Dim strTop As String
strLeft = (MDIForm1.ScaleWidth - Dsr.width) / 2
strTop = (MDIForm1.ScaleHeight - Dsr.Height) / 2
'// MsgBox ("strLeft: " & strLeft & " // strTop: " & strTop)
'Me.Top = (Screen.Height / 2) - (Me.Height / 2)
'Me.Left = (Screen.width / 2) - (Me.width / 2)
strLeft = (Screen.width / 2) - (Dsr.width / 2)
strTop = (Screen.Height / 3) - (Dsr.Height / 3)
Dsr.Left = strLeft
Dsr.Top = strTop
End FunctionDá erro nesta linha:
Dsr.width
Compile Error:
Method or data member not foundTenho a mesma Função, porém para centralizar Forms.
E funciona de boa.
Se eu colocar este código direto no click do botão que chama o DataReport, funciona. Mas chamando-a de uma função não rola.
Alguém tem uma explicação pra isto.
Até mais,
Guardião!
Acredito que não funcione porque a função deve rodar ao abrir o DataReport.
é que a função centraliza antes da exibição do Relatório. Depois de aberto, ela fica inoperante, dispicienda.
Faça uma chamada dela dentro do evento Initialize do DataReport.
é que a função centraliza antes da exibição do Relatório. Depois de aberto, ela fica inoperante, dispicienda.
Faça uma chamada dela dentro do evento Initialize do DataReport.
Tópico encerrado , respostas não são mais permitidas