Welcome To The Home Of The Visual FoxPro Experts  
home. signup. forum. archives. search. google. articles. downloads. faq. members. weblogs. file info. rss.
 From: Anil Tayal
  Where is Anil Tayal?
 Delhi
 India
 Anil Tayal
 To: Ilya Rabyy
  Where is Ilya Rabyy?
 Fountain Valley
 California - United States
 Ilya Rabyy
 Tags
Subject: RE: HOWTO suppress auto-click?
Thread ID: 49792 Message ID: 51062 # Views: 1 # Ratings: 0
Version: Visual FoxPro 7 Category: Projects and Design
Date: Wednesday, September 08, 2004 3:50:50 PM         
   


Hi Ilya,

Try This

LPARAMETERS nKeyCode, nShiftAltCtrl
IF nKeyCode = 13 .OR. nKeyCode = 32  && Space bar or Enter
    THIS.Value = 1
    NODEFAULT 	
 ELSE
    THIS.Value = 0
ENDIF
LOCAL loCtrl

IF THIS.Value = 1 && CD Master is present
    WITH THISFORM
       FOR EACH loCtrl IN .Controls
          IF ATC("Oper", loCtrl.Name) = 0 .AND. ATC("Master", loCtrl.Name) = 0 .AND.  ;
             ATC("WONum", loCtrl.Name) = 0 .AND.ATC("Exit", loCtrl.Name) = 0
             loCtrl.Visible = .F.
          ELSE
             loCtrl.Visible = .T.
          ENDIF
       NEXT
       .cmdMasterCD.SetFocus
    ENDWITH
 ENDIF

if nKeyCode=13
    dodefault(nKeyCode, nShiftAltCtrl)
endif



HTH,

Anil


ENTIRE THREAD

HOWTO suppress auto-click? Posted by ILYA RABYY @ 8/24/2004 10:52:29 PM
RE: HOWTO suppress auto-click? Posted by Andy Rice @ 8/25/2004 12:21:59 AM
RE: HOWTO suppress auto-click? Posted by ILYA RABYY @ 8/25/2004 12:44:44 AM
RE: HOWTO suppress auto-click? Posted by Lucy Alice Pilanga @ 8/25/2004 3:36:54 AM
RE: HOWTO suppress auto-click? Posted by ILYA RABYY @ 8/25/2004 5:34:14 PM
RE: HOWTO suppress auto-click? Posted by Lucy Alice Pilanga @ 8/27/2004 3:34:03 AM
RE: HOWTO suppress auto-click? Posted by ILYA RABYY @ 9/7/2004 7:13:16 PM
RE: HOWTO suppress auto-click? Posted by aktayal @ 9/8/2004 3:50:50 PM
RE: HOWTO suppress auto-click? - Resolved Posted by ILYA RABYY @ 9/10/2004 5:36:47 PM