Justificar RichText usando USER32

[Ceone]

Buenas amigos de AMSSpecialist os traigo una pequeña función para justificar RichText usando user32, nada del otro mundo... la encontré mirando en mi ya habitual foro de ru-board, aquí os dejo un pequeño ejemplo que he echo y el script, espero que lo disfrutéis!

Script:

local WM_USER = 0x400; 
local EM_SETTYPOGRAPHYOPTIONS = WM_USER + 202; 
local TO_ADVANCEDTYPOGRAPHY = 1; 
local hWnd = RichText.GetProperties("RichText1").WindowHandle; 
DLL.CallFunction("user32.dll", "SendMessageA", hWnd..","..EM_SETTYPOGRAPHYOPTIONS..","..TO_ADVANCEDTYPOGRAPHY..","..TO_ADVANCEDTYPOGRAPHY, DLL_RETURN_TYPE_LONG, DLL_CALL_STDCALL); 
 
RichText.SetParagraphFormat("RichText1", {Alignment = PFA_JUSTIFY});

Descarga:
RichText PFA_JUSTIFY.apz

[abood1987]

very very good

thanks  ceone

[carsonzillo]

mOOOLA tioo es de lo mejor que he visto con el eterno problema de justificar el texto rtf

[kummersco]

Hola,


Excelente, muchas gracias,

Alguien sabe cómo puedo deshabilitar la selección de texto en un richtext?

Muchas gracias