FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin for Harbour/xHarbour Strange Font Problem in fwh 1412
Posts: 1387
Joined: Fri May 23, 2008 01:33 PM
Strange Font Problem in fwh 1412
Posted: Tue Jan 20, 2015 10:21 AM

Hi

I used to fwh 1312 and have no problem.I have using VS2013 and harbour.

After upgrade to fwh 1412, the font problem is occured. I use Verdana font in my application. Sometimes all my font change to System Font. In order fix this, the user have to restart application.

Any comment?

Regards,



Hakan ONEMLI



Harbour & MSVC 2022 & FWH 23.06
Posts: 10733
Joined: Sun Nov 19, 2006 05:22 AM
Re: Strange Font Problem in fwh 1412
Posted: Tue Jan 20, 2015 10:50 AM
Horizon wrote:Hi

I used to fwh 1312 and have no problem.I have using VS2013 and harbour.

After upgrade to fwh 1412, the font problem is occured. I use Verdana font in my application. Sometimes all my font change to System Font. In order fix this, the user have to restart application.

Any comment?

In such case most likely a log file with the same name as exe is created. <prgramname>.log.
Please obtain the log file and send to us to find out the cause.
Regards



G. N. Rao.

Hyderabad, India
Posts: 1387
Joined: Fri May 23, 2008 01:33 PM
Re: Strange Font Problem in fwh 1412
Posted: Tue Jan 20, 2015 11:38 AM
nageswaragunupudi wrote:
Horizon wrote:Hi

I used to fwh 1312 and have no problem.I have using VS2013 and harbour.

After upgrade to fwh 1412, the font problem is occured. I use Verdana font in my application. Sometimes all my font change to System Font. In order fix this, the user have to restart application.

Any comment?

In such case most likely a log file with the same name as exe is created. <prgramname>.log.
Please obtain the log file and send to us to find out the cause.


Hi Mr. Rao.

This log file is just open applicatio and close it.

Code (fw): Select all Collapse
20/01/2015 13:36:03: EXCESS RELEASE OF FONT Verdana[ hFont : 0] ( nCount : 0 )
     <-TFONT:END(246) <-TCONTROL:DESTROY(2182) <-TRBTN:DESTROY(954) <-TWINDOW:HANDLEEVENT(0) <-TCONTROL:HANDLEEVENT(1733) <-TRBTN:HANDLEEVENT(1596) <-_FWH(3345) <-WINRUN(0) <-TWINDOW:ACTIVATE(1050)
    ------------------------------------------------------------    
20/01/2015 13:36:03: EXCESS RELEASE OF FONT Verdana[ hFont : 0] ( nCount : -1 )
     <-TFONT:END(246) <-TCONTROL:DESTROY(2182) <-TRBTN:DESTROY(954) <-TWINDOW:HANDLEEVENT(0) <-TCONTROL:HANDLEEVENT(1733) <-TRBTN:HANDLEEVENT(1596) <-_FWH(3345) <-WINRUN(0) <-TWINDOW:ACTIVATE(1050)
    ------------------------------------------------------------    
20/01/2015 13:36:03: EXCESS RELEASE OF FONT Verdana[ hFont : 0] ( nCount : -2 )
     <-TFONT:END(246) <-TCONTROL:DESTROY(2182) <-TRBTN:DESTROY(954) <-TWINDOW:HANDLEEVENT(0) <-TCONTROL:HANDLEEVENT(1733) <-TRBTN:HANDLEEVENT(1596) <-_FWH(3345) <-WINRUN(0) <-TWINDOW:ACTIVATE(1050)
    ------------------------------------------------------------    
20/01/2015 13:36:03: EXCESS RELEASE OF FONT Verdana[ hFont : 0] ( nCount : -3 )
     <-TFONT:END(246) <-TCONTROL:DESTROY(2182) <-TRBTN:DESTROY(954) <-TWINDOW:HANDLEEVENT(0) <-TCONTROL:HANDLEEVENT(1733) <-TRBTN:HANDLEEVENT(1596) <-_FWH(3345) <-WINRUN(0) <-TWINDOW:ACTIVATE(1050)
    ------------------------------------------------------------    
20/01/2015 13:36:03: EXCESS RELEASE OF FONT Verdana[ hFont : 0] ( nCount : -4 )
     <-TFONT:END(246) <-TCONTROL:DESTROY(2182) <-TRBTN:DESTROY(954) <-TWINDOW:HANDLEEVENT(0) <-TCONTROL:HANDLEEVENT(1733) <-TRBTN:HANDLEEVENT(1596) <-_FWH(3345) <-WINRUN(0) <-TWINDOW:ACTIVATE(1050)
    ------------------------------------------------------------    
20/01/2015 13:36:03: EXCESS RELEASE OF FONT Verdana[ hFont : 0] ( nCount : -5 )
     <-TFONT:END(246) <-TCONTROL:DESTROY(2182) <-TRBTN:DESTROY(954) <-TWINDOW:HANDLEEVENT(0) <-TCONTROL:HANDLEEVENT(1733) <-TRBTN:HANDLEEVENT(1596) <-_FWH(3345) <-WINRUN(0) <-TWINDOW:ACTIVATE(1050)
    ------------------------------------------------------------    
20/01/2015 13:36:03: EXCESS RELEASE OF FONT Verdana[ hFont : 0] ( nCount : -6 )
     <-TFONT:END(246) <-TCONTROL:DESTROY(2182) <-TRBTN:DESTROY(954) <-TWINDOW:HANDLEEVENT(0) <-TCONTROL:HANDLEEVENT(1733) <-TRBTN:HANDLEEVENT(1596) <-_FWH(3345) <-WINRUN(0) <-TWINDOW:ACTIVATE(1050)
    ------------------------------------------------------------    
