DEFINE CLASS MemoBox AS EditBox
PROCEDURE InteractiveChange
trcask603=LEN(ALLTRIM(this.value))
* Your original code below; it throws a Syntax error because
* you have an uneven number of double quotes and/or a missing
* plus (+) sign.
*thisform.label9.Caption="Description of project
("+ALLTRIM(STR(trcask603))+" size)" lines)"
* My similar code, below, works.
thisform.label9.Caption="Description of project
("+ALLTRIM(STR(trcask603))+" size lines)"
thisform.label9.Refresh
ENDPROC
ENDDEFINE
And in your original code above:
thisform.label9.Refresh
is actually incorrect. It should be:
thisform.label9.Refresh()
The code will run, at least in the IDE, at least on my computer in VFP 9 SP
1, at least for the moment. It should not run at all, though, and likely
won't in a compiled app or under other rather unpredictable circumstances,
including, perhaps, yours. I've been caught by that little weirdness
several times over the years.
Ken Dibble
www.stic-cil.org
_______________________________________________
Post Messages to: ProFox@leafe.com
Subscription Maintenance: http://mail.leafe.com/mailman/listinfo/profox
OT-free version of this list: http://mail.leafe.com/mailman/listinfo/profoxtech
Searchable Archive: http://leafe.com/archives/search/profox
This message:
http://leafe.com/archives/byMID/profox/5.2.1.1.1.20130605223323.0218f...@pop-server.stny.rr.com
** All postings, unless explicitly stated otherwise, are the opinions of the
author, and do not constitute legal or medical advice. This statement is added
to the messages for those lawyers who are too stupid to see the obvious.