This works for me when I try it: *Init code DIMENSION aVals[5] aVals[1] = "one 1" aVals[2] = "one 2" aVals[3] = "one 3" aVals[4] = "one 4" aVals[5] = "one 5" FOR EACH x IN aVals x = CHRTRAN(x,CHR(32),CHR(160)) this.AddItem(x) ENDFOR this.ListIndex = 1
*KeyPress code LPARAMETERS nKeyCode, nShiftAltCtrl IF nKeycode=32 NODEFAULT DODEFAULT(160,nshiftaltctrl) ENDIF Fred On Wed, Nov 24, 2010 at 1:44 PM, Fred Taylor <[email protected]> wrote: > Really? It works fine when I try it. Let me try your sample data and > I'll see what I come up with. > Fred > > > > On Wed, Nov 24, 2010 at 1:42 PM, MB Software Solutions, LLC > <[email protected]> wrote: >> On 11/24/2010 3:34 PM, Fred Taylor wrote: >>> You need both the NODEFAULT and a DODEFAULT(nKeyCode,nShiftAltCtrl) after >>> it. >>> >>> The NODEFAULT stops the default behavior and the DODEFAULT passes the >>> new value to VFP. >>> >>> Fred >> >> >> Just tried that. Same result. :( >> >> -- >> Mike Babcock, MCP >> MB Software Solutions, LLC >> President, Chief Software Architect >> http://mbsoftwaresolutions.com >> http://fabmate.com >> http://twitter.com/mbabcock16 >> [excessive quoting removed by server] _______________________________________________ Post Messages to: [email protected] Subscription Maintenance: http://leafe.com/mailman/listinfo/profox OT-free version of this list: http://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.
