Not Releasing Font

[Gale FORd]

Now that I have checkres() working I am having a problem with fonts not being released. The defined fonts in my MDI application will not release.
So I created a small example program using testmdi.prg as my starting point. I added a define font and then release it after the main window closes.
When I run checkres() it shows the font has not been released.

Here is the source code.

Code: Select all  Expand view

// Working with MDI enviroments

#include "FiveWin.ch"
static oWnd
//----------------------------------------------------------------------------//
function Main()
   local oWndEdit, oBar, oIcon, oImage
   local cName := "FiveWin power"
   local oFont

   SetResDebug(.t.)
   DEFINE FONT oFont NAME "Arial" SIZE 10, 16

   DEFINE ICON oIcon RESOURCE "test"
   DEFINE WINDOW oWnd FROM 1, 1 TO 20, 70 TITLE "I am the MDI Frame" ;
      MDI ;
      MENU BuildMenu() ; // COLOR "GR+*/RB"
      ICON oIcon
   SET MESSAGE OF oWnd TO "Main Window"
   DEFINE WINDOW oWndEdit MDICHILD OF oWnd FROM 2, 2 TO 20, 50 ;
      TITLE "I am a MDI Child" COLOR "W+/R"
   @ 4, 2 GET cName OF oWndEdit SIZE 170, 25 COLOR "BG+/B"
   DEFINE BUTTONBAR oBar _3D OF oWndEdit
   DEFINE BUTTON OF oBar
   SET MESSAGE OF oWndEdit TO "Child Window"
   ACTIVATE WINDOW oWndEdit
   ACTIVATE WINDOW oWnd MAXIMIZED ;
      VALID MsgYesNo( "Want to End ?" )

   RELEASE FONT oFont
   CHECKRES()
return nil

//----------------------------------------------------------------------------//

function BuildMenu()
   local oMenu
   MENU oMenu
      MENUITEM "&Information"
      MENU
         MENUITEM "&About..." ACTION MsgAbout( "FiveWin", "FiveTech" )
         SEPARATOR
         MENUITEM "&End..." ACTION oWnd:End()
      ENDMENU
      MENUITEM "&Child Windows"
      MENU
         MENUITEM "&Tiled" ACTION oWnd:Tile()
         MENUITEM "&Cascade" ACTION oWnd:Cascade()
      ENDMENU
   ENDMENU
return oMenu
//----------------------------------------------------------------------------//
 

here is the checkres.txt

07/14/11 16:04:38: FONT,671758303,TMDICLIENT:GETFONT(2784)->TMDICLIENT:NEW(142)->TMDIFRAME:NEW(170)->MAIN(23)

[Gale FORd]

If I comment out the Release Font command I get 2 font objects that are still there.
It looks like when I used the "release font" command it released 1 instance of the font but left the other. I am a little confused about this.

Here is the results in checkres.txt file.

07/14/11 16:17:54: FONT,-250988618,MAIN(16)
07/14/11 16:17:54: FONT,973748195,TMDICLIENT:GETFONT(2784)->TMDICLIENT:NEW(142)->TMDIFRAME:NEW(170)->MAIN(23)
07/14/11 16:17:54: ====================================================================================================

[Enrico Maria Giordano]

This is a reduced sample of the problem:

Code: Select all  Expand view

#include "Fivewin.ch"


FUNCTION MAIN()

    LOCAL oWnd, oChild

    DEFINE WINDOW oWnd MDI

    SET MESSAGE OF oWnd TO "Main Window"

    DEFINE WINDOW oChild MDICHILD OF oWnd

    ACTIVATE WINDOW oChild

    ACTIVATE WINDOW oWnd

    CHECKRES()

    RETURN NIL

EMG

[ukoenig]

Maybe possible to Test xBrowse as well ?
( searching for non released objects )

1.
I used 3 Fonts : oSysfont, oHeadFont and oTextFont.
oTextFont is not released.

Closing the Mainwindow :

oSysFont:End()
oHeadFont:End()
oTextFont:End()

07/15/11 11:43:29: FONT,-318105223,MAIN(138) // oTextfont

