Usted quiere definir la alineación horizontal de un área 4D Write Pro al centro:
Case of
:(Form event code=On Clicked) OBJECT SET HORIZONTAL ALIGNMENT(*;"myObject";Align center)
hAlignLeft:=0 //almacenar la propiedad para la siguiente visualización hAlignRight:=0 End case