(ichimunki) Re x 3: Windows GUI programs in Perl

I just saw your other post and realized this may be a large part of what you're dealing with.

But aren't most of those characters (like math, arrows, and TM) available in regular fonts?

For reference:

#!/usr/bin/perl -w 
use strict;

use Tk;

my $mw = MainWindow->new();
my $text = 
    $mw->Text()->
    pack( -expand => 1, -fill => 'both' );

for my $x (0..255) {
    $text->insert( 'end', chr($x) );
}

MainLoop;
[download]

Obviously the Unicode stuff will need to mature somewhat. But if you are using this all from within Perl, maybe there is a way to cope for now?

Comment on (ichimunki) Re x 3: Windows GUI programs in Perl Download Code

Replies are listed 'Best First'.

Re: (ichimunki) Re x 3: Windows GUI programs in Perl
by John M. Dlugosz (Monsignor) on Jul 03, 2001 at 22:33 UTC

A font will contain multiple encoding vectors, which map the character ordinal to a glyph (which has some internal ID). Latin-1, Latin-2, etc. may all be present in the same font file.

The characters I'm interested in, ultimatly, are not in that Latin-1 range. That was just a simple test.

I'm thinking the way to cope for now is to access the window handle and call SetWindowText directly, to draw the button faces. But my proof-of-concept is doing something funny...

—John

[reply]


"be consistent"
	PerlMonks