Cambiar texto en checkbox

Cambiar texto en checkbox

Postby horacio » Sat Oct 13, 2018 10:26 pm

Colegas, he buscado en el foro y mirando la clase el único método que encontré fue

Code: Select all  Expand view

oChb[ 1 ] : Setext( "Texto" )
 


pero no funciona. Sé que podría enviarle un mensaje al objeto para este fin pero no tengo idea. Alguien sabe ? Muchísimas gracias

Saludos
horacio
 
Posts: 1362
Joined: Wed Jun 21, 2006 12:39 am
Location: Capital Federal Argentina

Re: Cambiar texto en checkbox

Postby Enrico Maria Giordano » Sun Oct 14, 2018 7:11 am

This is a working sample:

Code: Select all  Expand view
#include "Fivewin.ch"


FUNCTION MAIN( )

    LOCAL oDlg, oChk

    LOCAL lChk := .F.

    DEFINE DIALOG oDlg

    @ 1, 1 CHECKBOX oChk VAR lChk PROMPT "Test";
           SIZE 100, 13

    @ 3, 1 BUTTON "Change";
           ACTION oChk:SetText( "Changed!" )

    ACTIVATE DIALOG oDlg;
             CENTER

    ? lChk

    RETURN NIL


EMG
User avatar
Enrico Maria Giordano
 
Posts: 8512
Joined: Thu Oct 06, 2005 8:17 pm
Location: Roma - Italia

Re: Cambiar texto en checkbox

Postby horacio » Sun Oct 14, 2018 1:02 pm

Gracias Enrico, funciona!

SAludos
horacio
 
Posts: 1362
Joined: Wed Jun 21, 2006 12:39 am
Location: Capital Federal Argentina


Return to FiveWin para Harbour/xHarbour

Who is online

Users browsing this forum: No registered users and 48 guests