common control

hi,

I´d like to use a font-selection-common-control; When I call ShowFont a message appears that no fonts are installed. Do I have to insert some flags in edit mode?

thanks, Seb

[diprima]

yes, it's like this

dialog1.flag = cdlCFScreenFonts Or cdlCFPrinterFonts Or cdlCFBoth 'your choice
dialog1.showfont




hope was of help
ivan

Great, thank you!

Seb