FiveTech Software tech support forums

Mr. Rao,

THanks a lot for your suggestion.

After line 2 I got an error : "Invalid image".

Another problem: in the first line there are nNewHeight and nNewWitdth.
But I need to know the height and width of the original image first.
Then I have to calculate the new value by adding a percentage.

How ...

... lado quisiera que el combo aparezca exactamente del mismo tamaño que los get. He probado con HEIGHTGET , SELHEIGHT, oCbx:nSelectionHeight := <nNewHeight> y no funciona. Lo he logrado reducir cambiando el tamaño de la fuente del control (oCbx:SetFont(oFontCbx) ) pero creo que debería haber una ...

On resource, try

ACTIVATE DIALOG oDlg ON INIT oCbx:nSelectionHeight := <nNewHeight>

Mr Rao,
A small problem with SendMessage( oCbx:hWnd, 0x0153, -1, nNewHeight ),combobox be blue colored background on init .

Regards!
Shuming Wang

... function in ?)
WINDOW.PRG 546 1461 1773

NMSG
WINDOW.PRG 637 638 737 738 807 808 3827! 3836

NNEW
WINDOW.PRG 916 916 917 917

NNEWHEIGHT
WINDOW.PRG 642 1819 1822

NNEWWIDTH
WINDOW.PRG 727 1857 1860

NNOT() (function in ?)
WINDOW.PRG 3967 3986

NNOTIFYCODE
WINDOW.PRG 1374 ...

... TScrWnd():New(oDlg, 1, nDlgH, 1, nDlgW) // Dialog-size

In Relation to the Image-size, I used a Factor to adjust the Thumb-pos like :

If nNewHeight >= 760 .or. nNewWidth >= 760 // image-size
oScroll:SetScroll( 1, 9 , 1, 12 )
Endif

This sample shows the Thumb on Image-bottom.

Because I ...

Dutch,

oButton:SetSize( nWidth, nHeight [, lRepaint ] )

or:

oButton:nWidth := nNewWidth
oButton:nHeight := nNewHeight

bmpResized := ResizeBmp( hOldBmp, nNewWidth, nNewHeight )
Maybe a possible solution, to use

StretchBlt()

for the new Brush-functions in FWH-9.06, to get the Image-Brush adjusted to the Dialog ???


The ResizeBmp function internally uses StretchBlt(). So using resizebmp is like using stretchblt ...

... BTNBMP oBtn1 ID 100 OF oDlg3 ;
NOBORDER ;
FILENAME "./project/palm.bmp" ;
PROMPT "Button 1" ;
FONT oFont1 ;
RIGHT
oBtn1:lTransparent = .t.
oBtn1:cTooltip := "Button1"

That doesn't work !!!
---------------------------
obtn1:nHeight := nNewheight // User defined
oBtn1:nWidth := nNewWidth

Regards
Uwe

Otto,

You can use:

oControl:SetSize( nWidth, nHeight [, lRepaint ] )

or

oControl:nHeight = nNewHeight
oControl:nWidth = nNewWidth

Silvio,

It is is a bitmap control then you can do:

oBmp:SetSize( nNewWidth, nNewHeight )

to know its dimensions:

oBmp:nWidth
oBmp:nHeight

or is it a bitmap that you are managing in memory (and not a visible control) ?

Shuming,

You can do:

oDlg:nTop = nNewTop
oDlg:nLeft = nNewLeft
oDlg:nWidth = nNewWidth
oDlg:nHeight = nNewHeight

JM,

oDlg:SetSize( nWidth, nHeight )

o por separado:

oDlg:nWidth = nNewWidth
oDlg:nHeight = nNewHeight

Gustavo,

oDlg:SetSize( nNewWidth, nNewHeight )

or simply:

oDlg:nWidth := ...
oDlg:nHeight := ...

With oDlg:SetSize() you do it in one single step.

You may use oPrinter:SetSize( nNewWidth, nNewHeight )