RichEdit Justificar Texto

[Claudio Soto]

Aquí te dejo un demo (.prg y .exe) y los archivos fuentes (.prg y .c) del control RichEditBox de HMG oficial, talvez puedan ser de utilidad.

[asimoes]

Olá Claudio,

Preciso de mais uma ajuda de você, como eu faço para pegar a posicao onde está o cursor no richedit e restaurar para a mesma
posição depois.

[Claudio Soto]

como eu faço para pegar a posicao onde está o cursor no richedit e restaurar para a mesma
posição depois.

Con las siguientes funciones:

Código: Selecionar todos

*-----------------------------------------------------------------------------*
Function RichEditBox_GetCaretPos ( hWndControl )
*-----------------------------------------------------------------------------*
Local aSelRange := RichEditBox_GetSelRange ( hWndControl )
Return aSelRange [2]


*-----------------------------------------------------------------------------*
Function RichEditBox_SetCaretPos ( hWndControl , nPos )
*-----------------------------------------------------------------------------*
Local aSelRange := { nPos, nPos}
   RichEditBox_SetSelRange ( hWndControl, aSelRange )
Return Nil

El codigo de las funciones en c:

Código: Selecionar todos

RichEditBox_SetSelRange ( hWndControl, aSelRange )
RichEditBox_GetSelRange ( hWndControl )

estan en el archivo c_richeditbox.c que adjunte en mi post anterior.

[asimoes]

Claudio,

Bom dia,

Funcionou perfeitamente!

:)Pos