FiveTech Software tech support forums

... --> { { ordbagname, ordname, ordkey, ordfor, ordkeyval } } TDatabase también puede usarla como método: oDbf:IndexInfo() * Corrección en TScrollPanel. Mal funcionamiento de la barra de desplazamiento vertical desde la versión 21.02 http://forums.fivetechsupport.com/viewtopic.php?f=3&t=40529&sid=65ec67f5b351e446032214dd2572eb40 ...

... FW_IndexInfo() --> { { ordbagname, ordname, ordkey, ordfor, ordkeyval } } TDatabase can also use it as a method: oDbf:IndexInfo() * Fix: TScrollPanel: Vertical scrollbar malfunction since 21.02. Fixed. http://forums.fivetechsupport.com/viewtopic.php?f=3&t=40529&sid=65ec67f5b351e446032214dd2572eb40 ...

... FW_IndexInfo() --> { { ordbagname, ordname, ordkey, ordfor, ordkeyval } } TDatabase can also use it as a method: oDbf:IndexInfo() * Fix: TScrollPanel: Vertical scrollbar malfunction since 21.02. Fixed. http://forums.fivetechsupport.com/viewtopic.php?f=3&t=40529&sid=65ec67f5b351e446032214dd2572eb40 ...

yes..and i am happy

ok now run ok
Nages corrected it and sent me a new release

Solved by Mr. Rao

Please

there are news for the scroll panel, I have all blocked, I cannot scroll the umbrellas on the beach or select the products
the scrollpanel does not work
what has been changed?

Antonio Linares wrote:Silvio,

We are checking it

many thanks for your great feedback

I sent you a test sample

Silvio,

We are checking it

many thanks for your great feedback

... only scroll with the mouse wheel What's happened ? https://i.postimg.cc/HkSqjYTL/err-scroll.gif the same problem I have on another tscrollpanel https://i.postimg.cc/KjvVmwCT/erro2.gif with the older version of fwh it worked fine without errors. I saw that with fwh ...

Damiano,

Please post the contents of dialogscroll.prg here as I can't find it at the FWH\samples folder, thanks

...  DEFINE FONT oBold NAME "TAHOMA" SIZE 0,-14 BOLD   DEFINE DIALOG oDlg SIZE 500,400 PIXEL TRUEPIXEL FONT oFont ;      TITLE "FWH TScrollPanel"   @ 20,20 SAY If( oRec:RecNo == 0, "ADD CUSTOMER", "EDIT CUSTOMER : " + STRZERO( oRec:RecNo, 3 ) ...

Damiano, Please post the complete code for function EditDialog( oRec ) It seems as oDlg:oBrush has been changed to nil This little example works fine here, thats why I need to review your code: #include "FiveWin.ch"function Main()   Dialog()   Dialog(...

... no exported method: HBRUSH Args: [ 1] = U Stack Calls =========== Called from: => HBRUSH( 0 ) Called from: .\source\classes\SCRLPANL.PRG => TSCROLLPANEL:PAINT( 415 ) Called from: .\source\classes\SCRLPANL.PRG => (b)TSCROLLPANEL:TSCROLLPANEL( 72 ) Called from: => TSCROLLPANEL:DISPLAY( ...

My mistake, you have to call it this way:

// Class TPanel Method Redefine( nId, oWnd, lDesign, cVarName, lBorder )

oPanel := TScrollPanel():Redefine( 101, oDlg )

Also, you have to call oPanel:SetFont( oDlg:oFont ) from the ON INIT clause of the ACTIVATE DIALOG

...  DEFINE FONT oBold NAME "TAHOMA" SIZE 0,-14 BOLD    DEFINE DIALOG oDlg RESOURCE "SCROOL" FONT oFont;      TITLE "FWH TScrollPanel"   //   oPanel   := TScrollPanel():Redefine( 101, 10, 10, 200, 200, oDlg)   oPanel:SetFont( oDlg:oFont )  ...