>but this does not give the exact count of the total no of pages.

If you need a page count, you should probably use _PAGETOTAL in your report to force a 2 pass process. I thought you just needed a progress meter without the page count.

>i use my companies custom thermbar if i update this therm percentage in the render the whole rendering process is slowed down.

I would not use the Render method for this. It gets called for every object on the report. Way more ofter than you need for a Progress meter.

I would conditionally update the progress meter from the AfterBand event. Only once for every 50 (or more) detail bands events.

FUNCTION AfterBand(nBandObjCode, nFRXRecNo)
  IF nBandObjCode = 4  && Detail band
    ** Insert more code here to determine if the RECNO changed
    ** and we are on the main detail band 
    ** (if this is a multi detail band report)
    This.nDetailBandCount = This.nDetailBandCount + 1
    IF MOD(This.nDetailBandCount,50)=1
      ** Only update every 50 records
      This.UpdateProgressMeter()
    ENDIF
  ENDIF
ENDFUNC