Enhanced TFOLDEREX

Post Reply
User avatar
byte-one
Posts: 1048
Joined: Mon Oct 24, 2005 9:54 am
Location: Austria
Contact:

Enhanced TFOLDEREX

Post by 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)
Regards,
Günther
---------------------------------
office@byte-one.com
User avatar
Daniel Garcia-Gil
Posts: 2365
Joined: Wed Nov 02, 2005 11:46 pm
Location: Isla de Margarita
Contact:

Re: Enhanced TFOLDEREX

Post by 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
our best documentation is the source code
Isla de Margarita Venezuela.
danielgarciagil@gmail.com
http://tdolphin.blogspot.com/
https://www.dropbox.com/referrals/NTI5N ... rc=global9
norberto
Posts: 566
Joined: Thu Aug 30, 2007 3:40 pm
Location: BR

Re: Enhanced TFOLDEREX

Post by norberto »

hi, can you post only the changes here? thanks
User avatar
ukoenig
Posts: 4043
Joined: Wed Dec 19, 2007 6:40 pm
Location: Germany
Contact:

Re: Enhanced TFOLDEREX

Post by 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 :lol:
Since 1995 ( the first release of FW 1.9 )
i work with FW.
If you have any questions about special functions, maybe i can help.
User avatar
byte-one
Posts: 1048
Joined: Mon Oct 24, 2005 9:54 am
Location: Austria
Contact:

Re: Enhanced TFOLDEREX

Post by 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!?
Regards,
Günther
---------------------------------
office@byte-one.com
User avatar
byte-one
Posts: 1048
Joined: Mon Oct 24, 2005 9:54 am
Location: Austria
Contact:

Re: Enhanced TFOLDEREX

Post by byte-one »

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

Code: Select all | Expand

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


should be:

Code: Select all | Expand

 if aBitmaps == NIL
      aBitmaps = Array( nLen )
   endif
Regards,
Günther
---------------------------------
office@byte-one.com
User avatar
ukoenig
Posts: 4043
Joined: Wed Dec 19, 2007 6:40 pm
Location: Germany
Contact:

Re: Enhanced TFOLDEREX

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

Image

Image

Image

Image

Best Regards
Uwe :roll:
Since 1995 ( the first release of FW 1.9 )
i work with FW.
If you have any questions about special functions, maybe i can help.
User avatar
byte-one
Posts: 1048
Joined: Mon Oct 24, 2005 9:54 am
Location: Austria
Contact:

Re: Enhanced TFOLDEREX

Post by 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

     DEFINE DIALOG oDlg OF Self RESOURCE ::aDialogs[ n ] PIXEL;
 .......
         HELPID If( Len( ::aHelps ) >= n .and. ::aHelps[ n ] <> NIL , ::aHelps[ n ] , ::oWnd:nHelpId )
Regards,
Günther
---------------------------------
office@byte-one.com
Post Reply