Page 2 of 2
Re: Xbase++ : ErrorSys
Posted: Sun Oct 27, 2019 10:01 am
by AUGE_OHR
hi,
have enhance QT ErrorSys and now i got Information like Xbase++ Style
- QT_Error_XB1.jpg (59.46 KiB) Viewed 1105 times
it is just 1st Version so do not expect to much
have fun
Re: Xbase++ : ErrorSys
Posted: Wed Oct 30, 2019 5:49 am
by AUGE_OHR
hi,
Sorry, there is a Error in last Version
Code: Select all
cLog += "IndexOrd() :" + LTRIM( STR( ORDNUMBER() ) )+CRLF
IF ORDNUMBER() > 0
cLog += "Indexfocus() :" + ORDSETFOCUS()+CRLF
cLog += "Indexname() :" + ORDNAME()+CRLF
cLog += "Indexkey() :" + ORDKEY()+CRLF
ENDIF
IF USED()
must be
Code: Select all
IF USED()
cLog += "IndexOrd() :" + LTRIM( STR( ORDNUMBER() ) )+CRLF
IF ORDNUMBER() > 0
cLog += "Indexfocus() :" + ORDSETFOCUS()+CRLF
cLog += "Indexname() :" + ORDNAME()+CRLF
cLog += "Indexkey() :" + ORDKEY()+CRLF
ENDIF
ENDIF
else it give a recursive Error when no DBF is used
