FiveTech Software tech support forums

hi Antonio,

Antonio Linares wrote:So if you modify DATA nFdHeight you could change its position automatically

ok, thx for Answer

... cResName )      DEFINE DIALOG oDlg OF Self STYLE WS_CHILD ;         FROM 0, 0 TO oThis:nHeight - oThis:nFdHeight - 5, oThis:nWidth - 6 PIXEL   else      DEFINE DIALOG oDlg OF Self STYLE WS_CHILD ;         FROM ...

... Size 100 x 100 TFolderEx() have "nFolderHeight" but TFolder() not so how to "calculate" Size of ::Dialogs --- have found "nFdHeight" in TFolder() ,,, have different Name

Y podemos ajustarlo modificando el dato nFdHeight del folder: test.prg #include "FiveWin.ch" function Main()    local oDlg, oFld1, oFld2      DEFINE DIALOG oDlg RESOURCE "Test"    REDEFINE FOLDER oFld1 ;      PROMPTS ...

Hi everybody, The problem is at Initiate Method. ::nHeight() - ::nFdHeight() - 4 If I change to -22 fixes this ONLY when folder is multiline, otherwise any "normal" folder looks wrong at bottom. It needs a validation when is multiline and when ...

Dietmar,

Please try to increase oFolder:nFdHeight with larger values, i.e.:

oFolder:nFdHeight += 15

Do it after the REDEFINE FOLDER ... command. You should notice that the contained dialogs top margins change.

Dietmar,

oFolder:nFdHeight keeps the height value of the tabs but does not modify it. That value is used to place the top margin of the contained dialogs.

Is the line still erased ? Please post a screenshot, thanks

   oFolder:nFdHeight += 5

try with different values there, thanks

This one does not change the itemsize but the last 5 pixel at the bottom of the folder are not painted..
D.

Dietmar, Then it means that DrawPBack() is not erasing that line. Lets modify oFolder:nFdHeight which holds the height of the tabs to position the contained dialogs:    REDEFINE FOLDER oFolder             ;        ID 102                           ;        OF oDlg   ...

... if ::lPaint FoldPaint( ::hWnd, ::hDC, ::aPrompts, ::oFont:hFont,; ::oFont2:hFont, ::nClrPane, ::nOption, ::aEnable, ::nTabSize,; ::lWin95Look, ::nFdHeight ) endif return nil y el ON init oFold:lPaint:=.t. , oFold:Hide() , oFold:Show() y me queda un TPAGES que lo manjejo con oFold:SetOption desde ...

SR. ANTONIO, oFolder:nFdHeight = 40 // prueba con distintos valores oFolder:ReSize( , oFolder:nWidth, oFolder:nHeight ) Desde ON INIT, resouveu o problema, porém isso é palheativo. Assim que a classe TFOLDER for corrigida o senhor poderia ...

Prueba a hacer lo siguiente,
despues de crear el folder modifica su DATA nFdHeight

oFolder:nFdHeight = 40 // prueba con distintos valores
oFolder:ReSize( , oFolder:nWidth, oFolder:nHeight )

Vamos a buscar la forma de obtener el dato nFdHeight automaticamente

Ciao Otto

I use a Big Font and

oFld:nFdHeight := 35

Maurizio

Dear Maurizio & Antonio,

- oFld:nFdHeight is not fix Tab Header Width.
- Add space is not fixed correctly even use Courier FONT but this is the best way we can now.

Thanks & regards,
Dutch

I use

oFld:nFdHeight := 35

regards MAurizio