Steve Leban's RTF2 control & printing

Pascal Hagedorn

I downloaded Steve Leban's RTF2 control and it shows me the report as
wanted.

The Problem is, if i want to print it, it comes a PopUp where it says
"properties write protected" (german: "Eigenschaft ist schreibgeschützt")
and then i have to complete kill access to continue, unfortunately the
report wasnt printed.

Thats the code for the "format" of the RTFControl2 of the report which
is -IMHO- producing the malfunction. Is it maybe the name "RTFControl2"?

Private Sub Detailbereich_Format(Cancel As Integer, FormatCount As Integer)
Dim Height As Integer
Me.RTFControl2.Object.RTFtext = ""
Me.RTFControl2.Object.RTFtext = Me.RTFParagraph
Me.RTFControl2.Requery
Height = Me.RTFControl2.Object.RTFheight
If Height 0 Then
If Height < 32000 Then
Me.RTFControl2.Height = Height
End If
End If
Me.Section(acDetail).Height = Me.RTFControl2.Height + Me.RTFControl2.Top

If Me.RTFControl2.Object.RTFheight 0 Then
If Me.RTFControl2.Object.RTFheight < 32000 Then
Me.RTFControl2.Height = Me.RTFControl2.Object.RTFheight
End If
End If

Me.RTFControl2.RTFtext = Me.RTFControl2.RTFtext
End Sub

Whats wrong with that :) or with me ;) ...

Please tell me if you need further information! Thanks!

Mar 21 '07 #1

Subscribe Post Reply

3111

Stephen Lebans

WHy did you change the sample code found in the MDB you downloaded? You
don't call the Access parent control's Requery method.

Why don't you simply bind the RTF2 control to your field/control named
Me.RTFParagraph instead of setting the RTFText property programmatically at
run time?

--

HTH
Stephen Lebans
http://www.lebans.com
Access Code, Tips and Tricks
Please respond only to the newsgroups so everyone can benefit.
"Pascal Hagedorn" <da**************@web.dewrote in message
news:et**********@news.uni-kl.de...

>I downloaded Steve Leban's RTF2 control and it shows me the report as
wanted.

The Problem is, if i want to print it, it comes a PopUp where it says
"properties write protected" (german: "Eigenschaft ist schreibgeschützt")
and then i have to complete kill access to continue, unfortunately the
report wasnt printed.

Thats the code for the "format" of the RTFControl2 of the report which
is -IMHO- producing the malfunction. Is it maybe the name "RTFControl2"?

Private Sub Detailbereich_Format(Cancel As Integer, FormatCount As
Integer)
Dim Height As Integer
Me.RTFControl2.Object.RTFtext = ""
Me.RTFControl2.Object.RTFtext = Me.RTFParagraph
Me.RTFControl2.Requery
Height = Me.RTFControl2.Object.RTFheight
If Height 0 Then
If Height < 32000 Then
Me.RTFControl2.Height = Height
End If
End If
Me.Section(acDetail).Height = Me.RTFControl2.Height +
Me.RTFControl2.Top

If Me.RTFControl2.Object.RTFheight 0 Then
If Me.RTFControl2.Object.RTFheight < 32000 Then
Me.RTFControl2.Height = Me.RTFControl2.Object.RTFheight
End If
End If

Me.RTFControl2.RTFtext = Me.RTFControl2.RTFtext
End Sub

Whats wrong with that :) or with me ;) ...

Please tell me if you need further information! Thanks!

Mar 21 '07 #2

Pascal Hagedorn

Thanks it worked out :) Sometimes you just need an objective observer %-)

"Stephen Lebans" <ForEmailGotoMy.WebSite.-WWWdotlebansdot...@linvalid.com>
schrieb im Newsbeitrag
news:os********************@ursa-nb00s0.nbnet.nb.ca...

WHy did you change the sample code found in the MDB you downloaded? You
don't call the Access parent control's Requery method.

Why don't you simply bind the RTF2 control to your field/control named
Me.RTFParagraph instead of setting the RTFText property programmatically
at run time?

--

HTH
Stephen Lebans
http://www.lebans.com
Access Code, Tips and Tricks
Please respond only to the newsgroups so everyone can benefit.
"Pascal Hagedorn" <da**************@web.dewrote in message
news:et**********@news.uni-kl.de...
>>I downloaded Steve Leban's RTF2 control and it shows me the report as
wanted.

The Problem is, if i want to print it, it comes a PopUp where it says
"properties write protected" (german: "Eigenschaft ist schreibgeschützt")
and then i have to complete kill access to continue, unfortunately the
report wasnt printed.

Thats the code for the "format" of the RTFControl2 of the report which
is -IMHO- producing the malfunction. Is it maybe the name "RTFControl2"?

Private Sub Detailbereich_Format(Cancel As Integer, FormatCount As
Integer)
Dim Height As Integer
Me.RTFControl2.Object.RTFtext = ""
Me.RTFControl2.Object.RTFtext = Me.RTFParagraph
Me.RTFControl2.Requery
Height = Me.RTFControl2.Object.RTFheight
If Height 0 Then
If Height < 32000 Then
Me.RTFControl2.Height = Height
End If
End If
Me.Section(acDetail).Height = Me.RTFControl2.Height +
Me.RTFControl2.Top

