Distortion in display of reports

[amit.mataghare]

Hi

I am am currently working on a MS Access database which contains reports. The display of reports on the server where I am working is correct. But when the same database when used from different server is able to generate reports with correct data , but with some distortion in the headings and columns used.

Some of the literals either in the beginning or in the end are missing in almost all the reports.

For exact issue. please refer to the document attached which contains some screenprints.

Can someone help me out with this ?

 

[vbaInet]

Expand the controls in design view.

 

[amit.mataghare]

The controls are displayed correctly on development server but not on test server.

I cannot make changes directly on test server. I have to get them corrected on development server and then copy the file on test server.

 

[vbaInet]

It's unavoidable. You would need to increase the widths of the controls. In the future expand your controls to their max.

 

[gemma-the-husky]

it may be due to a slightly different sized font - so the data as formatted is slightly too big to fill the field size. Even "bolding" controls makes a difference

unfotunately access doesnt have "shrink to fit" option like excel - and there is a lower limit of font sizes - so fitting stuff on a report is often tricky.

 

[amit.mataghare]

How can the size of font change with change in servers? (Both servers are similar in configuration apparently)

Its actually .mde file which is moved on the test server and it is a non-editible file. So, on the new server no one would have made the change.

 

[gemma-the-husky]

a report uses a print driver to format it for the printer. if its using a different printer/print driver it may display/print differently

 

[DCrake]

Example


The following example uses the Print method to display text on a report named Report1. It uses the TextWidth and TextHeight methods to center the text vertically and horizontally.

Visual Basic for Applications

Private Sub Detail_Format(Cancel As Integer, _
        FormatCount As Integer)
    Dim rpt as Report
    Dim strMessage As String
    Dim intHorSize As Integer, intVerSize As Integer

    Set rpt = Me
    strMessage = "DisplayMessage"
    With rpt
        'Set scale to pixels, and set FontName and
        'FontSize properties.
        .ScaleMode = 3
        .FontName = "Courier"
        .FontSize = 24
    End With
    ' Horizontal width.
    intHorSize = Rpt.TextWidth(strMessage)
    ' Vertical height.
    intVerSize = Rpt.TextHeight(strMessage)
    ' Calculate location of text to be displayed.
    Rpt.CurrentX = (Rpt.ScaleWidth/2) - (intHorSize/2)
    Rpt.CurrentY = (Rpt.ScaleHeight/2) - (intVerSize/2)
    ' Print text on Report object.
    Rpt.Print strMessage
End Sub