2.
From the xBrowse-section, I defined a Brush inside a Function like :

oBrw1:CreateFromCode()
BRW_BRUSH( oBrw1, nTStyle, lTGrad, nTColorF, nTColorB, nTGradPos, cTBrush, cTImage )

( the Brush is not released )

Inside the Function BRW_BRUSH(oObject, ............) :

DEFINE BRUSH oNewBrush FILENAME c_path + "\Bitmaps\" + cTBrush
oObject:SetBackGround( oNewBrush, BCK_TILED )
oObject:Refresh()
oNewBrush:End()

07/15/11 11:43:29: BMP -> ResizeImg,-167439571,TXBROWSE:SETBACKGROUND(5073)->BRW_BRUSH(5204)->TEST_DLG(5129)->(b)MAIN(552)->TBTNBMP:CLICK(463)->TBTNBMP:LBUTTONUP(658)->TCONTROL:HANDLEEVENT(1489)->TBTNBMP:HANDLEEVENT(1450)->_FWH(3394)->WINRUN(0)->TWINDOW:ACTIVATE(978)->MAIN(584)

07/15/11 11:43:29: BRUSH,286267419,TXBROWSE:SETBACKGROUND(5082)->BRW_BRUSH(5204)->TEST_DLG(5129)->(b)MAIN(552)->TBTNBMP:CLICK(463)->TBTNBMP:LBUTTONUP(658)->TCONTROL:HANDLEEVENT(1489)->TBTNBMP:HANDLEEVENT(1450)->_FWH(3394)->WINRUN(0)->TWINDOW:ACTIVATE(978)->MAIN(584)

Best Regards
Uwe

[Gale FORd]

What is the status of this? I am concerned the font objects are not getting released.

[ukservice]

Hello.

I reported some month ago.

Not all controls are released.

Also, sometimes bitmaps just evaporate.

It is very important.

[Gale FORd]

OK, I guess I am being ignored. This is really disappointing

[nageswaragunupudi]

OK, I guess I am being ignored. This is really disappointing

Not at all. You are not ignored. It is just that you have given the FWH team some home work to do before they respond.

[Gale FORd]

OK, thanks.
I guess the new version (11.07) does not address this

[nageswaragunupudi]

Please apply this fix to mdichild.prg:
Please comment out the statement "::oFont:nCount++" at line 219 (fwh11.06 & 11.07)

Code: Select all  Expand view

  ::GetFont()
   if ::oFont != nil
//      ::oFont:nCount++  // comment out this line
   endif
 

[nageswaragunupudi]

Please also apply the following fix to msgbar.prg.

Please comment out two lines 197 and 199 (fwh 11.06 and 11.07) in the method Default() like this:

Code: Select all  Expand view

  if ::oFont == nil
      DEFINE FONT ::oFont NAME GetSysFont() SIZE 0, -12
//      if ::oFont:lNew
         ::oFont:nCount--
//      endif
   endif
 

[nageswaragunupudi]

Mr Uwe

Do you mind posting a self contained simple sample code, preferably in a separate thread?

I find xbrowse is properly releasing brushes and fonts with recent versions. In case there is some problem which I could not notice, we can fix if you can provide a simpler sample.

[ukoenig]

Mr. Rao,

3 Fonts defined
1. Get
2- Button
3. xBrowse



Added a Browser to Sample < Testd.prg >

Code: Select all  Expand view

#INCLUDE "FIVEWIN.CH"
#include "xbrowse.ch"
         
FUNCTION MAIN()

LOCAL ODLG, ;
oFont1, ;
oFont2, ;
oFont3, ;
DNOM     := SPACE(40), ;
DSURNOM  := SPACE(40), ;
DTEL     := SPACE(10), ;
DPOSTAL  := SPACE(05), ;
DREFCDE  := SPACE(40), ;
LSAVE    := .F. , ;
DVILLE   := SPACE(30),aFont

SetResDebug( .t. )

DEFINE FONT oFONT1 NAME "Arial" SIZE 0,-16 BOLD
DEFINE FONT oFONT2 NAME "Arial" SIZE 0,-12 BOLD
DEFINE FONT oFONT3 NAME "Arial" SIZE 0,-18 BOLD