If Me.RTFControl2.Object.RTFheight 0 Then
If Me.RTFControl2.Object.RTFheight < 32000 Then
Me.RTFControl2.Height = Me.RTFControl2.Object.RTFheight
End If
End If

Me.RTFControl2.RTFtext = Me.RTFControl2.RTFtext
End Sub

Whats wrong with that :) or with me ;) ...

Please tell me if you need further information! Thanks!

Mar 27 '07 #3

by: Bruce Rusk | last post by:

I'm using Stephen Lebans' RTF2 control in a report, and have discovered what may be a slight bug in it. I have a lot of non-Western language (Chinese) text in my RTF field, and such records get...

Microsoft Access / VBA

RTF2 Control -> MS Word

by: Marion Neubauer | last post by:

Hi! I'm using the RTF2 Control from Lebans web site with MS Access 2000. It's working very good. Now i want to create a letter with the formated text of the RTF2 control in MS Word 2000, but it...

Microsoft Access / VBA

Copy Stephen Lebans RTF2 control in report

by: Phil Stanton | last post by:

I am trying to produce a program that will output any Access report to an editable Word document. So far it is working well but slowly with text boxes, labels, and lines. I now need to try to...

Microsoft Access / VBA

Leban's RTF2 Span Report Over Multiple Pages

by: dan.roffman | last post by:

Is there a way to span a report over multiple pages. I think you could do something like count the number of lines and if it exceeds a certain number, then put the rest of th text into another RTF...

Microsoft Access / VBA

using lebans rtf2

by: Sharper | last post by:

I have just downloaded lebans rtf2 which initially looks very interesting. Having a little trouble though in getting the RTF2 toolbar to appear on my own db although it is on the sample. I have...

Microsoft Access / VBA

RTF2

by: D Perron | last post by:

I am using the RTF2 activeX control from Stephen Leban's website and it works really well when there is one memo field. However, I cannot get it to work with multiple memo fields (I have 4). I...

Microsoft Access / VBA

Zoom RTF2

by: prami | last post by:

Hello I'm sure I do something wrong, but I don't know what ... In Form 1 I painted the RTF2 control and bound it to a memo field. Entering and changing data therein works fine. Now, based on...

Microsoft Access / VBA

Steve Leban's RTF Control;Justify Text Vertically?

by: vtashore | last post by:

I downloaded Steve Leban's RTF2 control and it works as advertised. Good news! After reading reference material on the RTF standard codes, I have been able to write update queries to universally...

Microsoft Access / VBA

Leban's PDF Generator

by: Tom | last post by:

Hi all: I'm having an odd problem with Stephen Leban's PDF creator. I'm trying to output to 11x17 sized paper. The PDF creator does its thing and when the PDF file opens, its at 800% zoom and...

Microsoft Access / VBA

Basic Javascript concepts

by: aa123db | last post by:

Variable and constants Use var or let for variables and const fror constants. Var foo ='bar'; Let foo ='bar';const baz ='bar'; Functions function $name$ ($parameters$) { } ...

Javascript

Batch import of multiple excel files into the database

by: ryjfgjl | last post by:

If we have dozens or hundreds of excel to import into the database, if we use the excel import function provided by database editors such as navicat, it will be extremely tedious and time-consuming...

Data Management

Merging data from multiple Excel files

by: ryjfgjl | last post by:

In our work, we often receive Excel tables with data in the same format. If we want to analyze these data, it can be difficult to analyze them because the data is spread across multiple Excel files...

Data Management

Migrating Website to Cloud - Emmanuel Katto

by: emmanuelkatto | last post by:

Hi All, I am Emmanuel katto from Uganda. I want to ask what challenges you've faced while migrating a website to cloud. Please let me know. Thanks! Emmanuel

General

Navigating the Data Structures and Algorithms (DSA)

by: BarryA | last post by:

What are the essential steps and strategies outlined in the Data Structures and Algorithms (DSA) roadmap for aspiring data scientists? How can individuals effectively utilize this roadmap to progress...

Algorithms / Advanced Math

Looking to do Android software development, any suggestions? Is flutter better?

by: nemocccc | last post by:

hello, everyone, I want to develop a software for my android phone for daily needs, any suggestions?

General

How to build RAID in BIOS?

by: Hystou | last post by:

There are some requirements for setting up RAID: 1. The motherboard and BIOS support RAID configuration. 2. The motherboard has 2 or more available SATA protocol SSD/HDD slots (including MSATA, M.2...

Computer Hardware

What is ONU?

by: marktang | last post by:

ONU (Optical Network Unit) is one of the key components for providing high-speed Internet services. Its primary function is to act as an endpoint device located at the user's premises. However,...

General

Maximizing Business Potential: The Nexus of Website Design and Digital Marketing

by: jinu1996 | last post by:

In today's digital age, having a compelling online presence is paramount for businesses aiming to thrive in a competitive landscape. At the heart of this digital strategy lies an intricately woven...

Online Marketing

Similar topics