1X11Font(3) User Contributed Perl Documentation X11Font(3)
2
3
4
6 Tk::Font - a class for finding X Fonts
7
9 use Tk::X11Font;
10
11 $font = $widget->X11Font(foundry => 'adobe',
12 family => 'times',
13 point => 120
14 );
15
16 $font = $widget->X11Font('*-courier-medium-r-normal-*-*');
17
19 This module can be use to interrogate the X server what fonts are
20 avaliable.
21
23 Foundry( [ $val ] )
24 Family( [ $val ] )
25 Weight( [ $val ] )
26 Slant( [ $val ] )
27 Swidth( [ $val ] )
28 Adstyle( [ $val ] )
29 Pixel( [ $val ] )
30 Point( [ $val ] )
31 Xres( [ $val ] )
32 Yres( [ $val ] )
33 Space( [ $val ] )
34 Avgwidth( [ $val ] )
35 Registry( [ $val ] )
36 Encoding( [ $val ] )
37 Set the given field in the font name to $val if given and return the
38 current or previous value
39
40 Name( [ $max ] )
41 In a list context it returns a list of all font names that match the
42 fields given. It will return a maximum of $max names, or 128 if $max is
43 not given.
44
45 In a scalar contex it returns the first matching name or undef
46
47 Clone( [ key => value, [ ...]] )
48 Create a duplicate of the curent font object and modify the given
49 fields
50
52 Graham Barr <Graham.Barr@tiuk.ti.com>
53
55 11-Jan-96 Initial version
56
57 08-Nov-98 Renamed for Tk800.012
58
60 Copyright (c) 1995-1996 Graham Barr. All rights reserved. This program
61 is free software; you can redistribute it and/or modify it under the
62 same terms as Perl itself.
63
64
65
66perl v5.38.0 2023-07-21 X11Font(3)