20/01/2015 13:36:03: EXCESS RELEASE OF FONT Verdana[ hFont : 0] ( nCount : -7 )
     <-TFONT:END(246) <-TCONTROL:DESTROY(2182) <-TRBTN:DESTROY(954) <-TWINDOW:HANDLEEVENT(0) <-TCONTROL:HANDLEEVENT(1733) <-TRBTN:HANDLEEVENT(1596) <-_FWH(3345) <-WINRUN(0) <-TWINDOW:ACTIVATE(1050)
    ------------------------------------------------------------    
20/01/2015 13:36:03: EXCESS RELEASE OF FONT Verdana[ hFont : 0] ( nCount : -8 )
     <-TFONT:END(246) <-TCONTROL:DESTROY(2182) <-TRBTN:DESTROY(954) <-TWINDOW:HANDLEEVENT(0) <-TCONTROL:HANDLEEVENT(1733) <-TRBTN:HANDLEEVENT(1596) <-_FWH(3345) <-WINRUN(0) <-TWINDOW:ACTIVATE(1050)
    ------------------------------------------------------------    
20/01/2015 13:36:03: EXCESS RELEASE OF FONT Verdana[ hFont : 0] ( nCount : -9 )
     <-TFONT:END(246) <-TCONTROL:DESTROY(2182) <-TRBTN:DESTROY(954) <-TWINDOW:HANDLEEVENT(0) <-TCONTROL:HANDLEEVENT(1733) <-TRBTN:HANDLEEVENT(1596) <-_FWH(3345) <-WINRUN(0) <-TWINDOW:ACTIVATE(1050)
    ------------------------------------------------------------    
20/01/2015 13:36:03: EXCESS RELEASE OF FONT Verdana[ hFont : 0] ( nCount : -10 )
     <-TFONT:END(246) <-TCONTROL:DESTROY(2182) <-TRBTN:DESTROY(954) <-TWINDOW:HANDLEEVENT(0) <-TCONTROL:HANDLEEVENT(1733) <-TRBTN:HANDLEEVENT(1596) <-_FWH(3345) <-WINRUN(0) <-TWINDOW:ACTIVATE(1050)
    ------------------------------------------------------------    
20/01/2015 13:36:03: EXCESS RELEASE OF FONT Verdana[ hFont : 0] ( nCount : -11 )
     <-TFONT:END(246) <-TCONTROL:DESTROY(2182) <-TRBTN:DESTROY(954) <-TWINDOW:HANDLEEVENT(0) <-TCONTROL:HANDLEEVENT(1733) <-TRBTN:HANDLEEVENT(1596) <-_FWH(3345) <-WINRUN(0) <-TWINDOW:ACTIVATE(1050)
    ------------------------------------------------------------    
20/01/2015 13:36:03: EXCESS RELEASE OF FONT Verdana[ hFont : 0] ( nCount : -12 )
     <-TFONT:END(246) <-TCONTROL:DESTROY(2182) <-TRBTN:DESTROY(954) <-TWINDOW:HANDLEEVENT(0) <-TCONTROL:HANDLEEVENT(1733) <-TRBTN:HANDLEEVENT(1596) <-_FWH(3345) <-WINRUN(0) <-TWINDOW:ACTIVATE(1050)
    ------------------------------------------------------------    
20/01/2015 13:36:03: EXCESS RELEASE OF FONT Verdana[ hFont : 0] ( nCount : -13 )
     <-TFONT:END(246) <-TCONTROL:DESTROY(2182) <-TRBTN:DESTROY(954) <-TWINDOW:HANDLEEVENT(0) <-TCONTROL:HANDLEEVENT(1733) <-TRBTN:HANDLEEVENT(1596) <-_FWH(3345) <-WINRUN(0) <-TWINDOW:ACTIVATE(1050)
    ------------------------------------------------------------    
20/01/2015 13:36:03: EXCESS RELEASE OF FONT Verdana[ hFont : 0] ( nCount : -14 )
     <-TFONT:END(246) <-TCONTROL:DESTROY(2182) <-TRBTN:DESTROY(954) <-TWINDOW:HANDLEEVENT(0) <-TCONTROL:HANDLEEVENT(1733) <-TRBTN:HANDLEEVENT(1596) <-_FWH(3345) <-WINRUN(0) <-TWINDOW:ACTIVATE(1050)
    ------------------------------------------------------------    
20/01/2015 13:36:03: EXCESS RELEASE OF FONT Verdana[ hFont : 0] ( nCount : -15 )
     <-TFONT:END(246) <-TCONTROL:DESTROY(2182) <-TRBTN:DESTROY(954) <-TWINDOW:HANDLEEVENT(0) <-TCONTROL:HANDLEEVENT(1733) <-TRBTN:HANDLEEVENT(1596) <-_FWH(3345) <-WINRUN(0) <-TWINDOW:ACTIVATE(1050)
    ------------------------------------------------------------    
20/01/2015 13:36:03: EXCESS RELEASE OF FONT Verdana[ hFont : 0] ( nCount : -16 )
     <-TFONT:END(246) <-TCONTROL:DESTROY(2182) <-TRBTN:DESTROY(954) <-TWINDOW:HANDLEEVENT(0) <-TCONTROL:HANDLEEVENT(1733) <-TRBTN:HANDLEEVENT(1596) <-_FWH(3345) <-WINRUN(0) <-TWINDOW:ACTIVATE(1050)
    ------------------------------------------------------------    
