Clipper On Line • Ver Tópico - Wvg_Image() ou Wvg_DrawImage() não carrega imagens WVGCRT()

Wvg_Image() ou Wvg_DrawImage() não carrega imagens WVGCRT()

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

Moderador: Moderadores

 

Wvg_Image() ou Wvg_DrawImage() não carrega imagens WVGCRT()

Mensagempor microvolution » 09 Mar 2019 18:46

Alguém já passou por isso?
se usar o seguinte fora do wvgcrt() funciona:
Wvg_Image     ( 01 , 01 , 08 , 29 ,  , GOBJ_IMAGESOURCE_FILE, TLogin , , .f. )

Já dentro de uma função que cria o WvgCrt() não funciona.
A minha WVG_CRT é basicamente a mesma coisa da pasta TESTS, só com algumas modificações:
   WITH OBJECT oCrt := WvgCrt():New( , , { nTop , nLef }, { nBot , nRig }, , .t. )
      :lModal    := .t.
      :title     :=  cTit
      :icon      := "AppIcon"
      :resizable := .F.
      :closable  := .F.
      :minMax    := .F.
      :lbDblClick( )
      :create()
      :setColorFG(cCor)
   ENDWITH
      Wvg_Image     ( 01 , 01 , 08 , 29 ,  , GOBJ_IMAGESOURCE_FILE, TLogin , , .t. )
      Wvg_DrawImage ( 1, 1, 10, 10, TLogin, , .f. )

Talvez esteja faltando alguma outra peça pra funcionar, que eu não vi no demowvg.prg.
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: 1175
Data de registro: 02 Set 2011 22:17
Curtiu: 59 vezes
Mens.Curtidas: 17 vezes

Wvg_Image() ou Wvg_DrawImage() não carrega imagens WVGCRT()

Mensagempor Eric.Developer » 10 Mar 2019 01:28

Walcledson,
você começou a usar o [x]Harbour em que ano?

microvolution escreveu:Alguém já passou por isso?
se usar o seguinte fora do wvgcrt() funciona:
Delphi, SQL, FastReport | Xailer VxH Fivewin Minigui Hwgui [x]Harbour
Contate-me: Desenvolvimentos em geral | Treinamentos
Overview/Download: Xailer / Harbour Ferramenta profissional e mais completa.
Avatar de usuário

Eric.Developer
Usuário Nível 3

Usuário Nível 3
 
Mensagens: 161
Data de registro: 31 Ago 2010 22:16
Curtiu: 0 vez
Mens.Curtidas: 8 vezes

Wvg_Image() ou Wvg_DrawImage() não carrega imagens WVGCRT()

Mensagempor JoséQuintas » 10 Mar 2019 19:41

Realmente....
Agora que estou vendo, que a wvg original pode ser limitada.
Geralmente ao criar um objeto GUI, é indicado o hWnd da janela que vai receber o objeto.
Se wvgImage() não tem isso, é tentar executá-la com o foco na janela wvgCrt().

Tentando traduzir:

A janela principal da wvg é uma janela... óbvio.
WvgCrt() é outra janela.
Ao colocar a imagem, vai colocar em qual das janelas?
Sinceramente não sei como a wvg decide, se usar a janela atual como referência, o comando deve ser executado depois do foco ficar em wvgCrt()

Como desde o começo uso multithread, no final todas as minhas janelas são principais, nem sei como seria o uso de wvgCrt().
Se não me engano, nos exemplos tem o uso de SetGt() que é uma função que está dentro do exemplo, pra trocar a GT em uso. (equivalente a trocar janela). Se nos exemplos funciona, então é fazer igual nos exemplos.
José M. C. Quintas
Harbour 3.2, mingw, gtwvg, multithread, dbfcdx, ADO+MySql, PNotepad
"The world is full of kings and queens, who blind our eyes and steal our dreams Its Heaven and Hell"

https://github.com/JoseQuintas/
Avatar de usuário

JoséQuintas
Membro Master

Membro Master
 
Mensagens: 18013
Data de registro: 26 Fev 2007 11:59
Cidade/Estado: São Paulo-SP
Curtiu: 15 vezes
Mens.Curtidas: 1206 vezes




Retornar para GTWVG

Quem está online

Usuários vendo este fórum: Nenhum usuário registrado online e 7 visitantes


Ola Amigo, espero que meu site e forum tem lhe beneficiado, com exemplos e dicas de programacao.
Entao divulgue o link da Doacao abaixo para seus amigos e redes sociais ou faça uma doacao para o site forum...
MUITO OBRIGADO PELA SUA DOACAO!
Faça uma doação para o forum
cron
v
Olá visitante, seja bem-vindo ao Fórum Clipper On Line!
Efetue o seu login ou faça o seu Registro