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:
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.