20/01/2015 13:36:03: EXCESS RELEASE OF FONT Verdana[ hFont : 0] ( nCount : -17 )
     <-TFONT:END(246) <-TCONTROL:DESTROY(2182) <-TRBTN:DESTROY(954) <-TWINDOW:HANDLEEVENT(0) <-TCONTROL:HANDLEEVENT(1733) <-TRBTN:HANDLEEVENT(1596) <-_FWH(3345) <-WINRUN(0) <-TWINDOW:ACTIVATE(1050)
    ------------------------------------------------------------    
20/01/2015 13:36:03: EXCESS RELEASE OF FONT Verdana[ hFont : 0] ( nCount : -18 )
     <-TFONT:END(246) <-TCONTROL:DESTROY(2182) <-TRBTN:DESTROY(954) <-TWINDOW:HANDLEEVENT(0) <-TCONTROL:HANDLEEVENT(1733) <-TRBTN:HANDLEEVENT(1596) <-_FWH(3345) <-WINRUN(0) <-TWINDOW:ACTIVATE(1050)
    ------------------------------------------------------------    
20/01/2015 13:36:03: EXCESS RELEASE OF FONT Verdana[ hFont : 0] ( nCount : -19 )
     <-TFONT:END(246) <-TCONTROL:DESTROY(2182) <-TRBTN:DESTROY(954) <-TWINDOW:HANDLEEVENT(0) <-TCONTROL:HANDLEEVENT(1733) <-TRBTN:HANDLEEVENT(1596) <-_FWH(3345) <-WINRUN(0) <-TWINDOW:ACTIVATE(1050)
    ------------------------------------------------------------    
20/01/2015 13:36:03: EXCESS RELEASE OF FONT Verdana[ hFont : 0] ( nCount : -20 )
     <-TFONT:END(246) <-TCONTROL:DESTROY(2182) <-TRBTN:DESTROY(954) <-TWINDOW:HANDLEEVENT(0) <-TCONTROL:HANDLEEVENT(1733) <-TRBTN:HANDLEEVENT(1596) <-_FWH(3345) <-WINRUN(0) <-TWINDOW:ACTIVATE(1050)
    ------------------------------------------------------------    
20/01/2015 13:36:03: EXCESS RELEASE OF FONT Verdana[ hFont : 0] ( nCount : -21 )
     <-TFONT:END(246) <-TCONTROL:DESTROY(2182) <-TRBTN:DESTROY(954) <-TWINDOW:HANDLEEVENT(0) <-TCONTROL:HANDLEEVENT(1733) <-TRBTN:HANDLEEVENT(1596) <-_FWH(3345) <-WINRUN(0) <-TWINDOW:ACTIVATE(1050)
    ------------------------------------------------------------    
20/01/2015 13:36:03: EXCESS RELEASE OF FONT Verdana[ hFont : 0] ( nCount : -22 )
     <-TFONT:END(246) <-TCONTROL:DESTROY(2182) <-TRBTN:DESTROY(954) <-TWINDOW:HANDLEEVENT(0) <-TCONTROL:HANDLEEVENT(1733) <-TRBTN:HANDLEEVENT(1596) <-_FWH(3345) <-WINRUN(0) <-TWINDOW:ACTIVATE(1050)
    ------------------------------------------------------------    
20/01/2015 13:36:03: EXCESS RELEASE OF FONT Verdana[ hFont : 0] ( nCount : -23 )
     <-TFONT:END(246) <-TCONTROL:DESTROY(2182) <-TRBTN:DESTROY(954) <-TWINDOW:HANDLEEVENT(0) <-TCONTROL:HANDLEEVENT(1733) <-TRBTN:HANDLEEVENT(1596) <-_FWH(3345) <-WINRUN(0) <-TWINDOW:ACTIVATE(1050)
    ------------------------------------------------------------    
20/01/2015 13:36:03: EXCESS RELEASE OF FONT Verdana[ hFont : 0] ( nCount : -24 )
     <-TFONT:END(246) <-TCONTROL:DESTROY(2182) <-TRBTN:DESTROY(954) <-TWINDOW:HANDLEEVENT(0) <-TCONTROL:HANDLEEVENT(1733) <-TRBTN:HANDLEEVENT(1596) <-_FWH(3345) <-WINRUN(0) <-TWINDOW:ACTIVATE(1050)
    ------------------------------------------------------------    
20/01/2015 13:36:03: EXCESS RELEASE OF FONT Verdana[ hFont : 0] ( nCount : -25 )
     <-TFONT:END(246) <-TCONTROL:DESTROY(2182) <-TRBTN:DESTROY(954) <-TWINDOW:HANDLEEVENT(0) <-TCONTROL:HANDLEEVENT(1733) <-TRBTN:HANDLEEVENT(1596) <-_FWH(3345) <-WINRUN(0) <-TWINDOW:ACTIVATE(1050)
    ------------------------------------------------------------    
20/01/2015 13:36:03: EXCESS RELEASE OF FONT Verdana[ hFont : 0] ( nCount : -26 )
     <-TFONT:END(246) <-TCONTROL:DESTROY(2182) <-TRBTN:DESTROY(954) <-TWINDOW:HANDLEEVENT(0) <-TCONTROL:HANDLEEVENT(1733) <-TRBTN:HANDLEEVENT(1596) <-_FWH(3345) <-WINRUN(0) <-TWINDOW:ACTIVATE(1050)
    ------------------------------------------------------------    
