FiveTech Support Forums

Hola,

Podrian orientarme de como ir al final del texto?

Me explico, tengo un GET MEMO para mostrar productos conforme los voy seleccionando, me gustaria que siempre fuera visible el final de todo lo que le voy adicionando, y no he podido bajo ninguna de las siguientes formas.



Bueno, ahi está el ejemplo, saludos y espero su ayuda

Gracias de antemano

wmormar wrote:Hola,

Podrian orientarme de como ir al final del texto?

Me explico, tengo un GET MEMO para mostrar productos conforme los voy seleccionando, me gustaria que siempre fuera visible el final de todo lo que le voy adicionando, y no he podido bajo ninguna de las siguientes formas.

Code: Select all Collapse

STATIC cProducto,cVar
FUNCTION main()
 cProducto := SPACE(10)
 cVar := ""
 DEFINE DIALOG ....
  REDEFINE GET oGet1 VAR cProducto ID 101 OF oDlg UPDATE
  REDEFINE GET oGet2 VAR cVar ID 102 MEMO OF oDlg UPDATE
  REDEFINE BUTTON oBtn ID 201 ACTION adiciona() OF oDlg
 ACTIVATE DIALOG ...
RETURN NIL

FUNCTION adiciona()
 cVar += cProducto + CRLF
 oGet2:refresh()
 oGet2:GoBottom()
RETURN .t.

Bueno, ahi está el ejemplo, saludos y espero su ayuda

Gracias de antemano

Hola wmormar:

Prueba con esto:

oGet2:bGotFocus:={||oGet2:SetPos(Len(cVar)) }

Saludos,
Manuel

Manuel,

Antes que nada gracias por responder.

Es un Multiget ReadOnly.

Además no tiene TABSTOP.

Me interesa que desde otros GETS, pues ese nunca tendrá el foco, pueda moverlo segun mis necesidades.

Por ejemplo a una linea específica o al final.

Espero haberme explicado

Saludos y gracias de nuevo