[perl-win32-gui-users] RichEdit update

[Jonathan S. <jso...@al...>]

I have a routine that updates my richedit control but while it is getting 
updated the control does not refresh properly.  Here is my code:

sub UpdateResults {
    my ($text,$format) = @_;
    $MainWindow->Results->SetCharFormat(@{$ResultsTextFormat{$format}});
    $MainWindow->Results->Select(999999,999999);  # this puts the cursor at 
the end of the text
    $MainWindow->Results->ReplaceSel($text, 1);  # this replaces what's 
there with what I want
    $MainWindow->Results->Update();
    $MainWindow->Update();
    return;
}


Shouldn't this work?

Jonathan