20/01/2015 13:36:03: EXCESS RELEASE OF FONT Verdana[ hFont : 0] ( nCount : -27 )
     <-TFONT:END(246) <-TCONTROL:DESTROY(2182) <-TRBTN:DESTROY(954) <-TWINDOW:HANDLEEVENT(0) <-TCONTROL:HANDLEEVENT(1733) <-TRBTN:HANDLEEVENT(1596) <-_FWH(3345) <-WINRUN(0) <-TWINDOW:ACTIVATE(1050)
    ------------------------------------------------------------    
20/01/2015 13:36:03: EXCESS RELEASE OF FONT Verdana[ hFont : 0] ( nCount : -28 )
     <-TFONT:END(246) <-TCONTROL:DESTROY(2182) <-TRBTN:DESTROY(954) <-TWINDOW:HANDLEEVENT(0) <-TCONTROL:HANDLEEVENT(1733) <-TRBTN:HANDLEEVENT(1596) <-_FWH(3345) <-WINRUN(0) <-TWINDOW:ACTIVATE(1050)
    ------------------------------------------------------------    
20/01/2015 13:36:03: EXCESS RELEASE OF FONT Verdana[ hFont : 0] ( nCount : -29 )
     <-TFONT:END(246) <-TCONTROL:DESTROY(2182) <-TRBTN:DESTROY(954) <-TWINDOW:HANDLEEVENT(0) <-TCONTROL:HANDLEEVENT(1733) <-TRBTN:HANDLEEVENT(1596) <-_FWH(3345) <-WINRUN(0) <-TWINDOW:ACTIVATE(1050)
    ------------------------------------------------------------    
20/01/2015 13:36:03: EXCESS RELEASE OF FONT Verdana[ hFont : 0] ( nCount : -30 )
     <-TFONT:END(246) <-TCONTROL:DESTROY(2182) <-TRBTN:DESTROY(954) <-TWINDOW:HANDLEEVENT(0) <-TCONTROL:HANDLEEVENT(1733) <-TRBTN:HANDLEEVENT(1596) <-_FWH(3345) <-WINRUN(0) <-TWINDOW:ACTIVATE(1050)
    ------------------------------------------------------------    
20/01/2015 13:36:03: EXCESS RELEASE OF FONT Verdana[ hFont : 0] ( nCount : -31 )
     <-TFONT:END(246) <-TCONTROL:DESTROY(2182) <-TRBTN:DESTROY(954) <-TWINDOW:HANDLEEVENT(0) <-TCONTROL:HANDLEEVENT(1733) <-TRBTN:HANDLEEVENT(1596) <-_FWH(3345) <-WINRUN(0) <-TWINDOW:ACTIVATE(1050)
    ------------------------------------------------------------    
20/01/2015 13:36:03: EXCESS RELEASE OF FONT Verdana[ hFont : 0] ( nCount : -32 )
     <-TFONT:END(246) <-TCONTROL:DESTROY(2182) <-TRBTN:DESTROY(954) <-TWINDOW:HANDLEEVENT(0) <-TCONTROL:HANDLEEVENT(1733) <-TRBTN:HANDLEEVENT(1596) <-_FWH(3345) <-WINRUN(0) <-TWINDOW:ACTIVATE(1050)
    ------------------------------------------------------------    
20/01/2015 13:36:03: EXCESS RELEASE OF FONT Verdana[ hFont : 0] ( nCount : -33 )
     <-TFONT:END(246) <-TCONTROL:DESTROY(2182) <-TRBTN:DESTROY(954) <-TWINDOW:HANDLEEVENT(0) <-TCONTROL:HANDLEEVENT(1733) <-TRBTN:HANDLEEVENT(1596) <-_FWH(3345) <-WINRUN(0) <-TWINDOW:ACTIVATE(1050)
    ------------------------------------------------------------    
20/01/2015 13:36:03: EXCESS RELEASE OF FONT Verdana[ hFont : 0] ( nCount : -34 )
     <-TFONT:END(246) <-TCONTROL:DESTROY(2182) <-TRBTN:DESTROY(954) <-TWINDOW:HANDLEEVENT(0) <-TCONTROL:HANDLEEVENT(1733) <-TRBTN:HANDLEEVENT(1596) <-_FWH(3345) <-WINRUN(0) <-TWINDOW:ACTIVATE(1050)
    ------------------------------------------------------------    
20/01/2015 13:36:03: EXCESS RELEASE OF FONT Verdana[ hFont : 0] ( nCount : -35 )
     <-TFONT:END(246) <-TCONTROL:DESTROY(2182) <-TRBTN:DESTROY(954) <-TWINDOW:HANDLEEVENT(0) <-TCONTROL:HANDLEEVENT(1733) <-TRBTN:HANDLEEVENT(1596) <-_FWH(3345) <-WINRUN(0) <-TWINDOW:ACTIVATE(1050)
    ------------------------------------------------------------    
20/01/2015 13:36:03: EXCESS RELEASE OF FONT Verdana[ hFont : 0] ( nCount : -36 )
     <-TFONT:END(246) <-TCONTROL:DESTROY(2182) <-TRBTN:DESTROY(954) <-TWINDOW:HANDLEEVENT(0) <-TCONTROL:HANDLEEVENT(1733) <-TRBTN:HANDLEEVENT(1596) <-_FWH(3345) <-WINRUN(0) <-TWINDOW:ACTIVATE(1050)
    ------------------------------------------------------------    
20/01/2015 13:36:03: EXCESS RELEASE OF FONT Verdana[ hFont : 0] ( nCount : -37 )
     <-TFONT:END(246) <-TCONTROL:DESTROY(2182) <-TRBTN:DESTROY(954) <-TWINDOW:HANDLEEVENT(0) <-TCONTROL:HANDLEEVENT(1733) <-TRBTN:HANDLEEVENT(1596) <-_FWH(3345) <-WINRUN(0) <-TWINDOW:ACTIVATE(1050)
    ------------------------------------------------------------    
