NAME

Tk::Font - a class for finding X Fonts

SYNOPSIS


use Tk::Font;


$font = $widget->Font(foundry => 'adobe', family => 'times', point => 120 );


$font = $widget->Font('*-courier-medium-r-normal-*-*');

DESCRIPTION


This module can be use to interrogate the X server what fonts are avaliable.

METHODS


Foundry\|( [ $val ] )


Family\|( [ $val ] )


Weight\|( [ $val ] )


Slant\|( [ $val ] )


Swidth\|( [ $val ] )


Adstyle\|( [ $val ] )


Pixel\|( [ $val ] )


Point\|( [ $val ] )


Xres\|( [ $val ] )


Yres\|( [ $val ] )


Space\|( [ $val ] )


Avgwidth\|( [ $val ] )


Registry\|( [ $val ] )


Encoding\|( [ $val ] )

Set the given field in the font name to $val if given and return the current or previous value

Name\|( [ $max ] )

In a list context it returns a list of all font names that match the fields given. It will return a maximum of $max names, or 128 if $max is not given.

In a scalar contex it returns the first matching name or undef

Clone\|( [ key => value, [ ...]] )

Create a duplicate of the curent font object and modify the given fields

AUTHOR

Graham Barr <Graham.Barr@tiuk.ti.com>

HISTORY

11-Jan-96 Initial version

COPYRIGHT

Copyright (c) 1995-1996 Graham Barr. All rights reserved. This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.