Page 1 of 1

How to use Enter key on Combobox

PostPosted: Wed Jun 20, 2007 4:08 am
by Arindam
Hi Everybody,

While I am pressing ENTER on Combobox, Cursor do not move in next get field. If I press Tab bottom, then only Cursor move to next field.

How Can I use Enter, to move Cursor to next field. My code is as follows.
Code: Select all  Expand view
     REDEFINE COMBOBOX oCbx VAR cCuTy ITEMS  { "URBAN ", "RURAL ", "DEEPAM", "COMMON" }               ;
      ID 2 OF oDlg1                                                                                   ;
      ON CHANGE MsgBeep()                                                                             ;
      Valid If(cCuTy = oCbx:aItems[1],  (oArea:AreaType := "U", .T.), If(cCuTy = oCbx:aItems[2],      ;
                                        (oArea:AreaType := "R", .T.), If(cCuTy = oCbx:aItems[3],      ;
                                        (oArea:AreaType := "D", .T.), (oArea:AreaType := "C", .T.)))) ;
      Picture "@!" Color RGB(0, 0, 0), RGB(255, 255, 255)


With regads,

Arindam

PostPosted: Wed Jun 20, 2007 8:47 am
by avista
-> ON CHANGE MsgBeep()

Try this ...

ON CHANGE ( MsgBeep() ,;
oNextGet:SetFocus() ;
)

Regards.

PostPosted: Wed Jun 20, 2007 2:09 pm
by Arindam
Avista

Thank you for your reply. Actualy I am user of xHarbour and FWH. By mistake I had post this in this forum.

With regards,

Arindam