FiveTech Software tech support forums

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

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   ...

Code: Select all  Expand view

function DrawPBack()
return nil
 

This way no fill painting will be done and we can check if the line is visible. Thanks for your feedback

Sorry, same result, the line is not visible,
Dietmar

Dietmar, When clause TRANSPARENT is used on the folder, it sets all the contained dialogs to call DrawPBack() to fill each dialog surface. This function may be erasing that line. To check it, please add this dummy function ...

with 19 the painting is ok, but this is standard size.
In our case 25 would look a lot better. We use this in another folder, where transparent is not needed.
The TRANSPARENT-clause seems to erase the line under the folders??
Can this be fixed?
Dietmar

Dietmar, Ok, Now I see what you mean, thanks :-) Using 20, instead of 25, seems to improve it     ACTIVATE DIALOG oDlg CENTER;       On INIT IIF(IsThemeActive(), oFolder:SetItemsize( ,20 ), ) //---> ...

Dietmar, The method that you have to use is already implemented in FWH Class TFolder :-)     ACTIVATE DIALOG oDlg CENTER ;       ON INIT oFolder:SetItemSize( 200, 30 )  Antonio, I know and use this method. (see last ...

Dietmar,

The method that you have to use is already implemented in FWH Class TFolder

Code: Select all  Expand view

    ACTIVATE DIALOG oDlg CENTER ;
       ON INIT oFolder:SetItemSize( 200, 30 )
 

Dietmar,

You could easily test it doing:

Code: Select all  Expand view

SendMessage( oFolder:hWnd, TCM_SETPADDING, 0, nMakeLong( 20, 20 ) )
 

Dietmar, We are reviewing Windows include\commctrl.h where all styles and messages for folders are defined. Maybe this message could help: TCM_SETITEMSIZE http://msdn.microsoft.com/en-us/library/bb760635(VS.85).aspx ...

To make things clearer, this it the result:



Without transparent clause, the folders are painted ok.

How can this be fixed?
Dietmar

... below once compiled with TRANSPARENT once without (with themes in RC-file) I'm using FWH 9.07. How can this be fixed? Thanks for help, Dietmar #include "fivewin.ch"PROCEDURE main()    LOCAL oDlg, oFolder    LOCAL cContrato:=space(13)  ,;          cNombre:=space(30) ...

Hi Dietmar,

Would it be possible to send it to me too please?

peterh (at) plsoft (dot) co (dot) uk

Regards,

Pete

Hi Dietmar,

Can you please send me a copy as well.....

jeff (at) can-soft (dot) net

... work with FWH :D Please try this: oBitmap:lTransparent = .F. - sorry, no changes. For a quick solution I change the first pixel of the bitmap... Dietmar