Clipper On Line • Ver Tópico - hBrowse
Página 1 de 1

hBrowse

MensagemEnviado: 17 Nov 2016 11:05
por cruz_brasil
Boa tarde pessoal,
Estou precisando alterar a cor de fundo dos headers da browse, mas não estou conseguindo achar o lugar certo para fazer isso, alguém sabe como fazer ?
grato a todos.

hBrowse

MensagemEnviado: 18 Nov 2016 11:00
por pauloa1
Pelo que sei, essa opção não existe.

hBrowse

MensagemEnviado: 09 Out 2018 21:36
por Fernando queiroz
oBrowse1:oStyleHead := HStyle():New( { 0xffffff, 0xbbbbbb }, 1,, 0.4, 16759929 )

hBrowse

MensagemEnviado: 10 Out 2018 10:06
por pauloa1
Na versão "Congelada" não tem essa função HStyle()

Qual é a versão que vc testou ?

Paulo

hBrowse

MensagemEnviado: 11 Out 2018 21:37
por Fernando queiroz
pauloa1 escreveu:Na versão "Congelada" não tem essa função HStyle()

Qual é a versão que vc testou ?

Paulo


estou usando a versao 2.21

é a ultima versao disponivel, mas na 2.20 ja funcionava

hBrowse

MensagemEnviado: 11 Out 2018 21:39
por Fernando queiroz
hazael escreveu:Fernando, poderia explicar em detalhes o que isso faz? Como funciona?
Obrigado!


INIT DIALOG oDlg TITLE "Cadastro de Produtos" ;
ICON HIcon():AddFile('sgc.ico') ;
AT 0, 0 SIZE 947,584 CLIPPER NOEXIT ;
STYLE WS_OVERLAPPEDWINDOW+DS_CENTER+DS_ABSALIGN;
ON INIT {|This| onDlgInit( This, oDlg ) }
ThisBRW := oDlg

@ 4,70 BROWSE oBrowse1 DATABASE OF oDlg SIZE 940,482 STYLE WS_BORDER + WS_VSCROLL +WS_HSCROLL ;
ON SIZE ANCHOR_TOPABS + ANCHOR_LEFTABS + ANCHOR_RIGHTABS + ANCHOR_BOTTOMABS ;
ON POSCHANGE {|| hwg_WriteStatus( oDlg,2,LTrim(Str( RecNo(),8))+ "/" +LTrim(Str( Lastrec(),8))) } ;
ON CLICK {|| oBrowse1_onClick( ) } ;
ON KEYDOWN {|oBrowse1,nKeyPress| oBrowse1_onKeyDown( oBrowse1,nKeyPress ) }

oBrowse1:oStyleHead := HStyle():New( { 0xffffff, 0xbbbbbb }, 1,, 0.4, 16759929 )
oBrowse1:freeze := 1
* oBrowse1:nColumns := 17
oBrowse1:alias := 'PRODUTOS'
SELECT (oBrowse1:alias)

hBrowse

MensagemEnviado: 11 Out 2018 21:43
por Fernando queiroz
cadprodutos.jpg