Solved

Printing bitmaps with RichTextBox

Posted on 1997-12-21
4
198 Views
Last Modified: 2011-10-03
The RichTextBox can display OLE objects and pictures but not print them. How can I print them?
0
Comment
Question by:aktis
  • 2
4 Comments
 
LVL 8

Accepted Solution

by:
mrmick earned 100 total points
ID: 1446424
You can use the PictureBox PaintPicture method.
0
 
LVL 4

Expert Comment

by:rantanen
ID: 1446425
mrmick, what does that mean????

The only reasonable way I have found around this problem is to use OLE automation or ShellExecute to print the contents. Not very nice, but works.

An example:

' To forms general section
Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long

'Eg to a button
Private Sub btnPrint_Click()
    Dim RTFString As Object
    Dim lResult As Long
   
    ' Creates a file to receive the RTF information from the control.
    Open "C:\RTFText.rtf" For Output As 1
   
    ' Places the RTF information from the control into the file and
    ' closes the file.
    Print #1, RichTextBox1.TextRTF
    Close 1
   
    ' Opens the new file in program associated with rtf-extension and prints it.
    lResult = ShellExecute(Me.hwnd, "print", "c:\rtftext.rtf", "", "c:\", 0&)
End Sub

0
 
LVL 1

Author Comment

by:aktis
ID: 1446426
I have a rtf text and inside the text is a picture.
0
 
LVL 8

Expert Comment

by:mrmick
ID: 1446427
Sorry, I figured that out with rantanen's help... at the first glance, I thought you were using a RichTextBox control to display pictures.  Give rantanen's suggestion a try.
0

Featured Post

Courses: Start Training Online With Pros, Today

Brush up on the basics or master the advanced techniques required to earn essential industry certifications, with Courses. Enroll in a course and start learning today. Training topics range from Android App Dev to the Xen Virtualization Platform.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Suggested Solutions

I’ve seen a number of people looking for examples of how to access web services from VB6.  I’ve been using a test harness I built in VB6 (using many resources I found online) that I use for small projects to work out how to communicate with web serv…
When trying to find the cause of a problem in VBA or VB6 it's often valuable to know what procedures were executed prior to the error. You can use the Call Stack for that but it is often inadequate because it may show procedures you aren't intereste…
Show developers how to use a criteria form to limit the data that appears on an Access report. It is a common requirement that users can specify the criteria for a report at runtime. The easiest way to accomplish this is using a criteria form that a…
This lesson covers basic error handling code in Microsoft Excel using VBA. This is the first lesson in a 3-part series that uses code to loop through an Excel spreadsheet in VBA and then fix errors, taking advantage of error handling code. This l…

815 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question

Need Help in Real-Time?

Connect with top rated Experts

11 Experts available now in Live!

Get 1:1 Help Now