FiveTech Software tech support forums

... in a main window and do them as if it were a dashboard, in the past I used two TscrollPanels but I saw that when the window was iconized the left scrollpanel lost the scroll, because ui now I'm trying with the explorerbar hoping it might work and insert a new method to recalc the position nTop ...

Perhaps i resolved with aBtnEle[n]:cargo:= lActive aBtnEle[n]:bAction :={ |o| lActive := !lActive, ; o:cargo:= lActive,; o:refresh(),; Set_items_Active(oElements,o:cargo,o),; nElemento:= val(nProduct) } Function Set_items_Active(oItem,lActive,oBTn) local oCtrl for each oCtrl in oItem:aControls oCtrl...

I have some buttons on a scrollpanel https://i.postimg.cc/h4zG0Jp9/ff.jpg I created the buttons with the Btnbmp class I want that when I press one it stays selected I made lActive:= .f. For n=1 to Len(aElements) cDesc ...

... first scrollable panel on First Scroll Panel If I select one button it return allways 04 on source on a for next cicle I create the buttons into scrollpanel and the assign an action for each button aBtnEle[n]:bAction :={ || (Elemento:= nProduct ,msginfo(nProduct))} nProduct id the code of an ...

... ::hDC )               endif  now seem run ok the border color https://i.postimg.cc/GpgQV8XH/hh.gif I set the btnbmps into the scrollpanel with :nClrBorder := { || (IIF(ocontrol:lMOver,CLR_BLUE,CLR_HGRAY)) }

I need to add items to a scrollpanel initially the dialog inserts only one item, but if the user press the 2 or 3 button he can insert 2 or 3 items https://i.postimg.cc/QdQw6GFV/gg.png the test I made add the items the ...

For ScrollPanel, please set :oRightMargin and :oBottomMargin, to make it resizable when container window/dialog is resized. Sample: #include "fivewin.ch"function Main()   local oWnd, oPanel, n   DEFINE WINDOW ...

For ScrollPanel, please set :oRightMargin and :oBottomMargin, to make it resizable when container window/dialog is resized. Sample: #include "fivewin.ch"function Main()   local oWnd, oPanel, n  ...

Jimmy wrote:hi Silvo,
instead of

Code: Select all  Expand view

  oDash_right:nWidth  := oWnd:nWidth-520 ,;

try

Code: Select all  Expand view

  oDash_right:nWidth  := oWnd:nWidth-oDash_Left:nWidth -30 ,;

p.s. what du you think about a SPLITTER

splitter ok but it must be hide

hi Silvo,
instead of

Code: Select all  Expand view

  oDash_right:nWidth  := oWnd:nWidth-520 ,;

try

Code: Select all  Expand view

  oDash_right:nWidth  := oWnd:nWidth-oDash_Left:nWidth -30 ,;

p.s. what du you think about a SPLITTER

I wish create a window with two srollpanel https://i.postimg.cc/mgR0KQv1/gg.jpg The first scrollpanel ( a left) is ok . the second ScrollPanel ( at right) I not see the scroll ( because I not Know the right position) Can you help me pls ? the test #include "fivewin.ch"REQUEST ...

Change this line

Code: Select all  Expand view

aBtn[n]:= PanelBox(oPanel,nRow,nCol,oPanel:nWidth-20,120,n )
 

with

Code: Select all  Expand view

aBtn[n]:= PanelBox(oPanel,nRow,nCol,oPanel:nWidth-20,120 + nRow,n )
 

...    RELEASE oBoldTitle,oFontTitle     return nil  I not understood why it not whow the other elements on scrollPanel

...  @ 5, 2 GET cSurName OF oScrollPanel   oScrollPanel:SetRange()return nil https://github.com/FiveTechSoft/screenshots/blob/master/scrollpanel.gif?raw=true

La solución que propone Joao considero que es la más práctica. Otra posible es poner un ScrollPanel sobre el diálogo y los controles sobre él, aunque quizás un poco menos "visual" para el usuario ya que de primera vista no se verían todos los controles.