in reply to Re: Understanding Tk::FontDialog?
in thread Understanding Tk::FontDialog?

Yeah that works great if I want to change the font values every time I launch the application but I need a way to store the changed values in plain text (non-hex) such as "Courier New" and font size "10" or something.

www.perlskripts.com

Replies are listed 'Best First'.
Re^3: Understanding Tk::FontDialog?
by keszler (Priest) on Aug 24, 2004 at 05:25 UTC
    Take a look at what $mw->fontActual($newfont) returns:

    "-family", "MS Sans Serif", "-size", -11, "-weight", "normal", "-slant", "roman", "-underline", 0, "-overstrike", 0

    You can easily write that to a file, read it back, and use it in the arguments to fontCreate or fontConfigure.