DEFINE DIALOG ODLG RESOURCE "DEV02"

REDEFINE GET DNOM    ID 201 OF ODLG PICTURE REPLICATE("X",40)
REDEFINE GET DSURNOM ID 202 OF ODLG PICTURE REPLICATE("X",40)
REDEFINE GET DVILLE  ID 203 OF ODLG PICTURE REPLICATE("!",30)
REDEFINE GET DREFCDE ID 204 OF ODLG FONT oFont1
REDEFINE GET DTEL    ID 205 OF ODLG PICTURE "@R XX-XX-XX-XX-XX"
REDEFINE GET DPOSTAL ID 206 OF ODLG PICTURE "@Z 99999"

REDEFINE XBROWSE oBrw ID 101  ;
HEADERS "An array", "test" ;
OF oDlg ;
ARRAY { { "first", "row" }, { "second", "row" } } AUTOCOLS ;
COLORS CLR_WHITE, CLR_BLUE
oBrw:SetFont( oFont3 )

REDEFINE BTNBMP RESOURCE "BUTCAN" ID 02 OF ODLG FONT oFont2 ;
ACTION(LSAVE := .F., ODLG:END() )

REDEFINE BTNBMP RESOURCE "BUTOK" ID 01 OF ODLG ;
ACTION LSAVE := .T., ODLG:END()

ACTIVATE DIALOG ODLG CENTERED

oFont1:End()
oFont2:End()
oFont3:End()

CheckRes()

RETURN NIL
 

Resource ( xBrowse added ) :

Code: Select all  Expand view

#include "..\include\winapi.ch"

test.rc

produced by Borland Resource Workshop

