FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin for Harbour/xHarbour MEMO and ENTER KEY
Posts: 6983
Joined: Fri Oct 07, 2005 07:07 PM
MEMO and ENTER KEY
Posted: Tue Apr 08, 2008 05:07 PM
Could someone please help me.
I can’t get ENTER key working in the memo filed.
What do I miss.
Thanks in advance
Otto
prg file
#INCLUDE "FiveWin.ch"

function Main()
   local oDlg, oText, cText := ""
   DEFINE DIALOG oDlg RESOURCE "Test"
   REDEFINE GET oText VAR cText MULTILINE ID 102 OF oDlg UPDATE
   ACTIVATE DIALOG oDlg CENTERED
return nil





rc-file

TEST DIALOG 61, 39, 194, 119
STYLE DS_MODALFRAME | WS_POPUP | WS_VISIBLE | WS_CAPTION | WS_SYSMENU
CAPTION "Testing Memo"
FONT 8, "Tahoma"
BEGIN
        CONTROL "", 102, "EDIT", ES_LEFT | ES_MULTILINE | WS_CHILD | WS_VISIBLE | WS_BORDER | WS_VSCROLL, 45, 31, 102, 51
END
Posts: 946
Joined: Thu Oct 06, 2005 07:05 PM
Re: MEMO and ENTER KEY
Posted: Tue Apr 08, 2008 05:40 PM

Otto

if you are using worksho check "want return" in win 3.1 styles

if not add ES_WANTRETURN to your rc file

HTH

Richard

http://www.cbati.com

Uestudio
Fwh 13.05 Harbour 3.2 MSVC 2013
Posts: 44
Joined: Mon Nov 12, 2007 01:50 PM
MEMO and ENTER KEY
Posted: Tue Apr 08, 2008 05:42 PM
I do well:

.prg
 REDEFINE GET oTextMemo  VAR mTextMemo  MEMO ID 104 OF oDlg UPDATE  //Observaciones


.RC
CONTROL "", 4009, "Edit", ES_MULTILINE|ES_AUTOHSCROLL|WS_HSCROLL|WS_VSCROLL|WS_BORDER|WS_TABSTOP, 8, 168, 608, 96


Is that?
Posts: 6983
Joined: Fri Oct 07, 2005 07:07 PM
MEMO and ENTER KEY
Posted: Tue Apr 08, 2008 06:05 PM

Hello Richard,
thank you for your help. Now with ES_WANTRETURN it is working.

Ermatica, I have exactly the same code as
you. This code is working in some applications for me but not
in my test.prg which I posted.

Thank you again for your help.
Regards,
Otto

Continue the discussion