topic-29431

Posts: 458

Joined: Tue Mar 14, 2006 07:26 PM

Problema TGet Multiedit
Posted: Tue Oct 14, 2014 04:37 PM

Hola,

He estado buscando en el foro y aunque lo hago así, en un TGet multilinea desde recursos, no me funciona CTRL+RETURN para saltar a la siguiente línea.

Es decir, salta a la siguiente línea, pero, cuando pulso una tecla para continuar escribiendo, vuelve a la posición donde estaba cuando le pulsé CTRL+RETURN.

Esta es mi definición del .RC con ResEdit, he probado varias combinaciones y todas hacen lo mismo.

Code (fw): Select all Collapse

LANGUAGE LANG_NEUTRAL, SUBLANG_NEUTRAL
FAMILIANUEVA DIALOG 60, 44, 368, 178
STYLE DS_3DLOOK | DS_MODALFRAME | DS_SETFONT | WS_CAPTION | WS_POPUP
EXSTYLE WS_EX_WINDOWEDGE
CAPTION "Añadir nuevo"
FONT 7, "Trebuchet MS"
{
    LTEXT           "...", 1, 44, 24, 286, 9, NOT WS_GROUP | SS_LEFT, WS_EX_LEFT
    CONTROL         "", 116, "Tbitmap", 0x50000000, 8, 11, 29, 21, 0x00000000
    EDITTEXT        110, 120, 49, 153, 12, 0, WS_EX_LEFT
    EDITTEXT        104, 46, 81, 268, 70, WS_VSCROLL | ES_MULTILINE | ES_WANTRETURN, WS_EX_LEFT         -----------------> Este es el Control Multiedit
    PUSHBUTTON      "&Añadir", 113, 235, 160, 61, 14, 0, WS_EX_LEFT
    PUSHBUTTON      "&Cancelar", 114, 302, 160, 61, 14, 0, WS_EX_LEFT
    LTEXT           "Concepto:", 105, 46, 71, 55, 9, NOT WS_GROUP | SS_LEFT, WS_EX_LEFT
    RTEXT           "Nombre:", 109, 39, 50, 74, 9, NOT WS_GROUP | SS_RIGHT, WS_EX_LEFT
    GROUPBOX        "", 350, 2, 2, 360, 155, 0, WS_EX_LEFT
    LTEXT           "Rama a la que pertenece", 101, 43, 12, 200, 9, NOT WS_GROUP | SS_LEFT, WS_EX_LEFT
}

Y en el código fuente:

Code (fw): Select all Collapse

Local  cComenta := Space(200)
.......

REDEFINE GET oGet2 VAR cComenta ID 104 OF oDlgMant

Un Saludo,

Joaquín Martínez

Rick Lipkin

Posts: 2706

Joined: Fri Oct 07, 2005 01:50 PM

Re: Problema TGet Multiedit
Posted: Tue Oct 14, 2014 05:48 PM

Joaquín

Try your Get by adding the MEMO indicator :

Code (fw): Select all Collapse

REDEFINE GET oGet2 VAR cComenta MEMO ID 104 OF oDlgMant

Rick Lipkin

karinha

Posts: 8515

Joined: Tue Dec 20, 2005 07:36 PM

Re: Problema TGet Multiedit
Posted: Tue Oct 14, 2014 06:02 PM

Mira se ayuda:

Code (fw): Select all Collapse

CARTA DIALOG 103, 75, 387, 178
STYLE DS_ABSALIGN | DS_MODALFRAME | WS_POPUP | WS_VISIBLE | WS_CAPTION | WS_SYSMENU | WS_THICKFRAME
CAPTION "CAPTION"
FONT 8, "MS Sans Serif"
{
 EDITTEXT 217, 10, 40, 367, 70, ES_MULTILINE | WS_BORDER | WS_VSCROLL | WS_TABSTOP
 PUSHBUTTON "&Salida", 992, 168, 151, 50, 14
 CONTROL "0", 220, "EDIT", ES_CENTER | ES_MULTILINE | WS_CHILD | WS_VISIBLE, 497, 33, 20, 12
}


   REDEFINE GET oGet[17] VAR wTEXTO MULTILINE ID 217 OF oDlg  ;
            COLOR CLR_BLUE, CLR_WHITE UPDATE FONT oFont

Salu2

João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341

jmartial

Posts: 458

Joined: Tue Mar 14, 2006 07:26 PM

Re: Problema TGet Multiedit
Posted: Tue Oct 14, 2014 06:13 PM

Rick,

oK! Perfect.

Thank you,

Un Saludo,

Joaquín Martínez

FiveTech Support Forums

Continue the discussion