BUTCAN BITMAP LOADONCALL MOVEABLE
{
 '42 4D 56 05 00 00 00 00 00 00 76 00 00 00 28 00'
 '00 00 3F 00 00 00 27 00 00 00 01 00 04 00 00 00'
 '00 00 E0 04 00 00 00 00 00 00 00 00 00 00 00 00'
 '00 00 00 00 00 00 00 00 00 00 00 00 80 00 00 80'
 '00 00 00 80 80 00 80 00 00 00 80 00 80 00 80 80'
 '00 00 C0 C0 C0 00 80 80 80 00 00 00 FF 00 00 FF'
 '00 00 00 FF FF 00 FF 00 00 00 FF 00 FF 00 FF FF'
 '00 00 FF FF FF 00 00 00 00 00 00 00 00 00 00 00'
 '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00'
 '00 00 00 00 00 00 07 77 77 77 77 77 77 77 77 77'
 '77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77'
 '77 77 77 77 77 00 07 77 77 77 77 77 77 77 77 77'
 '77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77'
 '77 77 77 77 77 00 07 77 77 77 77 77 77 77 77 77'
 '77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77'
 '77 77 77 77 77 00 07 77 77 77 77 77 77 77 77 77'
 '77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77'
 '77 77 77 77 77 00 07 77 77 77 77 77 77 77 77 77'
 '77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77'
 '77 77 77 77 77 00 07 77 77 77 77 77 77 77 77 77'
 '77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77'
 '77 77 77 77 77 00 07 77 77 77 77 77 77 77 77 77'
 '77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77'
 '77 77 77 77 77 00 07 77 77 77 77 77 77 77 77 77'
 '77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77'
 '77 77 77 77 77 00 07 77 77 70 07 77 77 77 77 77'
 '77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77'
 '77 77 77 77 77 00 07 77 79 11 00 77 77 77 79 07'
 '77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77'
 '77 77 77 77 77 00 07 77 79 11 10 77 77 77 91 00'
 '77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77'
 '77 77 77 77 77 00 07 77 79 11 10 07 77 77 91 10'
 '07 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77'
 '77 77 77 77 77 00 07 77 79 11 11 00 77 79 11 11'
 '00 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77'
 '77 77 77 77 77 00 07 77 79 91 11 10 07 91 11 11'
 '10 07 77 77 77 77 77 77 77 77 77 77 77 77 77 77'
 '77 77 77 77 77 00 07 77 77 91 11 11 00 11 11 11'
 '10 07 77 77 07 07 77 07 07 77 07 70 07 07 07 70'
 '00 77 07 77 77 00 07 77 77 99 11 11 11 11 11 11'
 '07 07 77 77 07 07 77 07 07 77 07 07 70 07 07 07'
 '77 07 07 77 77 00 07 77 77 79 91 11 11 11 11 10'
 '77 70 00 00 77 07 77 07 07 77 07 07 77 07 07 07'
 '77 77 07 77 77 00 07 77 77 77 99 11 11 11 11 07'
 '77 70 77 70 77 07 77 07 07 77 07 07 77 07 07 00'
 '00 07 07 77 77 00 07 77 77 77 79 91 11 11 10 77'
 '77 70 77 70 77 00 77 07 00 77 07 07 77 07 07 07'
 '77 07 07 77 77 00 07 77 77 77 77 91 11 11 10 77'
 '77 77 07 07 77 07 00 77 07 00 77 07 77 07 07 70'
 '00 77 00 77 77 00 07 77 77 77 77 91 11 11 10 07'
 '77 77 07 07 77 77 77 77 77 77 77 77 77 77 07 77'
 '77 77 77 77 77 00 07 77 77 77 77 91 11 11 11 00'
 '77 77 70 77 77 77 77 77 77 77 77 77 77 77 07 77'
 '77 77 77 77 77 00 07 77 77 77 79 11 11 11 11 10'
 '77 77 70 77 77 77 77 77 77 77 77 77 77 77 07 77'
 '77 77 77 77 77 00 07 77 77 77 79 11 11 99 11 10'
 '07 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77'
 '77 77 77 77 77 00 07 77 77 77 91 11 10 79 91 11'
 '00 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77'
 '77 77 77 77 77 00 07 77 77 77 91 11 07 77 99 11'
 '10 07 77 77 77 77 77 77 77 77 77 77 77 77 77 77'
 '77 77 77 77 77 00 07 77 77 79 11 11 07 77 79 91'
 '11 00 77 77 77 77 77 77 77 77 77 77 77 77 77 77'
 '77 77 77 77 77 00 07 77 77 79 11 10 77 77 77 99'
 '11 10 07 77 77 77 77 77 77 77 77 77 77 77 77 77'
 '77 77 77 77 77 00 07 77 77 99 91 10 77 77 77 79'
 '91 11 07 77 77 77 77 77 77 77 77 77 77 77 77 77'
 '77 77 77 77 77 00 07 77 77 77 99 97 77 77 77 77'
 '99 11 77 77 77 77 77 77 77 77 77 77 77 77 77 77'
 '77 77 77 77 77 00 07 77 77 77 77 77 77 77 77 77'
 '79 97 77 77 77 77 77 77 77 77 77 77 77 77 77 77'
 '77 77 77 77 77 00 07 77 77 77 77 77 77 77 77 77'
 '77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77'
 '77 77 77 77 77 00 07 77 77 77 77 77 77 77 77 77'
 '77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77'
 '77 77 77 77 77 00 07 77 77 77 77 77 77 77 77 77'
 '77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77'
 '77 77 77 77 77 00 07 77 77 77 77 77 77 77 77 77'
 '77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77'
 '77 77 77 77 77 00 07 77 77 77 77 77 77 77 77 77'
 '77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77'
 '77 77 77 77 77 00 07 77 77 77 77 77 77 77 77 77'
 '77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77'
 '77 77 77 77 77 00 C0 00 00 00 00 00 00 00 00 00'
 '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00'
 '00 00 00 00 00 00'
}


