lFullGrid,; // Draw full horiz and vert lines even if not all rows have data
#include "fivewin.ch"
#include "xbrowse.ch"
function Main()
local oWnd, oBrw, oDbf
use customer
database odbf
define window ownd
@ 0,0 xbrowse oBrw of oWnd ;
object odbf
//oBrw:lColDividerComplete := .T. // no effect
oBrw:lFullGrid:=.t. // no effect
oBrw:CreateFromCode()
oBrw:nRowDividerStyle := LINESTYLE_BLACK
oWnd:oClient := oBrw
activate window oWnd
return nil
//oBrw:lFullGrid:=.t. // no effect
oBrw:nColDividerStyle := LINESTYLE_BLACK
oBrw:nRowDividerStyle := LINESTYLE_BLACK
oBrw:nColDividerStyle := LINESTYLE_BLACK
oBrw:nRowDividerStyle := LINESTYLE_BLACK
oLbx:nMarqueeStyle := MARQSTYLE_HIGHLROW
oBrw:nColDividerStyle := LINESTYLE_LIGHTGRAY
oBrw:nRowDividerStyle := LINESTYLE_LIGHTGRAY
Return to FiveWin for Harbour/xHarbour
Users browsing this forum: No registered users and 79 guests