FiveTech Software tech support forums

hi Dutch, Can I DISABLE TAB (disable color) for TFOLDER? in CLASS TFolderEx() there is METHOD DisableTab( nOption ) CLASS TFolderEx   DEFAULT nOption := ::nOption   IF ::aEnable[ nOption ]      ::aEnable[ nOption ] = .F.  ...

Dear Antonio,

Can I DISABLE TAB (disable color) for TFOLDER?

Antonio Linares wrote:Dear Dutch,

We need to modify METHOD PaintTB() so tabs are painted in different styles. Looking for a way to do it

... works on FWH1901 but still problem with FWH2304. I found something that the GET or SAY Object will allow ::bDropOver, if the object is below the TFOLDER. If SAY or GET will disallow when OBJECT is above the TFOLDER (Resource). I'm still find out the problem. I will update, if found. Dutch. Excelente!

Dear Antonio, I use FOLDER for many years but the disable folder tab and enable is the same. I test TFOLDEREX is show different (that I need). I just need TFOLDER that show disable tab as disable object as TFOLDEREX. https://i.postimg.cc/FRd9G3b3/1695373819611.jpg ...

hi, have upgrade CLASS TGrid Demo at Gubthub https://github.com/AugeOhr/TGRID since Release 1 i have try different Control e.g. TFolder() / TFolderEx() or Tbutton() / BtnBMP() you can enable them in Config.INI or use Start Parameter "/T"    use a Splitter between left/right ...

This is the size FWH uses:

Code: Select all  Expand view

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

hi,

when using AddItem of TFolder() / TFolderEx() the new ::Dialogs have different Position as 0,0

it disappear when "resize" ::Dialogs

is there a Workaround without "resize"

hi Antonio, thx for Answer my Question is : what Size does a ::Dialogs have :?: let´s say i create a TFolder() / TFolderEx() with Size 100 x 100 TFolderEx() have "nFolderHeight" but TFolder() not so how to "calculate" Size of ::Dialogs --- have found "nFdHeight" ...

Dear Jimmy,

Please try:

oTab:aDialogs[ ii ]:SetSize( nWidth, nHeight )

hi,

when resize TFolder() / TFolderEx() i need to resize ::Dialogs too

Code: Select all  Expand view

   FOR ii := 1 TO LEN( oTab:aDialogs )
      oTab:aDialogs[ ii ]:SetSize( ??? , ??? )
   NEXT

but how to get ::Dialogs new Size

// C:\FWH..\SAMPLES\PROJECT.PRG// original:// https://forums.fivetechsupport.com/viewtopic.php?f=3&t=18167&p=111528&hilit=aGradSel&sid=76f47b766de9c18f4bf4beffea25c135#p111528#Include "Fivewin.ch"STATIC hDC, oWndMain, oFont1STATIC c_pathFUNCTION Main()   ...

Resolved!!! ( with tfoldex)




thanks to cmsoft (https://forums.fivetechsupport.com/viewtopic.php?f=3&t=42652&hilit=folderex&sid=3f0fb4a23cd19635423b01465152a105&sid=3f0fb4a23cd19635423b01465152a105#p256796)

Dear Silvio,

It is not easy as it is a standard Windows control

Is it possible to color the dialogs and tabs of the folder class (not tfoldex) ?

hi Antonio,

Antonio Linares wrote:Class TFolderEx uses bAction instead of bChange

aha, ok understand
thx