RichTextBox Scrolling in VB6

How to create a "chat" style window. This sample duplicates the functionality of a window such as those in mIRC - where text is added to the bottom of a RichTextBox and is scrolled into view IF the scroll bar is at the bottom, but doesn't move the window when the user has scrolled up. 

About this post

Posted: 2017-08-17
By: BlackBeltVB
Viewed: 1,269 times

Categories

Visual Basic 6

Attachments

RTBSCROL.ZIP
Posted: 8/13/2017 11:24:29 AM
Size: 4,159 bytes

Requirements

Requires the Professional or Enterprise version of VB5 or VB6. 

This code originally appeared on BlackBeltVB.com, and has been republished here with the permission of Matt Hart.

Special Instructions

Uses the following API functions and messages:

• CallWindowProc
• GetScrollInfo
• LockWindowUpdate
• SetWindowLong
  • EM_REPLACESEL
  • EM_SCROLLCARET
  • EM_SETCHARFORMAT
  • WM_DESTROY
  • WM_PARENTNOTIFY
  • WM_SETFOCUS
  • WM_VSCROLL

Comments

No comments have been added for this post.

You must be logged in to make a comment.