FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin for Harbour/xHarbour Strange error with TcBrowse
Posts: 512
Joined: Mon Oct 17, 2005 10:38 AM
Strange error with TcBrowse
Posted: Sat Apr 20, 2013 07:38 AM

Hi.
On a big procedure I have a random error on TcBrowse.

if ::nRowPos == 1 .and. ( ! Empty( ::cAlias ) ) .and. ;
::cAlias != "ARRAY"
( ::cAlias )->( DbSkip( -1 ) ) <-------- Here makes error : Workarea not in use
if ! ( ::cAlias )->( BoF() )
( ::cAlias )->( DbSkip() )
endif
endif

This are few lines of method Paint.
What is strange is that on the previous line it is checking that the alias is not empty.
So why could be possible that the workarea is not in use ?
Thanks a lot.
Massimo

Posts: 10733
Joined: Sun Nov 19, 2006 05:22 AM
Re: Strange error with TcBrowse
Posted: Sun Apr 21, 2013 01:35 AM

::cAlias may not be empty, but it could have been closed or never used.

Regards



G. N. Rao.

Hyderabad, India
Posts: 512
Joined: Mon Oct 17, 2005 10:38 AM
Re: Strange error with TcBrowse
Posted: Sun Apr 21, 2013 04:07 PM

Thanks for the suggestion.
The strange thing is that this happens only on some machines, and randomly.
I must look better inside the code.

Continue the discussion