FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour TButtonBmp ayuda
Posts: 111
Joined: Sun Aug 13, 2006 07:28 PM

TButtonBmp ayuda

Posted: Wed Jan 23, 2008 12:18 AM

tengo el siguiente problema, tengo un ejemplo simple y ya he revisado en el foro documentacion pero nada que he encontrado, uso la classe TButtonBmp, tengo un get que tiene un valid, pero el botton no me deja salir por la validacion que hago ya le puse la clasula CANCEL y aun asi no me deja

dejo el codigo

 REDEFINE VGet    oGets[3] VAR nGets[3]   ID 113 OF oDlg VALID( DNotas() )

 REDEFINE BUTTONBMP ID 111 OF oDlg PROMPT "&Cerrar"     ACTION oDlg:End()  BITMAP "CERRAR" CANCEL
Posts: 44162
Joined: Thu Oct 06, 2005 05:47 PM

TButtonBmp ayuda

Posted: Wed Jan 23, 2008 09:12 AM
Aqui tienes un ejemplo funcionando correctamente:
#include "FiveWin.ch"

function Main()

   local oDlg, cName := Space( 20 )

   DEFINE DIALOG oDlg

   @ 1, 2 GET cName VALID .F.

   @ 3, 8 BUTTONBMP PROMPT "Salir" CANCEL SIZE 50, 10 ACTION oDlg:End()

   ACTIVATE DIALOG oDlg CENTERED

return nil

Por favor, acostumbraros a proporcionar un ejemplo así, pequeño y autocontenido, para poder dar soporte técnico rapidamente, gracias
regards, saludos

Antonio Linares
www.fivetechsoft.com

Continue the discussion