Page 1 of 1

Entering Text in Memo Field : Format Get

Posted: Thu Nov 10, 2005 5:15 am
by Milan Mehta
Hi,

I am using Jun-2005 build. When I try to use Format Get on a memo filed with Vertical Scroll bar enabled, when the scroll bar becomes active the cursor appears one line above where it should be. However the typed character appear exactly where it should. But the user get confused when typing.

Has anybody faced this problem ? What is the way out ?

TIA
Milan.

Posted: Thu Nov 10, 2005 8:45 am
by Antonio Linares
Milan,

We have just tried samples\TestMemo.prg and it works ok. Could you please check it there ?

What do you mean for "Format Get" ?

Posted: Fri Nov 11, 2005 4:42 am
by Milan Mehta
Antonio Linares wrote:Milan,

We have just tried samples\TestMemo.prg and it works ok. Could you please check it there ?

What do you mean for "Format Get" ?
Hello Antonio,

Please try the following example. Please try to delete character pressing Backspace key after Vertical scroll bar has beccome active i.e. you have entered characters more than that can fit into that visible space.

I hope I am able to convey my difficulty.

With best regards,

Milan..

-------------------------Prg-----------------------------
# include "fivewin.ch"
# include "fget.ch"

PROCEDURE Main

LOCAL oDlg, oMiscInfo, cMiscInfo

DEFINE DIALOG oDlg RESOURCE "FGET"

REDEFINE FORMAT GET oMiscInfo VAR cMiscInfo ID 101 OF oDlg
ACTIVATE DIALOG oDlg

return
------------------------End Prg--------------------------
------------------------Rc File---------------------------
#define IDC_EDIT1 101

FGET DIALOG 6, 15, 161, 127
STYLE WS_POPUP | WS_VISIBLE | WS_CAPTION | WS_SYSMENU | WS_THICKFRAME | WS_MINIMIZEBOX | WS_MAXIMIZEBOX
CAPTION "FORMAT GET TEST"
FONT 8, "MS Sans Serif"
{
EDITTEXT IDC_EDIT1, 25, 14, 82, 46, WS_BORDER | WS_VSCROLL | WS_TABSTOP
}
------------------------End Rc File-----------------------

Posted: Fri Nov 11, 2005 9:40 am
by Antonio Linares
Milan,

Your RC is not right, please change it this way:

CONTROL "", IDC_EDIT1, "TFGet", WS_BORDER | WS_VSCROLL | WS_TABSTOP, 25, 14, 82, 46

instead of:

EDITTEXT IDC_EDIT1, 25, 14, 82, 46, WS_BORDER | WS_VSCROLL | WS_TABSTOP

Now it works ok.

Posted: Sat Nov 12, 2005 5:50 am
by Milan Mehta
Antonio Linares wrote:Milan,

Your RC is not right, please change it this way:

CONTROL "", IDC_EDIT1, "TFGet", WS_BORDER | WS_VSCROLL | WS_TABSTOP, 25, 14, 82, 46

instead of:

EDITTEXT IDC_EDIT1, 25, 14, 82, 46, WS_BORDER | WS_VSCROLL | WS_TABSTOP

Now it works ok.
Dear Antonio,

Yes it does. Thanks.

Milan.