FiveTech Software tech support forums

very good

Workaround the issue by not using Shadow  REDEFINE TITLE oTitle ID 123 of oDlg SHADOW NOSHADOW  No joy. Please try to reduce the height used by TScrDlg() I reduced the controls from 10 to 7 sets. Seems painting issue is consistent. There will be extra bits painted near the 5th, 7th and 10th TTitle

Please try to reduce the height of TScrDlg(), let the controls as they are

No joy.

Antonio Linares wrote:Please try to reduce the height used by TScrDlg()

I reduced the controls from 10 to 7 sets. Seems painting issue is consistent.
There will be extra bits painted near the 5th, 7th and 10th TTitle

Dear Hua,

I have been able to build you example and see wht you mean

Please try to reduce the height used by TScrDlg()

Hi Antonio,
I created a self-contained sample. It can be downloaded from here https://drive.google.com/file/d/1aBL3nn ... share_link
The paths in the .mak file would need to be updated first though

TIA

Dear Hua,

Could you please provide us your PRG example to test it here ?

many thanks

When I added up to 10 RTF controls within the same page on the TFolderEx,
the screen painting starts to become weird and folder names got painted where it shouldn't exist.

How to fix this?

very good!

many thanks for sharing it!

Resolved. ACTIVATE DIALOG oDlg ON INIT MakeScroll(oFolder)PROC MakeScroll(oFolder)  local oScrDlg  oScrDlg := TScrDlg():New(oFolder:aDialogs[1],0,SCROLL_RANGE,0,70)  oFolder:aDialogs[1]:bMouseWheel := { | nKey, nDelta, nXPos, nYPos ...

What's better between TScrDlg() and TScrollPanel?

Tried

Code: Select all  Expand view

     
::oFolder:aDialogs[1]:bInit := {||  oScrDlg := TScrDlg():New(::oFolder:aDialogs[1],0,270,0,70) }                                           
 

Why :bInit is not evaluated?

Hi,
All samples I've looked at place calls to TScrDlg() at a dialog's ON INIT.
How should it be coded for use in a Folder/FolderEx?

TIA

Hola.
Se me ocurre que puedes usar la classe TScrDlg():New(oDlg,1,1,30,340)
Saludos.

resolved !
I used tscrollpanel and tscrdlg together