WVG_image - imagem não aparece

GTWVG com API Windows somente no Harbour.
No Harbouir 3.4 está sendo usado pointer, aonde no 3.2 é numérico.

Moderador: Moderadores

microvolution
Usuário Nível 5
Usuário Nível 5
Mensagens: 1234
Registrado em: 02 Set 2011 22:17
Contato:

WVG_image - imagem não aparece

Mensagem por microvolution »

Veja a imagem abaixo:
imagem invisível? kkkk
imagem invisível? kkkk
A imagem invisível escondida na tela acima, não aparece de jeito nenhum
Uso as seguintes linhas pra fazer funcionar:

Código: Selecionar todos

            Wvg_BoxRaised ( 02 , 19 , 14 , 60 , )
            Wvg_Image    ( 03 , 20 , 13 , 59 , , GOBJ_IMAGESOURCE_FILE, "Loginwvg" , , .f.)
Já substitui a wvg_image acima por:

Código: Selecionar todos

Wvg_Image    ( 03 , 20 , 13 , 59 , , GOBJ_IMAGESOURCE_FILE, "Loginwvg")
Também, já eliminei a wvg_boxraised() pra ver se ela quem impedia... não deu certo.
já mudei de posição invertendo a wvg_boxraised() e colocando depois da wvg_image()... e não deu certo.
já substituí a wvg_image() pelo abaixo que também não deu certo:

Código: Selecionar todos

			AAdd( aBlocks, {|| wvt_DrawButton( 03 , 20 , 13 , 59, "New", "Loginwvg" )} )
			aLastPaint := WvtSetBlocks( aBlocks )
			WvtSetBlocks( aLastPaint )
está definido no início o LOGINWVG assim:

Código: Selecionar todos

#define Loginwvg              hb_DirBase() + "logo\Login.bmp"
Mas... nada adiantou.

Não sei o que está errado, pois não aparece de maneira alguma essa imagem que está em .BMP.

PS: Antes dessa tela, existe outra de splash (estática) que aparece, e, ambas, uso as mesmas linhas, vejam se há diferença:

Código: Selecionar todos

      Wvg_Image     ( 10 , 10 , 20 , 60 ,  , GOBJ_IMAGESOURCE_FILE, "Splashwvg" , , .f. )
Só se a diferença for nas posiçãos (row, col), etc kkk

Quem puder nos dar uma luz?!?!?!

vlw!
Grato,
MICROVOLUTION - 16 anos Evoluindo Com Você!


Você já leu a Bíblia hoje?
João 3:16 - Porque Deus amou ao mundo de tal maneira que deu seu Único Filho para que todo aquele que nEle crê não pereça mas tenha a Vida Eterna!
microvolution
Usuário Nível 5
Usuário Nível 5
Mensagens: 1234
Registrado em: 02 Set 2011 22:17
Contato:

WVG_image - imagem não aparece

Mensagem por microvolution »

infelizmente, parece q somente euzinho e o nobre professor Quintas que realmente nos interessamos pela GTWVG...
ninguém interagiu kkk
Grato,
MICROVOLUTION - 16 anos Evoluindo Com Você!


Você já leu a Bíblia hoje?
João 3:16 - Porque Deus amou ao mundo de tal maneira que deu seu Único Filho para que todo aquele que nEle crê não pereça mas tenha a Vida Eterna!
Avatar do usuário
JoséQuintas
Administrador
Administrador
Mensagens: 20415
Registrado em: 26 Fev 2007 11:59
Localização: São Paulo-SP
Curtiram: 1 vez

WVG_image - imagem não aparece

Mensagem por JoséQuintas »

Já falamos sobre isso.
Os controles wvt_* precisam ser repintados.

O que não falamos, e na wvg também não fala....

é que talvez dê pra usar o evento de "repintar" de wvgcrt()
José M. C. Quintas
Harbour 3.2, mingw, multithread, gtwvg, fivewin 25.12, dbfcdx, MySQL, ADOClass, PDFClass, SefazClass, (hwgui), (hmg3), (hmg extended), (oohg), PNotepad, ASP, (Linux/Flagship/harbour 3.2)
"The world is full of kings and queens, who blind our eyes and steal our dreams Its Heaven and Hell"

https://github.com/JoseQuintas/
microvolution
Usuário Nível 5
Usuário Nível 5
Mensagens: 1234
Registrado em: 02 Set 2011 22:17
Contato:

