RichEdit Justificar Texto
Enviado: 28 Ago 2015 22:10
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.
Con las siguientes funciones:asimoes escreveu:como eu faço para pegar a posicao onde está o cursor no richedit e restaurar para a mesma
posição depois.
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
Código: Selecionar todos
RichEditBox_SetSelRange ( hWndControl, aSelRange )
RichEditBox_GetSelRange ( hWndControl )