Scrolling a rich text box

[Andrew Peacock 0]

Hi all,

I'm using a rich text edit box as defined here:

$editRichText = ObjCreate("RICHTEXT.RichtextCtrl.1")

I'm trying to get the text to scroll so that the highlighted text is roughly in the middle of the box. Has anyone done this before and can point a way?

Regards,

Andy

[kjactive 1]

Hallo Andrew

something like this

With $ComponetPool
   .SelStart = 0
   DllCall("user32.dll","long","SendMessage","hwnd",.Hwnd,"int",$EM_LINESCROLL,"int",0,"int",$iLines)
EndWith

This will scroll the component int $ilines from top

This post should actually have been listed in ActiveX/Com support...

kjactive

Edited January 3, 2008 by kjactive

[Andrew Peacock 0]

Thanks kjactive, that should help. I must confess, I'd not actually noticed the Activex/COM forum before :-)

Regards,

Andy

Hallo Andrew

something like this

With $ComponetPool
   .SelStart = 0
   DllCall("user32.dll","long","SendMessage","hwnd",.Hwnd,"int",$EM_LINESCROLL,"int",0,"int",$iLines)
EndWith

This will scroll the component int $ilines from top

This post should actually have been listed in ActiveX/Com support...

kjactive