FiveTech Software tech support forums

Posted: **Tue May 19, 2020 2:37 pm**

Hello,

There's a painting problem with xBrowse. It doesn't paint the whole width at once, but first it paints up to the middle of the screen and then it widens.

This is a sample:

Code: Select all


#include "fivewin.ch"
#include "xbrowse.ch"



function main()

local oWnd
local oGrid
local oBtn, oGet1, oGet2




   USE C:\FWH\SAMPLES\CUSTOMER ALIAS "BASE" NEW

   DEFINE WINDOW oWnd
   oWnd:nHeight := ScreenHeight()

 

   @ 10, 151 XBROWSE oGrid ;
      SIZE -1, -1 PIXEL ;
      OF oWnd ;
      DATASOURCE "BASE" ;
      AUTOSORT ;
      AUTOCOLS ;
      CELL LINES NOBORDER





    oGrid:CreateFromCode()


     @ 10, 10 BUTTON oBtn PROMPT "Filtro" OF oPanel ;
              SIZE 80, 20 PIXEL                   ;
              ACTION ( alert(oGrid:Refresh()) )


ACTIVATE WINDOW oWnd MAXIMIZED


Return nil

Thank you very much.

Posted: **Tue May 19, 2020 3:13 pm**

Prueba asi:

Code: Select all

#include "fivewin.ch"
#include "xbrowse.ch"



function main()

local oWnd
local oGrid
local oBtn, oGet1, oGet2




   USE C:\FWH\SAMPLES\CUSTOMER ALIAS "BASE" NEW

   DEFINE WINDOW oWnd
   oWnd:nWidth := ScreenWidth()
   oWnd:nHeight := ScreenHeight()      // <<-----

 

   @ 10, 151 XBROWSE oGrid ;
      SIZE -1, -1 PIXEL ;
      OF oWnd ;
      DATASOURCE "BASE" ;
      AUTOSORT ;
      AUTOCOLS ;
      CELL LINES NOBORDER





    oGrid:CreateFromCode()


     @ 10, 10 BUTTON oBtn PROMPT "Filtro" OF oWnd ;      // <<-----
              SIZE 80, 20 PIXEL                   ;
              ACTION ( alert(oGrid:Refresh()) )


ACTIVATE WINDOW oWnd MAXIMIZED 


Return nil

Saludos.

Posted: **Tue May 19, 2020 3:23 pm**

Thank you.

Now it happens with the lower half of the xBrowse, including the horizontal scroll bar.

Posted: **Thu May 21, 2020 6:42 am**

FiveTech Software tech support forums

problem painting xBrowse

problem painting xBrowse

Re: problem painting xBrowse

Re: problem painting xBrowse

Re: problem painting xBrowse