Error while zooming in RPreview

[nageswaragunupudi]

Mr Antonio

When I try to zoom in Rpreview I am getting the following error:

Code: Select all  Expand view

   Called from: tobject.prg => TBAR:ERROR(172)
   Called from: tobject.prg => TBAR:MSGNOTFOUND(205)
   Called from: tobject.prg => TBAR:CHANGEBITMAP(0)
   Called from: RPREVIEW.PRG => TPREVIEW:ZOOM(0)
   Called from: RPREVIEW.PRG => TPREVIEW:SETORG1(0)
   Called from: RPREVIEW.PRG => (b)TPREVIEW:BUILDWINDOW(0)
   Called from: window.prg => TMETAFILE:LDBLCLICK(1786)
   Called from:  => TWINDOW:HANDLEEVENT(0)
   Called from: control.prg => TMETAFILE:HANDLEEVENT(1362)
   Called from: window.prg => _FWH(3197)
   Called from:  => WINRUN(0)
   Called from: window.prg => TMDIFRAME:ACTIVATE(895)


I am using FWH 7.10 ( with new libraries for 2007 style menus ).

Please help

[nageswaragunupudi]

Mr Antonio

Could you find a fix to the above problem please ?

[Antonio Linares]

NageswaraRao,

Just modify these lines:

908: if ! IsAppThemed() .or. l2007

934: if ! IsAppThemed() .or. l2007

[nageswaragunupudi]

Thanks
But I dont have the RPreview.Prg compatible with the latest libs ( 2007 menus ) you supplied. Does my original rpreview.prg ( downloaded with 7.10 ) work ?

[Antonio Linares]

We email you the modified file