FiveTech Software tech support forums

... (b)BARBOTONES( 749 ) Called from: .\source\classes\BTNBMP.PRG => TBTNBMP:CLICK( 465 ) Called from: .\source\classes\BTNBMP.PRG => TBTNBMP:LBUTTONUP( 656 ) Called from: .\source\classes\CONTROL.PRG => TCONTROL:HANDLEEVENT( 1690 ) Called from: .\source\classes\BTNBMP.PRG => TBTNBMP:HANDLEEVENT( ...

... Mejora: En los objetos TTaskPanel utilizados de la clase TExplorerBar, se ha implementado una nueva DATA bOnCollapse que se evalúa desde su método LButtonUp( nRow, nCol, nFlags ), de forma que cada panel puede utilizar su propia DATA bOnCollapse para el evento de colapso. * Nuevo: Nuevo ejemplo ...

... * Enhancement: In TTaskPanel objects used from Class TExplorerBar, a new DATA bOnCollapse has been implemented and it is evaluated from its method LButtonUp( nRow, nCol, nFlags ), so each panel can use its own DATA bOnCollapse for the collapse event. * New: Example samles\booking.prg shows how ...

... }   oPanel3:bOnCollapse :=  { | | CheckCollapse(oPanel3,cMsg,3) } i don´t know how but METHOD LButtonUp will be "automatic" called which include      if ! Empty( ::bOnCollapse )   // new         Eval( ::bOnCollapse, Self ...

hi Antonio,

Codeblock-Slot like these we need, thx
but how is METHOD LButtonUp() called when i click to collaps/enlarge

Request :
also need for DragDrop

Code: Select all  Expand view

METHOD LButtonUp( nRow, nCol )

include DATA lDrag and ::Capture()

Dear Jimmy, On CLASS TTaskPanel FROM TControl add this DATA: DATA bOnCollapse and then add this code at the bottom of METHOD LButtonUp( nRow, nCol, nFlags ) CLASS TTaskPanel:      ::oWnd:CheckScroll()      if ! Empty( ::bOnCollapse )   // new         Eval( ::bOnCollapse, ...

hi Antonio, TExplorerBar has no currently support for such event but it can be easily implemented from: METHOD LButtonUp( nRow, nCol, nFlags ) CLASS TTaskPanel thx for Answer there is in CLASS TTaskPanel   DATA   lCollapsed      INIT .F. and it will be assign Value in METHOD LButtonUp(nRow, ...

...   oWndMOUSE:bLClicked    = { | nRow, nCol, nFlags | oWndMOUSE:Say( 2, 2,  "LButtonDown" ) }   oWndMOUSE:bLButtonUp   = { | nRow, nCol, nFl8ags | oWndMOUSE:Say( 2, 2, "LButtonUp    " ) }

... Dear Jimmy, TExplorerBar has no currently support for such event but it can be easily implemented from: METHOD LButtonUp( nRow, nCol, nFlags ) CLASS TTaskPanel

... (b)BRWBTNBAR( 144 ) Called from: .\source\classes\BTNBMP.PRG => TBTNBMP:CLICK( 792 ) Called from: .\source\classes\BTNBMP.PRG => TBTNBMP:LBUTTONUP( 1083 ) Called from: .\source\classes\CONTROL.PRG => TCONTROL:HANDLEEVENT( 1847 ) Called from: .\source\classes\BTNBMP.PRG => TBTNBMP:HANDLEEVENT( ...

... 567 ) Called from: Source\Classes\btnbmp.prg => TBTNBMP:CLICK( 536 ) Called from: Source\Classes\btnbmp.prg => TBTNBMP:LBUTTONUP( 764 ) Called from: Source\Classes\control.prg => TCONTROL:HANDLEEVENT( 1723 ) Called from: Source\Classes\btnbmp.prg => TBTNBMP:HANDLEEVENT( ...

... (b)BROWSEMY( 5171 ) Called from: .\source\classes\BTNBMP.PRG => TBTNBMP:CLICK( 792 ) Called from: .\source\classes\BTNBMP.PRG => TBTNBMP:LBUTTONUP( 1083 ) Called from: .\source\classes\BTNBMP.PRG => TBTNBMP:LBUTTONDOWN( 1016 ) Called from: .\source\classes\CONTROL.PRG => TCONTROL:HANDLEEVENT( ...

... 8306 ) Called from: C:\FWH23\source\classes\metropnl.prg => (b)TMETROBTN:NEW( 618 ) Called from: .\source\classes\WINDOW.PRG => TWINDOW:LBUTTONUP( 2115 ) Called from: .\source\classes\CONTROL.PRG => TCONTROL:LBUTTONUP( 721 ) Called from: .\source\classes\BTNBMP.PRG => TMETROBTN:LBUTTONUP( ...

... (b)TOUCHMENU3( 7608 ) Called from: source\classes\metropnl.prg => (b)TMETROBTN:NEW( 607 ) Called from: Source\Classes\window.prg => TWINDOW:LBUTTONUP( 2121 ) Called from: Source\Classes\control.prg => TCONTROL:LBUTTONUP( 677 ) Called from: Source\Classes\btnbmp.prg => TMETROBTN:LBUTTONUP( ...

... 0 ) Called from: .\source\classes\BTNBMP.PRG => TBTNBMP:CLICK( 0 ) Called from: .\source\classes\BTNBMP.PRG => TBTNBMP:LBUTTONUP( 0 ) Called from: .\source\classes\CONTROL.PRG => TCONTROL:HANDLEEVENT( 0 ) Called from: .\source\classes\BTNBMP.PRG => TBTNBMP:HANDLEEVENT( ...