You could do something similar ...
DEFINE CLASS BUTTONMAKER AS COMMANDGROUP
* -------------------------------
PROCEDURE INIT
Lparameters pnButtQy,pcCaptions,pnTop,pnLeft,pcCommands
<same as you did>
* -------------------------------
Procedure Click
cComm = GetWordNum (;
this.cCommand;
, m.this.Value; && holds the # of button clicked
, [,];
)
&cComm
Thierry Nivelet
FoxInCloud
Give your VFP app a second life in the cloud
http://foxincloud.com/
Le 12/12/13 13:34, Rafael Copquin a écrit :
However, you have to hard code the commands that each click event
trigger, in your example, 9, with a do case construct
_______________________________________________
Post Messages to: [email protected]
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/[email protected]
** 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.
