Print Preview ActiveX Active Users: 40 / Visits Today: 87
Highest Active Users: 40
Print Preview ActiveX
Home | Profile | Register | Active Topics | Members | Search | FAQ | RSS
Username:
Password:
Save Password
Forgot your Password?

 All Forums
 Print Preview
 Bugs
 TextRotation Bug
 New Topic  Reply to Topic
 Printer Friendly
Author Previous Topic: Events Topic Next Topic: Bug in Email Dialog  

rgarito
Starting Member

USA
14 Posts

Posted - 01/07/2007 :  04:48:44  Show Profile  Reply with Quote
When printing text with TextRotation = 90, Print Preview forces the text to a new page after reaching approximately the center of the document. The strange part is that it displays fine on the screen. But, when it prints to the printer, it is wrong.

In the example code below, the first 3 "Test Text Here" lines print on the first page. The rest print on a new page. Although, on the screen, they are all right next to each-other.

Here's the sample code:

Preview1.ColorMode = prCMMonochrome
Preview1.PaperSize = prPSLetter
Preview1.PageMarginLeft = Preview1.ConvertToTwip(prCentimeter, 0.5)
Preview1.PageMarginRight = 0
Preview1.PageMarginTop = Preview1.ConvertToTwip(prCentimeter, 0.5)

Preview1.FontName = "Arial"
Preview1.FontSize = 10
Preview1.FontBold = False

Preview1.FontBold = True
Preview1.AddTextAt "PHYSICIAN OR INSTITUTION NAME", Preview1.ConvertToTwip(prCentimeter, 0.5), Preview1.ConvertToTwip(prCentimeter, 2.5), prALLeft, prASNone
Preview1.FontBold = False
Preview1.FontSize = 10
Preview1.AddTextAt "PHONE No:", Preview1.ConvertToTwip(prCentimeter, 0.5), Preview1.ConvertToTwip(prCentimeter, 5.5), prALLeft, prASNone
Preview1.AddTextAt "Organisms Are Listed In Order", Preview1.ConvertToTwip(prCentimeter, 0.5), Preview1.ConvertToTwip(prCentimeter, 14), prALLeft, prASLine
Preview1.AddTextAt "Of Predominance", Preview1.ConvertToTwip(prCentimeter, 0.5), , prALLeft, prASNone
Preview1.AddTextAt "S = Sensitive", Preview1.ConvertToTwip(prCentimeter, 0.5), Preview1.ConvertToTwip(prCentimeter, 16), prALLeft, prASLine
Preview1.AddTextAt "R = Not Sensitive", Preview1.ConvertToTwip(prCentimeter, 0.5), , prALLeft, prASLine
Preview1.AddTextAt "I = Intermediate Susceptability", Preview1.ConvertToTwip(prCentimeter, 0.5), , prALLeft, prASLine
Preview1.AddTextAt "MS = Moderately Sensitive", Preview1.ConvertToTwip(prCentimeter, 0.5), , prALLeft, prASLine

Preview1.DrawLine Preview1.ConvertToTwip(prCentimeter, 0.4), Preview1.ConvertToTwip(prCentimeter, 2.4), Preview1.ConvertToTwip(prCentimeter, 9), Preview1.ConvertToTwip(prCentimeter, 6), prLBBox: 'Address Box
Preview1.DrawLine Preview1.ConvertToTwip(prCentimeter, 0.4), Preview1.ConvertToTwip(prCentimeter, 14), Preview1.ConvertToTwip(prCentimeter, 20.1), Preview1.ConvertToTwip(prCentimeter, 14), prLBLine: 'Middle Line
Preview1.DrawLine Preview1.ConvertToTwip(prCentimeter, 0.4), Preview1.ConvertToTwip(prCentimeter, 18), Preview1.ConvertToTwip(prCentimeter, 20.1), Preview1.ConvertToTwip(prCentimeter, 18), prLBLine: 'Drug Line
Preview1.DrawLine Preview1.ConvertToTwip(prCentimeter, 0.4), Preview1.ConvertToTwip(prCentimeter, 2.4), Preview1.ConvertToTwip(prCentimeter, 20.1), Preview1.ConvertToTwip(prCentimeter, 25), prLBBox: 'Outside Box

For I = 7.6 To 20.1 Step 0.5
Preview1.DrawLine Preview1.ConvertToTwip(prCentimeter, I), Preview1.ConvertToTwip(prCentimeter, 14), Preview1.ConvertToTwip(prCentimeter, I), Preview1.ConvertToTwip(prCentimeter, 25), prLBLine: 'Drug Sep Lines
Next I

FOR I=7.7 to 20 STEP .5
Preview1.TextRotation = 90
Preview1.FontBold = True
Preview1.AddTextAt "Test Text Here", Preview1.ConvertToTwip(prCentimeter, I), Preview1.ConvertToTwip(prCentimeter, 17.9), prALLeft, prASNone
NEXT I

Preview1.EndDocument
Go to Bottom of Page

rgarito
Starting Member

USA
14 Posts

Posted - 01/23/2007 :  22:22:39  Show Profile  Reply with Quote
Any news on this?
Go to Bottom of PageGo to Top of Page
  Previous Topic: Events Topic Next Topic: Bug in Email Dialog  
 New Topic  Reply to Topic
 Printer Friendly
Jump To:
Print Preview ActiveX © Mandix Go To Top Of Page
This page was generated in 0.06 seconds. Powered By: Snitz Forums 2000 Version 3.4.02