my answer was an uninformed one, I agree! :)
I like this approach much better!
On Tue, 29 May 2001 12:17:18 -0700
"Piske, Harald" <[EMAIL PROTECTED]> mentioned:
Harald.Piske> Actually, Morbus' approach is the better choice, if you don't
mind my saying
Harald.Piske> so. While simply getting the text and setting the appended text
basically
Harald.Piske> works (btw: even $RE->{-text} .= $newText; would do), what
happens is that
Harald.Piske> the whole field gets refilled and redrawn, using a lot of
resources for
Harald.Piske> nothing. With a couple of hundred lines this may cause annoying
flicker,
Harald.Piske> plus it shifts the scroll bar back to the top. Selecting
"nothing" past the
Harald.Piske> end of the contents and replacing the selection is the way to "go
by the
Harald.Piske> book", so to speak.
Harald.Piske>
Harald.Piske> $RE->Select (1e9, 1e9);
Harald.Piske> $RE->ReplaceSel ($newText);
Harald.Piske>
Harald.Piske> With a scrollable textfield this would also have the nice
side-effect of
Harald.Piske> scrolling the new line into view. This does not work for richedit
fields as
Harald.Piske> of 0.0.558 - there was a lengthy trail on this list about a
work-around.
Harald.Piske> Bottom line, if you don't need text formatting, use a standard
multiline
Harald.Piske> textfield instead of a richedit, it makes life easier.
Harald.Piske>
Harald.Piske> Sorry for bugging in
Harald.Piske> Have fun,
Harald.Piske> Harald
Harald.Piske>
Harald.Piske> | -----Original Message-----
Harald.Piske> | From: Anthony George [mailto:[EMAIL PROTECTED]
Harald.Piske> | Sent: Tuesday, May 29, 2001 11:59
Harald.Piske> | To: [email protected]
Harald.Piske> | Subject: Re: [perl-win32-gui-users] Appending to RichEdit?
Harald.Piske> |
Harald.Piske> |
Harald.Piske> | Get the text, append, send it out:
Harald.Piske> | my $previousText=$RE->Text();
Harald.Piske> | $RE->Text($previusText.$newText);
Harald.Piske> |
Harald.Piske> |
Harald.Piske> | On Tue, 29 May 2001 13:45:25 -0400
Harald.Piske> | "Dave" <[EMAIL PROTECTED]> mentioned:
Harald.Piske> |
Harald.Piske> | dave> This seems like it should be pretty easy, but I can't
Harald.Piske> | figure out how to
Harald.Piske> | dave> add text to a richedit window after the text that is
Harald.Piske> | already there.
Harald.Piske> | dave>
Harald.Piske> | dave> I need to be able to continually add lines to the
Harald.Piske> | window, from different
Harald.Piske> | dave> sources (from the clipboard , textfields / buttons ),
Harald.Piske> | then the user
Harald.Piske> | dave> needs to be able to edit it before sending it to print.
Harald.Piske> | dave>
Harald.Piske> | dave> The richedit module works really well, only I can only
Harald.Piske> | seem to add text
Harald.Piske> | dave> to it with
Harald.Piske> | dave>
Harald.Piske> | dave> $RE->Text("$data");
Harald.Piske> | dave>
Harald.Piske> | dave> Everytime I do this it replaces the existing text. Is
Harald.Piske> | there a way to
Harald.Piske> | dave> append to the existing text instead( starting on a new
line )?
Harald.Piske> | dave>
Harald.Piske> | dave> Thank you,
Harald.Piske> | dave> Dave
Harald.Piske> | dave>
Harald.Piske> | dave>
Harald.Piske> | dave>
Harald.Piske> | dave> _______________________________________________
Harald.Piske> | dave> Perl-Win32-GUI-Users mailing list
Harald.Piske> | dave> [email protected]
Harald.Piske> | dave>
http://lists.sourceforge.net/lists/listinfo/perl-win32-gui-users
Harald.Piske> |
Harald.Piske> | <sig> Anthony George <[EMAIL PROTECTED]> Systems Engineer.
Harald.Piske> | Do your technical services need medical attention? We can
Harald.Piske> | help. EMSTS, LLC.
Harald.Piske> | 800-304-8269 231-720-1600 http://www.emsts.com </sig>
Harald.Piske> |
Harald.Piske> |
Harald.Piske> |
Harald.Piske> | _______________________________________________
Harald.Piske> | Perl-Win32-GUI-Users mailing list
Harald.Piske> | [email protected]
Harald.Piske> | http://lists.sourceforge.net/lists/listinfo/perl-win32-gui-users
Harald.Piske> |
Harald.Piske>
Harald.Piske> _______________________________________________
Harald.Piske> Perl-Win32-GUI-Users mailing list
Harald.Piske> [email protected]
Harald.Piske> http://lists.sourceforge.net/lists/listinfo/perl-win32-gui-users
<sig> Anthony George <[EMAIL PROTECTED]> Systems Engineer.
Do your technical services need medical attention? We can help. EMSTS, LLC.
800-304-8269 231-720-1600 http://www.emsts.com </sig>
