Dashboard Clientes - HWGUI + RMCHART

[Fernando queiroz]

[Itamar M. Lins Jr.]

Olá!
Muito bom!
Isso está em um browse ?
Vc tem controle da fonte do head do browse ?
O OwnnerButton não fica transparente com BITMAP conforme sua imagem. É isso ? tô tentando melhorar aqui o VISU, mas esbarrei nesse problema.
Outra coisa é que as cores no bColorBLOCK do browse são 6 e não não 4 conforme pensávamos.

Código: Selecionar todos

{hwg_BLACK, hwg_WHITE, 0, hwg_WHITE, hwg_WHITE, hwg_GREEN }

Saudações,
Itamar M. Lins Jr.

[Fernando queiroz]

Isso está em um browse ?

sim
tem 3 browse nessa tela

Vc tem controle da fonte do head do browse ?

sim , mas o mesmo font usado no head é usado nos dados abaixo
#define BrowseStyleHead HStyle():New( { 4339747,4339747,4339747, 12632256 }, 1,, 0.4, 16759929 )
#define BrowseheadColor 16777215

Código: Selecionar todos

        @ 600,580 BROWSE oBrowse3 ARRAY  SIZE 735,95 STYLE WS_BORDER

                oBrowse3:nHeadRows := 1
                oBrowse3:oStyleHead := BrowseStyleHead 
                oBrowse3:headColor := BrowseheadColor
                oBrowse3:oFont := HFont():Add( '',0,-15,700,,,)	
                oBrowse3:freeze := 1
                oBrowse3:aArray := {}	

                oBrowse3:AddColumn( HColumn():New('ID', hwg_ColumnArBlock() ,'N',11, 0 ,.F.,1,2,,,,,,,,,,))
                oBrowse3:AddColumn( HColumn():New('CLIENTES INATIVOS(+1 ANO)', hwg_ColumnArBlock() ,'C',58, 0 ,.F.,1,,,,,,,,,,,))
                oBrowse3:AddColumn( HColumn():New('FONE', hwg_ColumnArBlock() ,'C',14, 0 ,.F.,,,,,,,,,,,,))
                oBrowse3:AddColumn( HColumn():New('ULT.COMPRA', hwg_ColumnArBlock() ,'D',12, 0 ,.F.,1,2,,,,,,,,,,))

                FOR EACH oColuna3 IN oBrowse3:aColumns
                    oColuna3:bColorBlock := {|| BrowseBarColorPrimary  }
                NEXT

O OwnnerButton não fica transparente com BITMAP conforme sua imagem. É isso ? tô tentando melhorar aqui o VISU, mas esbarrei nesse problema.

exatamente ele fica com uma cor estranha quando desativado, por isso eu usei botão preto e usei o fundo do bitmap preto também

Outra coisa é que as cores no bColorBLOCK do browse são 6 e não não 4 conforme pensávamos.

Código: Selecionar todos

{hwg_BLACK, hwg_WHITE, 0, hwg_WHITE, hwg_WHITE, hwg_GREEN }

tenho usado muito bColorBLOCK, mas tenho usado somente 4 cores
#define BrowseBarColorPrimary {0,16777215,16777215,8421504 }
#define BrowseBarColorSecondary {255, 16777215 ,16777215,255 }
#define BrowseBarColorTerciary {16155186, 16777215 ,16777215, 16155186 }
#define BrowseBarColorQuarternary {2588671, 16777215 ,16777215, 2588671 }

Código: Selecionar todos

							
FOR EACH oColuna IN oBrowse1:aColumns
	oColuna:bColorBlock := {|| IIF(oBrowse1:aArray[oBrowse1:nCurrent,15] = 1 , BrowseBarColorSecondary, ;
	IIF(oBrowse1:aArray[oBrowse1:nCurrent,16] = 1 , BrowseBarColorTerciary, BrowseBarColorPrimary) )}	
NEXT

[Itamar M. Lins Jr.]

Olá!
Outro detalhe é que o browse tradicional tem uns bugs.
Não funciona a COMBOBOX na edição por exemplo. Mandei para esse problema, vamos ver se ele vai corrigir.
Como vc está fazendo ? está mudando seu código por ai ? São defeitos mais simples de corrigir neste caso, pois basta ver a versão que antes funcionava.

Saudações,
Itamar M. Lins Jr.

[Itamar M. Lins Jr.]

Olá!

tenho usado muito bColorBLOCK, mas tenho usado somente 4 cores

Use zebrado que vc vai entender o problema. O cursor não vai pular entre as células corretamente se não tiver 1 célula em edição.
O browse zebrado facilita muito a visualização.

Saudações,
Itamar M. Lins Jr.

[Itamar M. Lins Jr.]

Olá!

#define BrowseStyleHead HStyle():New( { 4339747,4339747,4339747, 12632256 }, 1,, 0.4, 16759929 )

Sei não, mas se ele está usando a mesma lógica(recurso) do HTML(CSS) então tem mais opções sobre o THEAD e TFOOT etc do DIALOG, BROWSE todos os controles.
Parece que as novas linguagens fazem assim na parte de desenhos.
Até pq a HWGUI cria DIALOGs apartir de arquivos XML também.

Saudações,
Itamar M. Lins Jr.