20/01/2015 13:36:03: EXCESS RELEASE OF FONT Verdana[ hFont : 0] ( nCount : -38 )
     <-TFONT:END(246) <-TCONTROL:DESTROY(2182) <-TRBTN:DESTROY(954) <-TWINDOW:HANDLEEVENT(0) <-TCONTROL:HANDLEEVENT(1733) <-TRBTN:HANDLEEVENT(1596) <-_FWH(3345) <-WINRUN(0) <-TWINDOW:ACTIVATE(1050)
    ------------------------------------------------------------    
20/01/2015 13:36:03: EXCESS RELEASE OF FONT Verdana[ hFont : 0] ( nCount : -39 )
     <-TFONT:END(246) <-TCONTROL:DESTROY(2182) <-TRBTN:DESTROY(954) <-TWINDOW:HANDLEEVENT(0) <-TCONTROL:HANDLEEVENT(1733) <-TRBTN:HANDLEEVENT(1596) <-_FWH(3345) <-WINRUN(0) <-TWINDOW:ACTIVATE(1050)
    ------------------------------------------------------------    
20/01/2015 13:36:03: EXCESS RELEASE OF FONT Verdana[ hFont : 0] ( nCount : -40 )
     <-TFONT:END(246) <-TCONTROL:DESTROY(2182) <-TRBTN:DESTROY(954) <-TWINDOW:HANDLEEVENT(0) <-TCONTROL:HANDLEEVENT(1733) <-TRBTN:HANDLEEVENT(1596) <-_FWH(3345) <-WINRUN(0) <-TWINDOW:ACTIVATE(1050)
    ------------------------------------------------------------    
20/01/2015 13:36:03: EXCESS RELEASE OF FONT Verdana[ hFont : 0] ( nCount : -41 )
     <-TFONT:END(246) <-TCONTROL:DESTROY(2182) <-TRBTN:DESTROY(954) <-TWINDOW:HANDLEEVENT(0) <-TCONTROL:HANDLEEVENT(1733) <-TRBTN:HANDLEEVENT(1596) <-_FWH(3345) <-WINRUN(0) <-TWINDOW:ACTIVATE(1050)
    ------------------------------------------------------------    
20/01/2015 13:36:03: EXCESS RELEASE OF FONT Verdana[ hFont : 0] ( nCount : -42 )
     <-TFONT:END(246) <-TCONTROL:DESTROY(2182) <-TRBTN:DESTROY(954) <-TWINDOW:HANDLEEVENT(0) <-TCONTROL:HANDLEEVENT(1733) <-TRBTN:HANDLEEVENT(1596) <-_FWH(3345) <-WINRUN(0) <-TWINDOW:ACTIVATE(1050)
    ------------------------------------------------------------    
20/01/2015 13:36:03: EXCESS RELEASE OF FONT Verdana[ hFont : 0] ( nCount : -43 )
     <-TFONT:END(246) <-TCONTROL:DESTROY(2182) <-TRBTN:DESTROY(954) <-TWINDOW:HANDLEEVENT(0) <-TCONTROL:HANDLEEVENT(1733) <-TRBTN:HANDLEEVENT(1596) <-_FWH(3345) <-WINRUN(0) <-TWINDOW:ACTIVATE(1050)
    ------------------------------------------------------------    
20/01/2015 13:36:03: EXCESS RELEASE OF FONT Verdana[ hFont : 0] ( nCount : -44 )
     <-TFONT:END(246) <-TCONTROL:DESTROY(2182) <-TRBTN:DESTROY(954) <-TWINDOW:HANDLEEVENT(0) <-TCONTROL:HANDLEEVENT(1733) <-TRBTN:HANDLEEVENT(1596) <-_FWH(3345) <-WINRUN(0) <-TWINDOW:ACTIVATE(1050)
    ------------------------------------------------------------    
20/01/2015 13:36:03: EXCESS RELEASE OF FONT Verdana[ hFont : 0] ( nCount : -45 )
     <-TFONT:END(246) <-TCONTROL:DESTROY(2182) <-TRBTN:DESTROY(954) <-TWINDOW:HANDLEEVENT(0) <-TCONTROL:HANDLEEVENT(1733) <-TRBTN:HANDLEEVENT(1596) <-_FWH(3345) <-WINRUN(0) <-TWINDOW:ACTIVATE(1050)
    ------------------------------------------------------------    
20/01/2015 13:36:03: EXCESS RELEASE OF FONT Verdana[ hFont : 0] ( nCount : -46 )
     <-TFONT:END(246) <-TCONTROL:DESTROY(2182) <-TRBTN:DESTROY(954) <-TWINDOW:HANDLEEVENT(0) <-TCONTROL:HANDLEEVENT(1733) <-TRBTN:HANDLEEVENT(1596) <-_FWH(3345) <-WINRUN(0) <-TWINDOW:ACTIVATE(1050)
    ------------------------------------------------------------    
20/01/2015 13:36:03: EXCESS RELEASE OF FONT Verdana[ hFont : 0] ( nCount : -47 )
     <-TFONT:END(246) <-TCONTROL:DESTROY(2182) <-TRBTN:DESTROY(954) <-TWINDOW:HANDLEEVENT(0) <-TCONTROL:HANDLEEVENT(1733) <-TRBTN:HANDLEEVENT(1596) <-_FWH(3345) <-WINRUN(0) <-TWINDOW:ACTIVATE(1050)
    ------------------------------------------------------------    
