Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Can use expression in Caption of check box?
Message
From
05/02/2013 11:32:29
Dragan Nedeljkovich (Online)
Now officially retired
Zrenjanin, Serbia
 
 
To
05/02/2013 09:45:52
General information
Forum:
Visual FoxPro
Category:
Other
Environment versions
Visual FoxPro:
VFP 9 SP1
Miscellaneous
Thread ID:
01565148
Message ID:
01565167
Views:
43
>Hi,
>
>I have check box in a container used in a grid. I want the check box caption say "Yes" if the field it is bound to is .T./1 or "No" if .F./0. First I tried to do it in the Refresh method of the check box but it never fires (probably because the checkbox is in the container). Then I tried to put an IIF() expression in the Caption field but all it does, is showing the expression.
>How would you do it?

Not sure if this works in a grid, but...
**************************************************
*-- Class:        gcheck (f:\rad\vfprc\generall.vcx)
*-- ParentClass:  checkbox
*-- BaseClass:    checkbox
*-- Time Stamp:   07/08/2006 07:13:01 PM
*
DEFINE CLASS gcheck AS checkbox

	Alignment = 0
	BackStyle = 0
	Caption = ("*******")
	*-- caption for .t.
	caption_yes = ("")
	*-- caption for .f.
	caption_no = ("")
	Name = "gcheck"


	PROCEDURE value_assign
		LPARAMETERS vNewVal
		*To do: Modify this routine for the Assign method
		if !empt(m.vNewVal) and !empt(this.caption_yes)
			this.caption=this.caption_yes
		endif
		if Empty(m.vNewVal) and !empt(this.caption_no)
			this.caption=this.caption_no
		endif
		this.refresh()
		THIS.Value = m.vNewVal
	ENDPROC


	PROCEDURE Init
		this.value=this.value
	ENDPROC


	PROCEDURE Click
		dodefault()
		this.refresh()
		nodefault
	ENDPROC


	PROCEDURE InteractiveChange
		this.value=this.value
	ENDPROC


ENDDEFINE
*
*-- EndDefine: gcheck
**************************************************

back to same old

the first online autobiography, unfinished by design
What, me reckless? I'm full of recks!
Balkans, eh? Count them.
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform