file: Harbour\src\rdd\sxcompat.prg

line
295      IF nOrder != 0
296         nOldOrd := OrdNumber()
297         OrdSetFocus( nOrder )
298         lRet := nOrder == OrdSetFocus() ????????  <Num> == <Char>
must be     lRet := OrdName( nOrder ) == OrdSetFocus()
299         IF ! lRet
300            OrdSetFocus( nOldOrd )
301         ENDIF
302      ELSEIF Empty( xTag )
303         OrdSetFocus( 0 )
304         lRet := .T.
305      ENDIF

>From Clipper 5.3 NG

ORDSETFOCUS([<cOrderName> | <nOrder>]
   [,<cOrderBagName>]) --> cPrevOrderNameInFocus



_______________________________________________
Harbour mailing list (attachment size limit: 40KB)
[email protected]
http://lists.harbour-project.org/mailman/listinfo/harbour

Reply via email to