FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin for Harbour/xHarbour Xbrowse error
Posts: 3107
Joined: Fri Oct 07, 2005 06:28 PM
Xbrowse error
Posted: Mon Feb 05, 2007 12:50 AM

when I Dblclick on a record the program go out !!!!
and not create error.log
try it please www.nonsolosport.net/test_xbrowse.zip


Best Regards, Saludos



Falconi Silvio
Posts: 6983
Joined: Fri Oct 07, 2005 07:07 PM
Xbrowse error
Posted: Mon Feb 05, 2007 11:11 AM

oBrw:bChange := { || if (lChange=.t.,( lChange=.f., RefreshCont("QUOTE",cSocio,@lChange),oBrw:GoTop(),oBrw:refresh() ), ) }

static FUNCTION RefreshCont(cdbf,cSocio,lChange)
cKey:=cSocio

(cdbf)->(OrdScope(0,cKey))

(cdbf)->(OrdScope(1,cKey))

sysrefresh()
lChange:=.f.
return NIL

Posts: 3107
Joined: Fri Oct 07, 2005 06:28 PM
Xbrowse error
Posted: Mon Feb 05, 2007 11:25 AM

Now I can see the records but then the program go out and it not make error.log

Best Regards, Saludos



Falconi Silvio
Posts: 3107
Joined: Fri Oct 07, 2005 06:28 PM
Xbrowse error
Posted: Mon Feb 05, 2007 11:52 AM

perhaps there is an error on this functions

oBrw:bGoTop :={|| GoToTop(Alias(),csocio)}
oBrw:bGoBottom:={|| GoToBot(Alias(),csocio)}
oBrw:bSkip :={|n| MovePtr(Alias(),csocio,n)} <-------

I must use xbrowse but with wbrowse of hernan it run ok

Best Regards, Saludos



Falconi Silvio
Posts: 6983
Joined: Fri Oct 07, 2005 07:07 PM
Xbrowse error
Posted: Mon Feb 05, 2007 02:55 PM

Can you test with my exe

www.atzwanger.com/silvio/test.zip

Otto

Continue the discussion