20/01/2015 13:36:03: EXCESS RELEASE OF FONT Verdana[ hFont : 0] ( nCount : -48 )
     <-TFONT:END(246) <-TCONTROL:DESTROY(2182) <-TRBTN:DESTROY(954) <-TWINDOW:HANDLEEVENT(0) <-TCONTROL:HANDLEEVENT(1733) <-TRBTN:HANDLEEVENT(1596) <-_FWH(3345) <-WINRUN(0) <-TWINDOW:ACTIVATE(1050)
    ------------------------------------------------------------    
20/01/2015 13:36:03: EXCESS RELEASE OF FONT Verdana[ hFont : 0] ( nCount : -49 )
     <-TFONT:END(246) <-TCONTROL:DESTROY(2182) <-TRBTN:DESTROY(954) <-TWINDOW:HANDLEEVENT(0) <-TCONTROL:HANDLEEVENT(1733) <-TRBTN:HANDLEEVENT(1596) <-_FWH(3345) <-WINRUN(0) <-TWINDOW:ACTIVATE(1050)
    ------------------------------------------------------------    
20/01/2015 13:36:03: EXCESS RELEASE OF FONT Verdana[ hFont : 0] ( nCount : -50 )
     <-TFONT:END(246) <-TCONTROL:DESTROY(2182) <-TRBTN:DESTROY(954) <-TWINDOW:HANDLEEVENT(0) <-TCONTROL:HANDLEEVENT(1733) <-TRBTN:HANDLEEVENT(1596) <-_FWH(3345) <-WINRUN(0) <-TWINDOW:ACTIVATE(1050)
    ------------------------------------------------------------    
20/01/2015 13:36:03: EXCESS RELEASE OF FONT Verdana[ hFont : 0] ( nCount : -51 )
     <-TFONT:END(246) <-TCONTROL:DESTROY(2182) <-TRBTN:DESTROY(954) <-TWINDOW:HANDLEEVENT(0) <-TCONTROL:HANDLEEVENT(1733) <-TRBTN:HANDLEEVENT(1596) <-_FWH(3345) <-WINRUN(0) <-TWINDOW:ACTIVATE(1050)
    ------------------------------------------------------------    
20/01/2015 13:36:03: EXCESS RELEASE OF FONT Verdana[ hFont : 0] ( nCount : -52 )
     <-TFONT:END(246) <-TCONTROL:DESTROY(2182) <-TRBTN:DESTROY(954) <-TWINDOW:HANDLEEVENT(0) <-TCONTROL:HANDLEEVENT(1733) <-TRBTN:HANDLEEVENT(1596) <-_FWH(3345) <-WINRUN(0) <-TWINDOW:ACTIVATE(1050)
    ------------------------------------------------------------    
20/01/2015 13:36:03: EXCESS RELEASE OF FONT Verdana[ hFont : 0] ( nCount : -53 )
     <-TFONT:END(246) <-TCONTROL:DESTROY(2182) <-TRBTN:DESTROY(954) <-TWINDOW:HANDLEEVENT(0) <-TCONTROL:HANDLEEVENT(1733) <-TRBTN:HANDLEEVENT(1596) <-_FWH(3345) <-WINRUN(0) <-TWINDOW:ACTIVATE(1050)
    ------------------------------------------------------------    
20/01/2015 13:36:03: EXCESS RELEASE OF FONT Verdana[ hFont : 0] ( nCount : -54 )
     <-TFONT:END(246) <-TCONTROL:DESTROY(2182) <-TRBTN:DESTROY(954) <-TWINDOW:HANDLEEVENT(0) <-TCONTROL:HANDLEEVENT(1733) <-TRBTN:HANDLEEVENT(1596) <-_FWH(3345) <-WINRUN(0) <-TWINDOW:ACTIVATE(1050)
    ------------------------------------------------------------    
20/01/2015 13:36:03: EXCESS RELEASE OF FONT Verdana[ hFont : 0] ( nCount : -55 )
     <-TFONT:END(246) <-TCONTROL:DESTROY(2182) <-TRBTN:DESTROY(954) <-TWINDOW:HANDLEEVENT(0) <-TCONTROL:HANDLEEVENT(1733) <-TRBTN:HANDLEEVENT(1596) <-_FWH(3345) <-WINRUN(0) <-TWINDOW:ACTIVATE(1050)
    ------------------------------------------------------------    
20/01/2015 13:36:03: EXCESS RELEASE OF FONT Verdana[ hFont : 0] ( nCount : -56 )
     <-TFONT:END(246) <-TCONTROL:DESTROY(2182) <-TRBTN:DESTROY(954) <-TWINDOW:HANDLEEVENT(0) <-TCONTROL:HANDLEEVENT(1733) <-TRBTN:HANDLEEVENT(1596) <-_FWH(3345) <-WINRUN(0) <-TWINDOW:ACTIVATE(1050)
    ------------------------------------------------------------    
20/01/2015 13:36:03: EXCESS RELEASE OF FONT Verdana[ hFont : 0] ( nCount : -57 )
     <-TFONT:END(246) <-TCONTROL:DESTROY(2182) <-TRBTN:DESTROY(954) <-TWINDOW:HANDLEEVENT(0) <-TCONTROL:HANDLEEVENT(1733) <-TRBTN:HANDLEEVENT(1596) <-_FWH(3345) <-WINRUN(0) <-TWINDOW:ACTIVATE(1050)
    ------------------------------------------------------------    
