Xbrowse error

Post Reply
User avatar
Silvio
Posts: 3107
Joined: Fri Oct 07, 2005 6:28 pm
Location: Teramo,Italy

Xbrowse error

Post by Silvio »

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
User avatar
Otto
Posts: 4470
Joined: Fri Oct 07, 2005 7:07 pm
Contact:

Post by Otto »

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
User avatar
Silvio
Posts: 3107
Joined: Fri Oct 07, 2005 6:28 pm
Location: Teramo,Italy

Post by Silvio »

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

Falconi Silvio
User avatar
Silvio
Posts: 3107
Joined: Fri Oct 07, 2005 6:28 pm
Location: Teramo,Italy

Post by Silvio »

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
User avatar
Otto
Posts: 4470
Joined: Fri Oct 07, 2005 7:07 pm
Contact:

Post by Otto »

Can you test with my exe

www.atzwanger.com/silvio/test.zip

Otto
Post Reply