Rick, Could it be that your xBrowse is too high for the dialog? One can't even see the arrow down at the bottom of the vertical scrollbar. Best regards, Otto
... function I provided does not allow the last control to be deleted. Yes. I understood. Do have you tried deleting all the btnbmps and moving the scrollbar? It makes this mistake for me https://i.postimg.cc/G34Z81nn/1.png
... Of Course your test run ok But I tried to erase all buttons except one , then I press the scrollbar of panel scroll and I had this https://i.postimg.cc/G34Z81nn/1.png when I had only two buttons I cannot delete printer button ...
https://i.postimg.cc/ZKh8qcTq/ghg.png how can I have the black border at the right side of the xbrowse after the scrollbar ? I made @ 40, 10 XBROWSE oBrw OF oDlg SIZE 300, -20 PIXEL ; AUTOCOLS DATASOURCE oDbf NOBORDER WITH OBJECT oBrw ...
... initially I select a date range and select as element "umbrella" and insert 2 of them I scroll the scrollbar up and down then I select the "palm" element and insert 2 of them then I move the scroll bar first down and then up and then down ...
look this https://i.postimg.cc/CKNbkZ1b/posicion.jpg After inserting the first records I pressed the right panel scrollbar and then I inserted other records and I saw that the records were positioned not below the others but much further down I use the nRowItem variable ...
... handle horizontal scrolling. The steps to add horizontal scrolling would still be similar to what I described before: Define a horizontal scrollbar in addition to the vertical one. This would be similar to the line DEFINE SCROLLBAR ::oVScroll VERTICAL OF Self RANGE 1,2, but with HORIZONTAL ...
How about putting a text counter? ¿Qué tal poner un contador de texto? REDEFINE GET oGet[17] VAR wTEXTO MULTILINE ID 217 OF oDlg ; COLOR CLR_BLUE, CLR_WHITE UPDATE FONT oFont WHEN( lLigaCombo ) ; ON CHANGE( SB_LimitText( oGet[17], ...
#include "FiveWin.ch"function Main()local cRes := ""local oFont, oGetprivate oDlg DEFINE FONT oFont NAME "Ms Sans Serif" SIZE 0, -21 DEFINE DIALOG oDlg SIZE 225, 120 TITLE "Example" FONT oFont @ 0.1, 0.5 GET oGet VAR cRes OF oDlg ;&n...