Re: [perl-win32-gui-users] richedit formatting

[Brian R. (G. H. School) <Row...@gr...>]

Thanks for that. Did some googling after your response and found the
solution:

.....
my $font = new Win32::GUI::Font(
    -name => "Courier New",
    -height => 10,
    -bold => 1,
);
....
my $report = $main->AddRichEdit (
	-name		=> 'Report',
      -pos		=> [10, 155],
      -size		=> [600,400],
      -disabled	=> 0,
      -vscroll	=> 1,
      -hscroll	=> 1,
      -font		=> $font,
);

Thanks for taking the time to reply.

Brian


-----Original Message-----
From: Geoffrey Spear [mailto:geo...@gm...] 
Sent: Tuesday, 3 June 2008 11:15 p.m.
To: Brian Rowlands (Greymouth High School)
Subject: Re: [perl-win32-gui-users] richedit formatting

On Tue, Jun 3, 2008 at 6:32 AM, Brian Rowlands (Greymouth High School)
<Row...@gr...> wrote:
> Is that the solution? If so, how do I set the font for the control
please?

I believe you want SetCharFormat, which is documented, or
SetParaFormat, which isn't but which sounds like it could be more
appropriate.

And while I haven't tested it, I know that tabbed columns don't line
up right in any other application using proportional fonts so I'm 99%
certain that you're right about that being your problem.