Error on Bpainted of BTNBMP

[Silvio.Falconi]

I try yo resize a dialog
on this dialog I have btnbmp where I call a Myfunction on bPainted
it write the number at the left bottom of btnbmp

I have also an oldest fwh
to write the numbers I use this function

Code: Select all  Expand view  RUN

FUNCTION DrawText2( hDC, hFont, nBkMode, cText, nTop, nLeft, nWidth, nHeight,color,color2 )
LOCAL hFontOld:= SelectObject( hDC, hFont )
LOCAL nBkOld := SetBkMode( hDC, nBkMode )
SetTextColor( hDC, color )
setBkColor( hDC, color2 )
DrawText( hDC, cText, { nTop, nLeft, nTop+nWidth, nLeft+nHeight } )
SelectObject( hDC, hFontOld )
SetBkMode( hDC, nBkOld )
RETURN( NIL )

When Iresize the dialog all buttons are resized but the numbers change the position and then go away

I try also to recall bpainted function on odlg:resize with no success

Before without resize


With small resize


with big resize

[Silvio.Falconi]

Any solution ?

[Antonio Linares]

Silvio,

You have to paint the numbers again

[Silvio.Falconi]

Antonio,
When i resize i recall the function write the numbers
perhaps the number is wrote on x,y,k,z coordinates and then resize is changed the size of button