Results 1 to 4 of 4

Thread: Fonts????

  1. #1

    Thread Starter
    Fanatic Member kinjalgp's Avatar
    Join Date
    Apr 2000
    Location
    India
    Posts
    535

    Arrow

    How to display all the fonts and available font sizes available on the users system into a combo box???

    Kinjal

  2. #2
    Guest
    You can use the Screen object, but I don't know about font sizes.

    Code:
    Private Sub Command1_Click()
        Dim i As Long
        
        For i = 0 To Screen.FontCount - 1
            Combo1.AddItem Screen.Fonts(i)
        Next i
    End Sub
    Sunny

  3. #3
    Monday Morning Lunatic parksie's Avatar
    Join Date
    Mar 2000
    Location
    Mashin' on the motorway
    Posts
    8,169
    Font sizes are irrelevant in this situation because the fonts can be displayed at any size (TrueType only). For bitmap fonts, it just snaps to the nearest size available for that font.
    I refuse to tie my hands behind my back and hear somebody say "Bend Over, Boy, Because You Have It Coming To You".
    -- Linus Torvalds

  4. #4

    Thread Starter
    Fanatic Member kinjalgp's Avatar
    Join Date
    Apr 2000
    Location
    India
    Posts
    535
    Thanks a lot!


    Kinjal

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •  



Click Here to Expand Forum to Full Width