Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

Register Log in
  • Congratulations strongm on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

ShowFont = "No fonts installed"

Status
Not open for further replies.
JESTAR

JESTAR

Programmer
Feb 13, 2002
213
GB
When I try to bring u ShowFont, I get an error saying "No fonts installed. Go to Control Panel and the Fonts folder".

I have loads of fonts installed. I try commondialog1.initdir = "C\windows\fonts" but it still doesn't work.
 
Sort by date Sort by votes
hello JESTAR,

The showFont can 't be started without Flags.
You have to tell the commondialog wich fonts you want to use.

the following Flags are available:
cdlCFScreenFonts for the screen fonts
cdlCFPrinterFonts for the printerfonts
cdlCFBoth for screen- OR printerfonts
cdlCFWYSIWYG for screen- AND for printer

so add the following code in your form

commondialog1.Flags = cdlCFBoth + cdlCFEffects + cdlCFlimitSize

hopefully that will resolve your problem.
 
Upvote 0 Downvote
Status
Not open for further replies.

Similar threads

Niki_S
  • Locked
  • Question
Error in Excel/VB6 function: "Constant expression required"
2
Replies
31
Views
511
strongm
strongm
versof
  • Locked
  • Question
What is a "Public Object Module
Replies
3
Views
151
strongm
strongm
2009luca
  • Locked
  • Question
GET splitted value from node and sub node in treeview
Replies
1
Views
165
Andrzejek
Andrzejek
2009luca
  • Locked
  • Question
SET FOCUS on treeview node
Replies
6
Views
235
strongm
strongm
sal21
  • Locked
  • Question
No idea to export the msflexgrid in tabular output the complete calendar 1
Replies
6
Views
130
strongm
strongm

Part and Inventory Search

Sponsor

Back
Top