BACKCOLOR não foi implementado ou feito uso a versão atual da hwgui, o parâmetro na guilib.ch está lá , MAS NÃO É PASSADO para HDialog():New()
Somente COLOR é usado, como bColor
[ <bclr: BACKCOLOR, COLOR> <bColor> ] ;
BACKCOLOR não tem uso

Moderador: Moderadores
asimoes escreveu:BACKCOLOR não foi implementado ou feito uso a versão atual da hwgui, o parâmetro na guilib.ch está lá , MAS NÃO É PASSADO para HDialog():New()
Somente COLOR é usado, como bColor
[ <bclr: BACKCOLOR, COLOR> <bColor> ] ;
BACKCOLOR não tem uso
PROCEDURE Main()
LOCAL oDialog
INIT DIALOG oDialog TITLE "Teste" SIZE 640, 480 COLOR 0x00FF00
ACTIVATE DIALOG oDialog
RETURN
marcosgambeta escreveu:Então, usar um ou outro dá o mesmo resultado. Não está assim para você ?
asimoes escreveu:BACKCOLOR na 2.17 não está implementado e na 2.2x olhando o fonte não vi o uso, pelo menos nos parâmetros New() não está passando
INIT WINDOW ... COLOR ...
ou
INIT WINDOW ... BACKCOLOR ...
INIT DIALOG ... COLOR ...
ou
INIT DIALOG ... BACKCOLOR ...
Aproveitando, havia me esquecido que o Harbour entende números hexadecimais. Então, nem se precisa da função de conversão. Funciona também como abaixo:
... SIZE 640, 480 COLOR "0x00FF00" //assim dá erro.
IF bColor != Nil
::brush := HBrush():Add( bColor )
ENDIF
Usuários vendo este fórum: Nenhum usuário registrado online e 2 visitantes