BUTOK BITMAP LOADONCALL MOVEABLE
{
 '42 4D 56 05 00 00 00 00 00 00 76 00 00 00 28 00'
 '00 00 3F 00 00 00 27 00 00 00 01 00 04 00 00 00'
 '00 00 E0 04 00 00 00 00 00 00 00 00 00 00 00 00'
 '00 00 00 00 00 00 00 00 00 00 00 00 80 00 00 80'
 '00 00 00 80 80 00 80 00 00 00 80 00 80 00 80 80'
 '00 00 C0 C0 C0 00 80 80 80 00 00 00 FF 00 00 FF'
 '00 00 00 FF FF 00 FF 00 00 00 FF 00 FF 00 FF FF'
 '00 00 FF FF FF 00 00 00 00 00 00 00 00 00 00 00'
 '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00'
 '00 00 00 00 00 00 07 88 88 88 88 88 88 88 88 88'
 '88 88 88 88 88 88 88 88 88 88 88 88 88 88 88 88'
 '88 88 88 88 88 00 07 78 88 88 88 88 88 88 88 88'
 '88 88 88 88 88 88 88 88 88 88 88 88 88 88 88 88'
 '88 88 88 88 88 00 07 77 77 77 77 77 77 77 77 77'
 '77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77'
 '77 77 77 77 88 00 07 77 77 77 77 77 77 77 77 77'
 '77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77'
 '77 77 77 77 88 00 07 77 77 77 77 77 77 77 77 77'
 '77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77'
 '77 77 77 77 88 00 07 77 77 77 77 77 77 77 77 77'
 '77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77'
 '77 77 77 77 88 00 07 77 77 77 77 77 77 88 87 77'
 '77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77'
 '77 77 77 77 88 00 07 77 77 77 77 77 78 88 88 77'
 '77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77'
 '77 77 77 77 88 00 07 77 77 77 77 77 44 48 88 87'
 '77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77'
 '77 77 77 77 88 00 07 77 77 77 77 74 22 44 88 88'
 '77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77'
 '77 77 77 77 88 00 07 77 77 77 77 A2 22 24 48 88'
 '87 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77'
 '77 77 77 77 88 00 07 77 77 77 7A 22 22 22 44 88'
 '88 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77'
 '77 77 77 77 88 00 07 77 77 77 7A 22 22 22 24 48'
 '88 87 77 77 77 77 77 77 77 77 77 77 77 77 77 77'
 '77 77 77 77 88 00 07 77 77 77 7A 22 22 22 22 44'
 '88 88 77 77 77 77 77 77 77 77 77 77 77 77 77 77'
 '77 77 77 77 88 00 07 77 77 77 7A 22 22 22 22 24'
 '48 88 87 77 77 77 77 77 00 00 07 77 77 70 07 77'
 '77 00 77 77 88 00 07 77 77 77 7A 22 22 22 22 22'
 '44 88 88 77 77 77 77 00 07 77 00 07 77 70 07 77'
 '70 07 77 77 88 00 07 77 77 77 7A 22 22 2A A2 22'
 '24 48 88 87 77 77 77 00 77 77 70 07 77 70 07 77'
 '00 77 77 77 88 00 07 77 77 77 7A 22 22 48 AA 22'
 '22 44 88 88 77 77 70 07 77 77 77 00 77 70 07 70'
 '07 77 77 77 88 00 07 77 77 77 7A 22 22 48 8A A2'
 '22 24 48 88 77 77 70 07 77 77 77 00 77 70 07 00'
 '77 77 77 77 88 00 07 77 77 77 7A 22 22 48 87 AA'
 '22 22 44 88 87 77 70 07 77 77 77 00 77 70 00 07'
 '77 77 77 77 88 00 07 77 77 77 7A A2 22 48 87 7A'
 'A2 22 24 88 88 77 70 07 77 77 77 00 77 70 00 77'
 '77 77 77 77 88 00 07 77 77 77 77 A2 22 47 77 77'
 'AA 22 24 48 88 87 70 07 77 77 77 00 77 70 00 07'
 '77 77 77 77 88 00 07 77 77 77 77 AA AA 27 77 77'
 '7A A2 22 44 88 88 70 07 77 77 77 00 77 70 07 00'
 '77 77 77 77 88 00 07 77 77 77 77 77 77 77 77 77'
 '77 AA 22 24 48 88 77 00 77 77 70 07 77 70 07 70'
 '07 77 77 77 88 00 07 77 77 77 77 77 77 77 77 77'
 '77 7A A2 22 44 88 77 00 07 77 00 07 77 70 07 77'
 '00 77 77 77 88 00 07 77 77 77 77 77 77 77 77 77'
 '77 77 AA 22 24 48 88 77 00 00 07 77 77 70 07 77'
 '70 07 77 77 88 00 07 77 77 77 77 77 77 77 77 77'
 '77 77 7A A2 22 44 88 77 77 77 77 77 77 77 77 77'
 '77 77 77 77 88 00 07 77 77 77 77 77 77 77 77 77'
 '77 77 77 AA 22 24 88 77 77 77 77 77 77 77 77 77'
 '77 77 77 77 88 00 07 77 77 77 77 77 77 77 77 77'
 '77 77 77 7A A2 24 88 77 77 77 77 77 77 77 77 77'
 '77 77 77 77 88 00 07 77 77 77 77 77 77 77 77 77'
 '77 77 77 77 AA 24 88 77 77 77 77 77 77 77 77 77'
 '77 77 77 77 88 00 07 77 77 77 77 77 77 77 77 77'
 '77 77 77 77 7A A2 77 77 77 77 77 77 77 77 77 77'
 '77 77 77 77 88 00 07 77 77 77 77 77 77 77 77 77'
 '77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77'
 '77 77 77 77 88 00 07 77 77 77 77 77 77 77 77 77'
 '77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77'
 '77 77 77 77 88 00 07 77 77 77 77 77 77 77 77 77'
 '77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77'
 '77 77 77 77 88 00 07 77 77 77 77 77 77 77 77 77'
 '77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77'
 '77 77 77 77 88 00 07 77 77 77 77 77 77 77 77 77'
 '77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77'
 '77 77 77 77 78 00 04 77 77 77 77 77 77 77 77 77'
 '77 77 77 77 77 77 77 77 77 77 77 77 77 77 77 77'
 '77 77 77 77 77 00 44 00 00 00 00 00 00 00 00 00'
 '00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00'
 '00 00 00 00 00 00'
}


