El comando OBJECT Get corner radius devuelve el valor actual del radio de la esquina para el objeto designado por el parámetro objeto. Este valor puede haber sido definido a nivel del formulario utilizando la propiedad radio de esquina o para el proceso actual con el comando OBJECT SET CORNER RADIUS.
El comando OBJECT Get corner radius puede utilizarse con los siguientes objetos de formulario:
- rectángulos
- entradas (sólo proyectos 4D)
- áreas de texto (sólo proyectos 4D)
Al pasar el parámetro opcional * indica que el parámetro objeto es un nombre de objeto (cadena). Si no pasa este parámetro, indica que el parámetro objeto es un campo o una variable. En este caso, se pasa una referencia de campo o variable en lugar de una cadena (campo o variable objeto únicamente).
Este comando devuelve el radio de esquinas redondeadas en píxeles.
Nota: el comando devuelve 0 cuando se aplica a un objeto que no soporta la propiedad radio de esquina.
El siguiente código puede añadirse a un método de un botón:
C_LONGINT($radius)
$radius:=OBJECT Get corner radius(*;"GreenRect")
OBJECT SET CORNER RADIUS(*;"GreenRect";$radius+1)