FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin for Harbour/xHarbour What's I do wrong with TTimer() ?
Posts: 4840
Joined: Fri Nov 18, 2005 04:52 PM
What's I do wrong with TTimer() ?
Posted: Fri Oct 17, 2008 05:43 PM

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

FWH 18.05/xHarbour 1.2.3/BCC7/Windows 10
Posts: 654
Joined: Fri Oct 21, 2005 05:54 AM
What's I do wrong with TTimer() ?
Posted: Sun Oct 19, 2008 03:11 AM
Mr.James,

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

I tried with oWnd:Refresh() as under

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

Continue the discussion