20/01/2015 13:36:03: EXCESS RELEASE OF FONT Verdana[ hFont : 0] ( nCount : -58 )
     <-TFONT:END(246) <-TCONTROL:DESTROY(2182) <-TRBTN:DESTROY(954) <-TWINDOW:HANDLEEVENT(0) <-TCONTROL:HANDLEEVENT(1733) <-TRBTN:HANDLEEVENT(1596) <-_FWH(3345) <-WINRUN(0) <-TWINDOW:ACTIVATE(1050)
    ------------------------------------------------------------    
20/01/2015 13:36:03: EXCESS RELEASE OF FONT Verdana[ hFont : 0] ( nCount : -59 )
     <-TFONT:END(246) <-TCONTROL:DESTROY(2182) <-TRBTN:DESTROY(954) <-TWINDOW:HANDLEEVENT(0) <-TCONTROL:HANDLEEVENT(1733) <-TRBTN:HANDLEEVENT(1596) <-_FWH(3345) <-WINRUN(0) <-TWINDOW:ACTIVATE(1050)
    ------------------------------------------------------------    
20/01/2015 13:36:03: EXCESS RELEASE OF FONT Verdana[ hFont : 0] ( nCount : -60 )
     <-TFONT:END(246) <-TCONTROL:DESTROY(2182) <-TRBTN:DESTROY(954) <-TWINDOW:HANDLEEVENT(0) <-TCONTROL:HANDLEEVENT(1733) <-TRBTN:HANDLEEVENT(1596) <-_FWH(3345) <-WINRUN(0) <-TWINDOW:ACTIVATE(1050)
    ------------------------------------------------------------
Regards,



Hakan ONEMLI



Harbour & MSVC 2022 & FWH 23.06
Posts: 8515
Joined: Tue Dec 20, 2005 07:36 PM
Re: Strange Font Problem in fwh 1412
Posted: Tue Jan 20, 2015 12:09 PM
João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: Strange Font Problem in fwh 1412
Posted: Tue Jan 20, 2015 12:26 PM

Hakan,

Are you using any third party Class that it is not FWH standard ?

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 10733
Joined: Sun Nov 19, 2006 05:22 AM
Re: Strange Font Problem in fwh 1412
Posted: Tue Jan 20, 2015 01:55 PM

Thanks for sharing the log file.
Before responding, I rechecked FWH libraries.

Can you please clarify the following points?

1) Are you linking any modified classes from any older versions? If so please test with unmodified FWH 15.01.
2) Are you using any 3rd party libs where you assigned Verdana font?
3) You are using Verdana font. Fine. Please let us know how are you assigning the Verdana font to the RBBtns?
(a) While defining the button with FONT clause? ( eg FONT oVerdana ) OR
(b) oBtn:oFont := oVerdana (OR )
(c) oBtn:SetFont( oFont )
Please recheck your code and let us know if you adopted (a), (b) or (c)
4) If we do not get any clue from the above, I suggest you to create a totally new font with a different facename ( roman or some other ) and use that font exclusively only for RBBTNS. Then we'll be more clear if the offending code is in RBBtn or somewhere else.

Regards



G. N. Rao.

Hyderabad, India
Posts: 1387
Joined: Fri May 23, 2008 01:33 PM
Re: Strange Font Problem in fwh 1412
Posted: Wed Jan 21, 2015 07:22 PM

Hi Antonio, Mr. Rao,

I have found lots of oFont:=oVerdana syntax in my code. I have changed all to ...:SetFont(oVerdana).

It seems there is no log file at first. I should give the application to one customer.

I will inform you about the result.

Thanks.

Regards,



Hakan ONEMLI



Harbour & MSVC 2022 & FWH 23.06
Posts: 563
Joined: Sun Oct 09, 2005 07:23 PM
Re: Strange Font Problem in fwh 1412
Posted: Mon Jan 26, 2015 08:23 PM
With FW 15.1 we get this issue too:

Code (fw): Select all Collapse
26/01/15 20:29:30: EXCESS RELEASE OF FONT ARIAL[ hFont : 0] ( nCount : 1 )
     <-TFONT:END(246) <-TPRINTER:SETFONT(879) <-(b)TPRINTER(247) <-TPRINTER:GETTEXTWIDTH(0) <-TRLINE:SAY(95) <-TREPORT:ENDPAGE(1477) <-TREPORT:END(1402) <-INFORME(21041) <-FCONT_PRN(13823)
    ------------------------------------------------------------    
26/01/15 20:29:30: EXCESS RELEASE OF FONT ARIAL[ hFont : 0] ( nCount : 0 )
     <-TFONT:END(246) <-__OBJSENDMSG(0) <-OSEND(288) <-ASEND(256) <-TREPORT:END(1412) <-INFORME(21041) <-FCONT_PRN(13823) <-(b)FCONT_EDIT(13644) <-TBUTTON:CLICK(175)
    ------------------------------------------------------------    
26/01/15 20:29:30: EXCESS RELEASE OF FONT ARIAL[ hFont : 0] ( nCount : 0 )
     <-TFONT:END(246) <-__OBJSENDMSG(0) <-OSEND(288) <-ASEND(256) <-TREPORT:END(1412) <-INFORME(21041) <-FCONT_PRN(13823) <-(b)FCONT_EDIT(13644) <-TBUTTON:CLICK(175)
    ------------------------------------------------------------    
26/01/15 20:47:58: EXCESS RELEASE OF FONT ARIAL[ hFont : 0] ( nCount : 1 )
     <-TFONT:END(246) <-TPRINTER:SETFONT(879) <-(b)TPRINTER(247) <-TPRINTER:GETTEXTWIDTH(0) <-TRLINE:SAY(95) <-TREPORT:ENDPAGE(1477) <-TREPORT:END(1402) <-INFORME(21044) <-FCONT_PRN(13823)
    ------------------------------------------------------------    
