$richEdit->Text($richEdit->Text() . " Appended text\n");

##</code><code>##

$richEdit->Select (0, 20);
$richEdit->SetCharFormat(-color => "#0000FF");

##</code><code>##

my $font = new Win32::GUI::Font(
								-name => "Courier New",
								#-height => 16,
								-bold => 1,
);

$richEdit->Append(-text => " Appended text", -font => $font);