by sebas22 <nospam@[EMAIL PROTECTED]
>
Jan 13, 2008 at 08:41 AM
On Sun, 13 Jan 2008 08:37:38 +0000, sebas22 <nospam@[EMAIL PROTECTED]
> wrote:
> ob:gotop()
> REPEAT
> do while nextkey() == 0 .and. ! ob:stabilize()
> enddo
> UNTIL ( ob:ApplyKey(getkey(0)) == TBR_EXIT )
ah, REPEAT / UNTIL is defined elsewhere :
#xcommand REPEAT => while .t.
#xcommand UNTIL <exp> => if ( <exp> ) ; exit ; end ; end
--
Regards,
Sebas
