Re: Detail Height
- From: "Stephen Lebans" <ForEmailGotoMy.WebSite.-WWWdotlebansdot...@xxxxxxxxxxxx>
- Date: Tue, 27 Dec 2005 10:22:28 -0400
You are using a translation tool that is causing comprehension problems on
my side. I simply do not understand exactly what you are trying to do.
I think you are using code on my site to ouput text with mixed formatting.
Further you want to shrink the Text if there is too much to fit on one line?
FInally, you are using an Unbound TextBox that you will with CrLf's to set
the size of the Detail section?
To determine the height of the TextBox containing your modified string see:
http://www.lebans.com/textwidth-height.htm
TextHeightWidth.zip is a replacement for the Report object's TextWidth and
TextHeight methods. It is multiline aware and can work in both Report and
Form views. Includes a sample report to show you how to autosize individual
controls with different formatting on the same line to simulate RTF style
text.
History
Version 4.5: Increased accuracy of auto sizing for a ListBox.
Version 4.3: Added sample Form to demonstrate auto sizing for a ListBox.
Version 4.2: Added report to demonstrate auto sizing to mix text formatting
on one row.
Version 4.1: First Release that works!!!<grin>
Version 1.0: First Release
--
HTH
Stephen Lebans
http://www.lebans.com
Access Code, Tips and Tricks
Please respond only to the newsgroups so everyone can benefit.
"Jemsson" <Jemsson@xxxxxxxxxxxxxxxxxxxxxxxxx> wrote in message
news:134332EF-88BB-4B93-BD69-31F50C26A695@xxxxxxxxxxxxxxxx
> Hello
>
> I get Sample of Leban that show diffrent setting for the text on Report
> Such as "Lastname, Firstname"
> Well, I have module that will make few raw of post "strLast" when the text
> be more than 18.
>
> Which mean as this post example:
>
> strLast = "Inställningarna bör matcha de inställningar som
> nätverksadministratören eller Internet-leverantören angett."
>
> So the module will change the form of text and make raw inside it.
> And raw will not be so long raw as this:
>
> strLast = "Inställningarna bör & VbCr & matcha de inställningar som & VbCr
> &
> nätverksadministratören & VbCr & eller Internet-leverantören & VbCr &
> angett."
>
> Now the result after module looks as this:
>
> strLast = "Inställningarna bör
> matcha de inställningar som
> nätverksadministratören
> eller Internet-leverantören
> angett."
>
> And after this text will follow [Firstname] with diffrent option As Leban
> sample.
>
> Well, now when I print strLast, so Detail didn't understand How much
> Hieght
> needs to make space for [strLast] post. Because Detail know just TextBox
> hieght.
>
> And my question is: I nead calculate how many raw (VbCr) is on "strLast"
> and
> then make empty TextBox and give it Hieght to let Detail understand that
> on
> courrent post which needs more Hieght space.
>
> And my example code, do the hieght, but not on corrent post. Result view
> on
> next post.
>
> Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer)
> Dim Number, Words, TheRaw As Integer
>
> TheRaw = 0
> Number = Len(strLast) 'strLast data coms from VB print
>
> For Words = 1 To Number Step 1
> If Left(Mid(strLast, Words), 1) = vbCr Then
> TheRaw = TheRaw + 1
> End If
> Next Words
>
> If Not TheRaw = 0 Then
> Me.txtGrow.Height = 500 * TheRaw
> End If
> End Sub
>
> Do you have any ide how fix it ?
>
> Lots of thanks for reading my question.
>
.
- Follow-Ups:
- Re: Detail Height
- From: Jemsson
- Re: Detail Height
- References:
- Re: Detail Height
- From: Stephen Lebans
- Re: Detail Height
- From: Jemsson
- Re: Detail Height
- Prev by Date: Re: Summarizing records in one table that match a different table
- Next by Date: Re: Report works on one computer and not other
- Previous by thread: Re: Detail Height
- Next by thread: Re: Detail Height
- Index(es):
Relevant Pages
|
