Where to search for these LOGfile-messages (fonts)?

[ukoenig]

Hello,

I searched for these two logfile-messages, but couldn't find the reason and where they come from.
There are three fonts defined at startup ( public ) and NO fonts destroyed inside the program.
Closing the program from the main-dialog nothing happens only after opening the second dialog going back and close.
It doesn' make any error but I would like to disable these messages for the final release.

11/30/17 16:18:52: EXCESS RELEASE OF FONT Arial[ hFont : 0] ( nCount : 0 )
<-TFONT:END(285) <-TCONTROL:DESTROY(2154) <-TBTNBMP:DESTROY(952) <-(b)TBTNBMP:TBTNBMP(178) <-TBTNBMP:END(0)
<-TXBRWCOLUMN:END(11021) <-TXBROWSE:DESTROY(889) <-TWINDOW:HANDLEEVENT(0) <-TCONTROL:HANDLEEVENT(1731)
------------------------------------------------------------
11/30/17 16:18:52: EXCESS RELEASE OF FONT Arial[ hFont : 0] ( nCount : -1 )
<-TFONT:END(285) <-TCONTROL:DESTROY(2154) <-TXBROWSE:DESTROY(938) <-TWINDOW:HANDLEEVENT(0)
<-TCONTROL:HANDLEEVENT(1731) <-TXBROWSE:HANDLEEVENT(10295) <-_FWH(3348) <-DIALOGBOX(0) <-TDIALOG:ACTIVATE(296)

I disabled the xBrowse-fonts and now I got only one message different from above !!!

11/30/17 18:27:29: EXCESS RELEASE OF FONT Arial[ hFont : 0] ( nCount : 0 )
<-TFONT:END(285) <-TCONTROL:DESTROY(2154) <-TBITMAP:DESTROY(493) <-TWINDOW:HANDLEEVENT(0) <-TCONTROL:HANDLEEVENT(1731)
<-TBITMAP:HANDLEEVENT(558) <-_FWH(3348) <-DIALOGBOX(0) <-TDIALOG:ACTIVATE(296)

Download

http://www.pflegeplus.com/DOWNLOADS/RGB3.zip

any idea to get exact infos what could be the reason or a point where to start searching ?

all buttons are normal defined like :

REDEFINE BTNBMP oBtn[6] ID 50 OF oDlgSetup ;
FILENAME c_path1 + "Exit.Bmp" ;
ACTION oDlgSetup:End() ;
TOOLTIP { "Exit" + CRLF + "Setup","EXIT", 1, CLR_BLACK, 14089979 } ;
PROMPT " &Exit " ;
FONT oSFont1 NOBORDER LEFT 2007 ;
GRADIENT { | lMouseOver | If( ! lMouseOver,;
{ { 0.50, 13356031, 16777215 }, ;
{ 0.50, 16777215, 13356031 } }, ;
{ { 0.50, 16761992, 16777215 }, ;
{ 0.50, 16777215, 16761992 } } ) }
oBtn[6]:nClrText := { |lMouseOver, oBtn| If( lMouseOver, 255, 0 ) }

NO logfile is written closing the program without opening dialog 2 < Setup >



A logfile is created opening dialog two going back and close



regards
Uwe

[ukoenig]

It seems that I found the problem

I tested to paint another folder inside a folderpage
Because I didn't notice any problem it was ok for me.
To find the problem of the logfile I tested with empty pages and found the problem on page 1.
I deleted the folder-test and got NO logfile written.
I think this sample is not tested before.

REDEFINE FOLDEREX oFld1 ID 500 OF [b]oFld:aDialogs[ 1 ][/b] PROMPT "Tab 1", "Tab 2", "Tab 3", "Tab 4", "Tab 5";
DIALOGS "Page", "Page", "Page", "Page", "Page" ;
ROUND 5 FONT oSFont UPDATE



regards
Uwe

[Marc Venken]

Hey Uwe,

Again I see very nice layouts with lots of colors.

I'm converting my 16b and have many recources in Workshop. (all Grey)

I can copy past them and edit the file (also see it with Pelles)
There are however and I think all Borland related rc's that have to be removed or changed.

Could you share some of you Rc's, so that I can look into them for the conversion ?

Marc