26/01/15 20:47:58: EXCESS RELEASE OF FONT ARIAL[ hFont : 0] ( nCount : 0 )
     <-TFONT:END(246) <-__OBJSENDMSG(0) <-OSEND(288) <-ASEND(256) <-TREPORT:END(1412) <-INFORME(21044) <-FCONT_PRN(13823) <-(b)FCONT_EDIT(13644) <-TBUTTON:CLICK(175)
    ------------------------------------------------------------    
26/01/15 20:47:58: EXCESS RELEASE OF FONT ARIAL[ hFont : 0] ( nCount : 0 )
     <-TFONT:END(246) <-__OBJSENDMSG(0) <-OSEND(288) <-ASEND(256) <-TREPORT:END(1412) <-INFORME(21044) <-FCONT_PRN(13823) <-(b)FCONT_EDIT(13644) <-TBUTTON:CLICK(175)
    ------------------------------------------------------------
Posts: 563
Joined: Sun Oct 09, 2005 07:23 PM
Re: Strange Font Problem in fwh 1412
Posted: Mon Jan 26, 2015 08:29 PM
In line 1412 c:\fwh\source\classes\report.prg has:
Code (fw): Select all Collapse
   ASend( ::aFont, "End" )


What must be done with this line?.
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: Strange Font Problem in fwh 1412
Posted: Tue Jan 27, 2015 06:14 AM

Paz,

That line is fine.

Please check that all your app fonts assignments are done using oObject:SetFont( oFont )

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 1387
Joined: Fri May 23, 2008 01:33 PM
Re: Strange Font Problem in fwh 1412
Posted: Tue Jan 27, 2015 07:33 AM

Hi Antonio,

I have also checked all my app. I have changed all ofont:=oArial to ..:Setfont(oArial) but this error still occur.

Regards,



Hakan ONEMLI



Harbour & MSVC 2022 & FWH 23.06
Posts: 1387
Joined: Fri May 23, 2008 01:33 PM
Re: Strange Font Problem in fwh 1412
Posted: Tue Jan 27, 2015 08:13 AM

Hi Antonio,

I think I have found one more problem in my app.

I use oFont variable from app. main in my class. But I always ::oFont:End() it.

::oFont := oFont

I think its not the correct syntax. How can I clone ::oFont variable from oFont?

Thanks.

Regards,



Hakan ONEMLI



Harbour & MSVC 2022 & FWH 23.06
Posts: 1387
Joined: Fri May 23, 2008 01:33 PM
Re: Strange Font Problem in fwh 1412
Posted: Tue Jan 27, 2015 10:16 AM
Hi,

Is this function Ok for cloning Font?

Thanks

Code (fw): Select all Collapse
FUNCTION CLONE_Font(oFont)
LOCAL oResult
    IF oFont <> nil .AND. oFont:ClassName()="TFONT"
        WITH OBJECT oFont
            oResult := TFont():New(:cFaceName, :nInpWidth, :nInpHeight,,;
               :lBold, :nEscapement, :nOrientation, :nWeight, :lItalic,;
               :lUnderline, :lStrikeOut, :nCharSet, :nOutPrecision,;
               :nClipPrecision, :nQuality,,:nPitchFamily )
        END WITH
    ELSE
        oResult := TFont():New( "Verdana", 0, -12) // This is my default font
  ENDIF
RETURN oResult
Regards,



Hakan ONEMLI



Harbour & MSVC 2022 & FWH 23.06
Posts: 1387
Joined: Fri May 23, 2008 01:33 PM
Re: Strange Font Problem in fwh 1412
Posted: Wed Jan 28, 2015 07:22 AM

Hi Antonio,

Any comment?

Regards,



Hakan ONEMLI



Harbour & MSVC 2022 & FWH 23.06
Posts: 10733
Joined: Sun Nov 19, 2006 05:22 AM
Re: Strange Font Problem in fwh 1412
Posted: Wed Jan 28, 2015 01:24 PM
Is this function Ok for cloning Font?


Correct. But we should know that we are not creating a totally new object with totally new :hFont. This function actually returns the same object with its internal counter :nCount incremented.

Actually, the internal method :Modify() achieves the same effect.

oClone := Clone_Font( oArial ) // your method
is exactly same as
oClone := oArial:Modify() // inbuilt method without parameters.

Example:

DEFINE FONT oArial NAME "ARIAL" SIZE 0,-12
? oArial:nCount // --> 1
oClone := Clone_Font( oArial )
? oArial:nCount, oClone:nCount // --> 2, 2
? oArial:hFont == oClone:hFont // --> .T.
? HB_ArrayID( oArial ) == HB_ArrayID( oClone ) // --> .T.
( That means oArial and oClone two variable names referring to the same object)
oArial:End() // This is same as oClone:End()
? oArial:nCount, oClone:nCount // --> 1, 1
oArial:End() // This is same as oClone:End()
? oArial:nCount, oClone:nCount // --> 0, 0
? oArial:hFont, oClone:hFont // --> 0, 0

This is what we know from this:

oClone := oArial
Both oClone and oArial refer to same Font Handle and same font object but the internal counter (nCount) is not effected.
Single oArial:End() or oClone:End() is enough to Release this font resource.

oClone := Clone_Font( oArial ) ( same as oClone := oArial:Modify() )
Both oClone and oArial refer to same Font Handle and same font object but the internal counter (nCount) is incremented by 1.
That means we need to call oClone/oArial:End() twice to release the font resouce.

This is equivalent to
oClone := oArial
oArial( or oClone):nCount++
Regards



G. N. Rao.

Hyderabad, India