Hi
I don't know if this post is still current but this works for me on the down
arrow.
Cheers
DEFINE CLASS frmdatamanagerformcustom1 AS frmdatamanagerformcustom
DoCreate = .T.
Name = "Frm1"
ADD OBJECT combo1 AS combobox WITH ;
ColumnCount = 0, ;
ColumnWidths = "", ;
RowSourceType = 1, ;
RowSource = "A,B,C,D", ;
FirstElement = 1, ;
Height = 24, ;
Left = 48, ;
NumberOfElements = 0, ;
Style = 2, ;
Top = 48, ;
Width = 100, ;
Name = "Combo1"
PROCEDURE combo1.KeyPress
Lparameters nKeyCode, nShiftAltCtrl
If nKeyCode=24 && down
If This.ListIndex=This.ListCount
This.ListIndex=1
NODEFAULT
Else
Endif
ELSE
Endif
ENDPROC
PROCEDURE combo1.Init
=DODEFAULT()
this.ListIndex=1
ENDPROC
ENDDEFINE
-----Original Message-----
From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]
Behalf Of Paul Newton
Sent: 09 November 2007 15:19
To: profox
Subject: Getting a Dropdown List to "loop"
Hi all
I have a dropdown list with rowsource type 1 and three values and which is
working fine except that I would like it to "loop" if the user presses the
down-arrow key when its listindex is 3, or presses the up-arrow key when its
listindex is 1. IOW if the user repeatedly presses either of these keys the
control will simply loop through the three values.
What would be the best way to achieve this - I've tried a couple of things
in the interactivechange and keypress events code but can't seem to get to
work the way I want
Thanks
Paul Newton
[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.