WVG_image - imagem não aparece

Mensagem por microvolution »

JoséQuintas escreveu:O que não falamos, e na wvg também não fala....
estranho que único exemplo prático de uso do DiMaria, em ELEKTROSOFT parece que funciona. Mas, no meu caso, não carrega de maneira alguma.
Grato,
MICROVOLUTION - 16 anos Evoluindo Com Você!


Você já leu a Bíblia hoje?
João 3:16 - Porque Deus amou ao mundo de tal maneira que deu seu Único Filho para que todo aquele que nEle crê não pereça mas tenha a Vida Eterna!
Avatar do usuário
JoséQuintas
Administrador
Administrador
Mensagens: 20415
Registrado em: 26 Fev 2007 11:59
Localização: São Paulo-SP
Curtiram: 1 vez

WVG_image - imagem não aparece

Mensagem por JoséQuintas »

Se o de lá funciona, faça igual.
José M. C. Quintas
Harbour 3.2, mingw, multithread, gtwvg, fivewin 25.12, dbfcdx, MySQL, ADOClass, PDFClass, SefazClass, (hwgui), (hmg3), (hmg extended), (oohg), PNotepad, ASP, (Linux/Flagship/harbour 3.2)
"The world is full of kings and queens, who blind our eyes and steal our dreams Its Heaven and Hell"

https://github.com/JoseQuintas/
microvolution
Usuário Nível 5
Usuário Nível 5
Mensagens: 1234
Registrado em: 02 Set 2011 22:17
Contato:

WVG_image - imagem não aparece

Mensagem por microvolution »

Acontece que comigo não funciona. Já testei. Num prg de teste funciona, mas, no meunsisyema ? Não.
Grato,
MICROVOLUTION - 16 anos Evoluindo Com Você!


Você já leu a Bíblia hoje?
João 3:16 - Porque Deus amou ao mundo de tal maneira que deu seu Único Filho para que todo aquele que nEle crê não pereça mas tenha a Vida Eterna!
Avatar do usuário
carlaoonline
Usuário Nível 3
Usuário Nível 3
Mensagens: 190
Registrado em: 24 Ago 2014 22:38
Localização: Porto Alegre-RS

WVG_image - imagem não aparece

Mensagem por carlaoonline »

Bom dia!


Tenta setar novamente a fonte logo abaixo do comando da imagem para ele dar um refresh na parte gráfica do harbour.

No exemplo abaixo eu tive que setar novamente a mesma fonte na linha abaixo e aí ele pintou na hora a figura, antes ele pintava só se eu movimentasse a janela ou após outros comandos graficos.

Wvg_Image( 15, 36, 16, 42, { -3, -3, 3, 3 }, GOBJ_IMAGESOURCE_FILE, "fundo.bmp" )
WVT_SETFONT( FONTE )

Ao invés de setar novamente a fonte pode também usar esse comando abaixo, que deve ser o mais correto , porém setando a fonte também da um refresh.

WvgSetAppWindow():refresh()



Mas no seu caso pode ter sido as aspas na variável Loginwvg.
Tenta colocar sem elas:

Wvg_Image( 03 , 20 , 13 , 59 , , GOBJ_IMAGESOURCE_FILE, Loginwvg , , .f.)

Acho que vai funcionar daí.
microvolution
Usuário Nível 5
Usuário Nível 5
Mensagens: 1234
Registrado em: 02 Set 2011 22:17
Contato:

WVG_image - imagem não aparece

Mensagem por microvolution »

microvolution escreveu:WvgSetAppWindow():refresh()
interessante, mas, não funciona tbm.

por isso, e, pra mim, repito, pra mim, não vale a pena gastar mais energia, tempo, com, algo que ficou pra trás e sem interesse dos próprios autores.
Em menos de 90 dias, consegui fazer um app, e, já está em fase final pra ser lançado nas lojas Play Google/App.

sucesso a todos!
qualquer coisa #tamjuntos!
Grato,
MICROVOLUTION - 16 anos Evoluindo Com Você!


Você já leu a Bíblia hoje?
João 3:16 - Porque Deus amou ao mundo de tal maneira que deu seu Único Filho para que todo aquele que nEle crê não pereça mas tenha a Vida Eterna!
Responder