comdlg font box error (???)

[funkheads]

so i use the common dialog control to open a font box, right? well i have the action on a command button set as cmDialog.ShowFont which should show the font box, right? then i get ths error that says i have no fonts installed??? what the hell? i have plenty of fonts nstalled. do i have to set the path to the font directory? if so how do i do it. i have looked for every way possible to fix this damn error. am i missing something? am i stupid for missing it? any help would be greatly appreciated. THANK YOU!!!

--michael

[MicahCarrick]

You must first specify which fonts to show.

'cdlCFPrinterFonts for Printer Fonts
'cdlCFScreenFonts for Screen Fonts
'cdlCFBoth for both types

CommonDialog1.Flags = cdlCFBoth
CommonDialog1.Action = 4 'Same as ShowFont

------------------
Micah Carrick
Ordinary joe, only not named joe.
http://micah.carrick.com
micah@carrick.com
ICQ: 53480225

[funkheads]

jeez...it was that simple. thank you VERY much for your help. i really appreciate it. (i'm on a deadline trying to get a project finished)

--michael