FiveTech Support Forums

#include "fivewin.ch"

FUNCTION Main()
   Local oDlg, oImage

   DEFINE DIALOG oDlg FROM 0,0 TO 300,500 PIXEL TITLE "XIMAGE"
   oDlg:lTruePixel := .T.

   @ 50, 50 XIMAGE oImage SIZE 51, 51 FILENAME "c:\fwh\bitmaps\32x32\app.bmp" OF oDlg
   oImage:lTransparent := .T.
   oImage:cTooltip := "Mensaje Tooltip"

   ACTIVATE DIALOG oDlg

Return Nil

   REDEFINE IMAGE oImage ID 600 OF oDlg  //foto del empleado
   oImage:cTooltip := {"Hola"}