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.