Error with the Common Dialog

Hi :) I'm trying to change the font in a Rich Text Box. So when I run a line like this

CommonDialog1.Action = 4

I get A msgBox Saying
"There are no fonts installed. Open the fonts folder from the Control Panel to install fonts."
then I press OK and it gives me a Run-time error '24574' no fonts exist Error, so I go to the fonts folder and there are plenty
of fonts.

Does any body have a solution or alternative?

Thanks all :)

Hi!
have u set the flag property of Commondialog?
if not assign the according value to this property and try.
Bye!
Jebs.

Thanks a lot :) :) :) :)

but wut dos the flag peoperdy do?

:cool: :cool: :cool: :cool:

It sets the various options for the Font Dialog, ie.

Which types of fonts to show; Screen, Printer or Both, etc.


------------------
Aaron Young
Analyst Programmer
[email protected]
[email protected]
Certified AllExperts Expert