Archivo por meses: Abril 2007

Controles nativos de Vista en Xailer

Vista introduce un nuevo tipo de control llamado CommandLink que se comporta como un botón estándar, pero pretende hacer más agradable la experiencia del usuario.

Veamos una imagen:

CommandLink

Se puede apreciar cómo el control muestra una imagen, un texto principal y una breve descripción de su cometido.

Para entender cómo funciona, nada mejor que un poco de código que crea un TCommandLink como el que se ve en la imagen anterior:

WITH OBJECT TCommandLink():New( oForm )
   :cText := "CommandLink"
   :cNote := "This is the new TCommandLink control"
   :lShield := .T.
   :Create()
END

En el archivo vistacommandlink.zip está todo el código fuente del control, tan sólo hay que compilarlo y añadir el OBJ al proyecto en el que se quiera utilizar.

Un saludo.