It is already in there:
$ChatBox = $GameWindow->AddRichEdit(
-name => "ChatBox",
-left => 400,
-top => 5,
-width => 230,
-height => 330,
-disabled=> 1,
-addstyle=> WS_CHILD | WS_VISIBLE | ES_LEFT | ES_MULTILINE |
ES_AUTOVSCROLL | WS_VSCROLL | ES_READONLY,
-addexstyle=> WS_EX_CLIENTEDGE,
);
I don't know what I am doing wrong that makes it not work.
Jonathan Southwick
[EMAIL PROTECTED]
Technical & Network Services
Allegheny College, Meadville, PA 16335
(814) 332-2755
At 11/8/2001 03:11 PM, you wrote:
You might also try adding ES_AUTOVSCROLL to the RichEdit's -style This can
be problematic, though. As I recall, it refreshes the RichEdit's data every
time there's new data added. Of course, my memory ain't what it used to be,
so I may be way off... :)
> -----Original Message-----
> From: Morbus Iff [mailto:[EMAIL PROTECTED]
> Sent: 08 November 2001 14:53
> To: Jonathan Southwick; perl-win32-gui-users@lists.sourceforge.net
> Subject: Re: [perl-win32-gui-users] Putting cursor at end of RichEdit
>
>
> At 02:43 PM 11/8/01, Jonathan Southwick wrote:
> >I tried that and it does not scroll to the end of the
> RichEdit field, it
> >just places the cursor there. I even tried to add a
> SetFocus and that
> >doesn't help. Anyone else have any ideas?
>
> Did you try any of the rest in the script I pointed you to?
>
> # select our last line.
> $logbox->Select(999999,999999);
> $logbox->ReplaceSel("$message\n", 1);
> select(undef, undef, undef, 0.25);
>
> # autoscroll the log box.
> $logbox->SendMessage (0x115, 1, 0) while $message =~ /\n|$/g;
>
> This works perfectly in AmphetaDesk. An example of its operation:
>
> http://www.disobey.com/amphetadesk/images/ss-base-gui.jpg
>
> The above is a picture of a RichEdit that is automatically
> scrolled for each new message entered into it.
>
>
> --
> Morbus Iff ( softcore vulcan porn rulezzzzz )
> http://www.disobey.com/ && http://www.gamegrene.com/
> please me: http://www.amazon.com/exec/obidos/wishlist/25USVJDH68554
> icq: 2927491 / aim: akaMorbus / yahoo: morbus_iff / jabber.org: morbus
>
>
>
>
> _______________________________________________
> Perl-Win32-GUI-Users mailing list
> Perl-Win32-GUI-Users@lists.sourceforge.net
> https://lists.sourceforge.net/lists/listinfo/perl-win32-gui-users
>
_______________________________________________
Perl-Win32-GUI-Users mailing list
Perl-Win32-GUI-Users@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/perl-win32-gui-users
