What's I do wrong with TTimer() ?

[James Bott]

Ramesh,

>If you look at the TmsgBar Class you will not find anywhere a logic which
can release the bitmap handles when the object is ended.

Bitmaps belonging to msgItems are released in the TMsgBar:Destroy() method.

Have you tried refreshing the messagebar after deleting the bitmaps?

Regards,
James

[RAMESHBABU]

Mr.James,

>Have you tried refreshing the messagebar after deleting the bitmaps?

I tried with oWnd:oMsgBar:Refresh() as under

Code: Select all

STATIC FUNCTION GetSignalStrength()

LOCAL cNewResource

IF VALTYPE(oSignalStrength) = "O"
   DeleteObject( oSignalStrength:hBitmap1 )
   cNewResource             := "SIGNAL"+LTRIM(STR(ROUND(objSMS:SignalStrength/10,0)*10))
   oSignalStrength:hBitmap1 := LoadBitmap( GetResources(), cNewResource ) 
   oSignalStrength:Paint() 
   oWnd:oMsgBar:Refresh()
ENDIF

RETURN nil

But the program is quitting suddenly.

Thanks

- Ramesh Babu P