Code: Select all
oChb[ 1 ] : Setext( "Texto" )
Saludos
Code: Select all
oChb[ 1 ] : Setext( "Texto" )
Code: Select all
#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