do u know better way of tracking CaretPos?

StoneColdCrazy · Jul 8, 2000

In TMemo or TRichEdit, when u write a text editor, for example u want to display the caret position in your status bar, the way I currently doing it is like this: // in my RichEdit->OnKeyDown event handler //----------------------------------------------- /*some params r missing*/ void __fastcall TMainForm::OnRichEditKeyDown(WORD& Key)   {     SendMessage(RichEdit->Handle, WM_KEYUP, Key, 0);   } // in my RichEdit->OnKeyUp event handler //------------------------------------------------ /*some params r missing*/ void __fastcall TMainForm::OnRichEditKeyUp(/**/)   {     StatusBar->Panels->Items[0]->Text =         String(++RichEdit->CaretPos.y) +         ":" +         String(++RichEdit->CaretPos.x);   } WM_KEYDOWN occurs when the key is held down, even when for a while.  WM_KEYUP occurs only when the key is released, so if u held down a key for a while many WM_KEYDOWN events will occur, but only one WM_KEYUP (at the end) when u released the key.  TRichEdit and TMemo update CaretPos after WM_KEYDOWN, but before WM_KEYUP.  So WM_KEYUP is the place to query CaretPos, and in onKeyDown event handler we send a message WM_KEYUP, so that TRichEdit update the carret and call OnkeyUp event handler.  This way we can track CaretPos event when the user holds down the key for a while... Is there any better way to do this?  ~~StonE~~

2ffat · Jul 10, 2000

Try this, it came from one of Borland's FAQs... For TMemo this code will work:     TPoint Point;     GetCaretPos(&Point);     DWORD both;     both = Memo1->Perform(EM_CHARFROMPOS, 0, MAKELPARAM(Point.x, Point.y));     int indexLine   = HIWORD(both);     int indexLength = LOWORD(both) - Memo1->Perform(EM_LINEINDEX, -1, 0);     indexLine++;     indexLength++;     char RowCol[10] = " ";     sprintf(RowCol, "%d:%d", indexLine, indexLength);     StatusBar1->Panels->Items[4]->Text = RowCol;       In TRichEdit, the previous code would produce an access violation when using EM_CHARFROMPOS. This code will work for TRichEdit:     TPoint Point;     GetCaretPos(&Point);     DWORD both = 0;     both = MAKELPARAM(Point.x, Point.y);     int indexLine = RichEdit1->Perform(EM_LINEFROMCHAR, -1, 0);     int indexLength = (LOWORD(both)/8) + RichEdit1->SelLength;     indexLength++;     indexLine++;     char RowCol[10] = " ";     sprintf(RowCol, "%d:%d", indexLine, indexLength);     StatusBar1->Panels->Items[4]->Text = RowCol; James P. Cottingham <a href=mailto: > </a> <a href=

http://www.ivcusa.com>International

Veneer Co., Inc.</a> All opinions are mine alone and do not necessarily reflect those of my employer.

StoneColdCrazy · Jul 10, 2000

2ffat, Where do I stick that code?  I mean which event handler. And where did u found that userful FAQ?

2ffat · Jul 10, 2000

You should be able to put that code just about anywhere. I would put it in whatever event updates TMemo.     If you join the "Community" (it's free) at <A HREF="

http://www.borland.com"

TARGET="_new">

http://www.borland.com</A>

or <A HREF="

http://www.inprise.com"

TARGET="_new">

http://www.inprise.com</A>

, you can do a search. For example, I can do a search for TMemo and Caret to see the FAQ I got this from. James P. Cottingham <a href=mailto: > </a> <a href=

http://www.ivcusa.com>International

Veneer Co., Inc.</a> All opinions are mine alone and do not necessarily reflect those of my employer.

Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

do u know better way of tracking CaretPos?

StoneColdCrazy

Programmer

2ffat

Programmer

StoneColdCrazy

Programmer

2ffat

Programmer

Similar threads

Part and Inventory Search

Sponsor