If fupdating tcontrol oalibtn tcontrolsender richedit1 paragraph alignment talignmentoalibtn tag