Notifikationer

Markér alle som læst Log ud

william_munny Nybegynder

10. marts 2005 - 15:38 Der er 7 kommentarer og
1 løsning

Sæt Label font størrelse udfra textlængde

Hej eksperter,
Jeg har en rapport som skal overholde nogle præcise mål. Problemet er bare at mængden af data som skal stå på rapporten variere. Så når mængden af data går op skal font størelsen gå ned. Hvordan gør man det?
Jeg har pt. en label hvor det variable data bliver smidt i, kan man på en eller anden måde udregne hvor meget texten fylder ved forskellige font størrelser. og herefter sammenligne med den maksimale label størelse.

Synes godt om

kabbak Professor

10. marts 2005 - 16:46 #1

du kan lege lidt med denne kode, den skal ind t rapport modulet

Private Sub Detaljesektion_Format(Cancel As Integer, FormatCount As Integer)
If Len(Me.Felt1) > 20 Then
Me.Felt1.FontSize = 100 / (Len(Me.Felt1) - 20)
End If

End Sub

Synes godt om

kabbak Professor

10. marts 2005 - 17:04 #2

En lidt bedre udgave

Private Sub Detaljesektion_Format(Cancel As Integer, FormatCount As Integer)
If Len(Me.Felt1) > 20 Then
A = Int(Len(Me.Felt1)) / 7
Me.Felt1.FontSize = 10 - A
Else
Me.Felt1.FontSize = 10
End If

End Sub

ret Felt1 til dit feltnavn

Synes godt om

Make IT Easy - Thomas Jepsen Praktikant

10. marts 2005 - 22:25 #3

Ethvert forsøg på at styre størrelsen på en label, kan jo kun kun virke, hvis man bruger propotional-skrift (hvor alle bogstaver fylder lige meget).
Et eks. er Courier New

Synes godt om

william_munny Nybegynder

11. marts 2005 - 09:38 #4

Kan godt se fidusen, men kunne man ikke på en eller anden måde beregne hvor mange karakterer der er plads til i lablet, så man istedet kunne sige noget alá
If len(me.felt1)>me.felt1.maxkaraktere() then
call beregnNyFontStørrelse()

Synes godt om

william_munny Nybegynder

09. maj 2005 - 10:52 #5

Har valgt en anden løsning.
Så kan folk ikke smide et svar som tak for hjælpen. :-)

Synes godt om

Make IT Easy - Thomas Jepsen Praktikant

09. maj 2005 - 11:25 #6

giv bare alle point til Kabbak....det var ikke så meget, jeg bidrog med ;o)

Synes godt om

kabbak Professor

09. maj 2005 - 14:04 #7

du får et svar, men kan du så ikke fortælle om den løsning du valgte, så vi også lærer noget. ;-))

Synes godt om

william_munny Nybegynder

09. maj 2005 - 14:10 #8

Ja det er ikke noget magisk, lader bare brugerne sætte fontstørrelsen manuelt. Så hvis det ikke kan være der, skal de reducere font størrelsen. Så må jeg løse det mere elegant en anden gang.

Synes godt om

Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Følg dette spørgsmål

Opret Preview

Access kurser

Dyk ned i databasernes verden på et af vores praksisnære Access-kurser

Se alle Access kurser

Flere spørgsmål fra Access kategorien

Titel	Indlæg	Oprettet	Seneste aktivitet
en word dotx fil stilles om til at blive gemt i skyen Af per2edb i Access	9	16/04/202620:11	21/04/202615:43
AI integreret i Access Af per2edb i Access	3	06/04/202610:42	06/04/202612:58
Autonummerering Af hlnviv i Access	2	06/03/202606:24	06/03/202607:48
stigende sortering på et Link felt Af hlnviv i Access	6	03/03/202613:18	04/03/202608:09
Access database udskriver ikke rammer korrekt Af Uvanga i Access	8	18/11/202500:24	18/11/202510:25

Se alle spørgsmål i kategorien Opret spørgsmål

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester

Alle kategorier på Eksperten

Seneste artiklerRSS