Print Preview ActiveX Active Users: 51 / Visits Today: 609
Highest Active Users: 81
Print Preview ActiveX
Home | Profile | Register | Active Topics | Members | Search | FAQ | RSS
 All Forums
 Print Preview
 Questions about Print Preview
 Print Preview Issue while closing Forms

Note: You must be registered in order to post a reply.
To register, click here. Registration is FREE!

Format Mode:
Format: BoldItalicizedUnderlineStrikethrough Align LeftCenteredAlign Right Horizontal Rule Insert HyperlinkInsert Email Insert CodeInsert QuoteInsert List

* Forum Code is ON
Smile [:)] Big Smile [:D] Cool [8D] Blush [:I]
Tongue [:P] Evil [):] Wink [;)] Clown [:o)]
Black Eye [B)] Eight Ball [8] Frown [:(] Shy [8)]
Shocked [:0] Angry [:(!] Dead [xx(] Sleepy [|)]
Kisses [:X] Approve [^] Disapprove [V] Question [?]

   Insert a File

Check here to subscribe to this topic.

T O P I C    R E V I E W
yJoshi Posted - 06/27/2014 : 11:25:45
Hello Everyone ....
I met one unique issue concerned with PrintPreview control though i believe i must be doing some mistake otherwise this control is fabulous.

here is my code which i tried to cut shot or simplified for easy understanding of developer ,....

Private Sub CmdPrintPages_Click()
pages = 6 'total pages assumed are 6
previewSetting ' setting call for 1st page
drawNumber ' data drawing for 1st page

'following same process for rest of the 5 pages
For i = 1 To pages
preview.EndDocument 'ending of document
End Sub

Private Sub previewSetting()

With preview
.PageSize = prPSA4
.Orientation = prORLandscape
.PageMarginLeft = "0.5 in"
.PageMarginRight = "0.5 in"
.PageMarginBottom = "0.5 in"
.PageMarginTop = "0.5 in"
.WindowState = prMaximized
.ShowBorder = True
End With

End Sub

Private Sub drawNumber()
Dim i As Integer
Me.MousePointer = vbHourglass
For i = 1 To 16000
preview.AddTextAt i
Me.MousePointer = vbDefault
End Sub

though it runs perfectly but the thing is while closing the form it takes more than expected time (approx 1 min) to get things back.

earlier i was using hexaview pro printing component (vp3260.ocx) which works like charm but it is obsolete component.

any body's help will be highly appreciated ......

Thanks in Advance
Yogesh (VB Developer)

Print Preview ActiveX © Mandix Go To Top Of Page
This page was generated in 0.05 seconds. Powered By: Snitz Forums 2000 Version 3.4.02