Você quer definir o alinhamento horizontal de uma área 4D Write Pro ao centro:
Case of
:(Form event code=On Clicked) OBJECT SET HORIZONTAL ALIGNMENT(*;"myObject";Align center)
hAlignLeft:=0 //armazenar a propriedade para a seguinte visualização hAlignRight:=0 End case