Enhanced TFOLDEREX

[byte-one]

I made some corrections on this suberb class.
(animate: go left and right; speed from processorspeed, backgroundcolor: lTransparent, font: from parentdialog)
Antonio, can you insert this in next build!?

(edited by Daniel)

[Daniel Garcia-Gil]

Gunther

we can not public all class, only change

you can send the file to Antonio (or me), we review the changes and public your suggestions,

Thanks

[norberto]

hi, can you post only the changes here? thanks

[ukoenig]

Hello Günther,
does Your solution fix my transparent-painting-problem of different Controls ?
I want to display transparent Radios, Checkboxes and Says
on Color, Gradient, Brush- or Image-Folder-backgrounds.
Transparency onTab-Area works.

viewtopic.php?f=3&t=19889

Best Regards
Uwe

[byte-one]

I send to Antonio a new version today. The enhancements are to big to post it here. I am sure, Antonio brings this on next build!?

[byte-one]

Daniel, Antonio!
In New and Redefine this should be corrected!

Code: Select all  Expand view

 if aBitmaps == NIL
      aHelps = Array( nLen )
   endif

should be:

Code: Select all  Expand view

 if aBitmaps == NIL
      aBitmaps = Array( nLen )
   endif

[ukoenig]

Hello Günther,

there is something wrong with < oFld:ROUND := 20
The Tab-bottom is shown rounded as well. Can You fix it ?
Only Folder-Color works ( green )
Using Gradient, Brush or Image, Controls are not transparent.









Best Regards
Uwe

[byte-one]

In the case, no Helpids defined should the help from the parent dialog to be used! Also in the normal Folder-class!?

Code: Select all  Expand view

     DEFINE DIALOG oDlg OF Self RESOURCE ::aDialogs[ n ] PIXEL;
 .......
         HELPID If( Len( ::aHelps ) >= n .and. ::aHelps[ n ] <> NIL , ::aHelps[ n ] , ::oWnd:nHelpId )