Results 1 to 4 of 4

Thread: Fonts

  1. Jul 30th, 2000, 11:28 AM #1
    Zaphod64831
    Zaphod64831 is offline

    Thread Starter
    Hyperactive Member Zaphod64831's Avatar
    Join Date
    Mar 2000
    Posts
    268

    Question

    Does anyone know how to get a list of all the available fonts and place them all into a combobox?

    I also need to know how to insert a string at the cursor position in a text box.

    [Edited by Zaphod64831 on 07-30-2000 at 12:30 PM]
    Email: [email protected]

    Home Page: www.olemac.net/~hutch

    I'm bored, VERY bored, and I got bored with my sig. So I changed it to this.
    Reply With Quote Reply With Quote
  2. Jul 30th, 2000, 12:00 PM #2
    Guest
    Placing Fonts in a ComboBox:
    Code:
    For I = 1 To Screen.FontCount - 1
    Combo1.AddItem Screen.Fonts(I)
Next I
    Inserting a String at Cursor position of TextBox:
    Code:
    Text1.SelText = "NewString"
    Reply With Quote Reply With Quote
  3. Jul 30th, 2000, 12:04 PM #3
    Zaphod64831
    Zaphod64831 is offline

    Thread Starter
    Hyperactive Member Zaphod64831's Avatar
    Join Date
    Mar 2000
    Posts
    268
    OH! Now I see! Sorry but I didn't understand what Matthew Gates meant by his explanation of it.

    Thanks both
    Email: [email protected]

    Home Page: www.olemac.net/~hutch

    I'm bored, VERY bored, and I got bored with my sig. So I changed it to this.
    Reply With Quote Reply With Quote
  4. Jul 30th, 2000, 12:18 PM #4
    Guest
    You can add Printer fonts as well.

    Code:
    For i = 1 To Printer.FontCount - 1
    Combo1.AddItem Printer.Fonts(i)
Next i
    Reply With Quote Reply With Quote
« Previous Thread | Next Thread »

Posting Permissions

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

Forum Rules


Click Here to Expand Forum to Full Width