DEV02 DIALOG 7, 16, 259, 343
STYLE DS_ABSALIGN | DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU
CAPTION "Recherche N\xB0"
FONT 8, "MS Sans Serif"
{
 EDITTEXT 201, 54, 5, 200, 12
 EDITTEXT 202, 54, 32, 200, 12
 EDITTEXT 203, 54, 62, 139, 14
 EDITTEXT 204, 54, 87, 200, 15
 EDITTEXT 205, 54, 119, 73, 12, ES_UPPERCASE | WS_BORDER | WS_TABSTOP
 EDITTEXT 206, 220, 120, 34, 12, ES_UPPERCASE | WS_BORDER | WS_TABSTOP
 CTEXT "&Nom du Client", -1, 3, 5, 47, 12, SS_CENTER | WS_BORDER | WS_GROUP
 CTEXT "&Ville", -1, 3, 64, 47, 12, SS_CENTER | WS_BORDER | WS_GROUP
 CTEXT "&Note confidentielle", -1, 3, 85, 47, 20, SS_CENTER | WS_BORDER | WS_GROUP
 CTEXT "Mot clé", -1, 3, 32, 47, 12, SS_CENTER | WS_BORDER | WS_GROUP
 CTEXT "Code Postal", -1, 164, 119, 48, 12, SS_CENTER | WS_BORDER | WS_GROUP
 CTEXT "Téléphone", -1, 3, 119, 48, 12, SS_CENTER | WS_BORDER | WS_GROUP
 CONTROL "", 1, "TBTNBMP", 0 | WS_CHILD | WS_VISIBLE | WS_BORDER, 5, 311, 47, 25
 CONTROL "", 2, "TBTNBMP", 0 | WS_CHILD | WS_VISIBLE | WS_BORDER, 206, 311, 47, 25
 CONTROL "", 101, "TXBrowse", 0 | WS_CHILD | WS_VISIBLE | WS_VSCROLL | WS_HSCROLL | WS_TABSTOP, 6, 154, 245, 141
}
 

Best Regards
Uwe

[nageswaragunupudi]

Mr Uwe
Please post the source code so that I can compile and test here.

[ukoenig]

Mr. Rao,

added Source !!!

Best Regards
Uwe