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

AnimateBox HMG

MensagemEnviado: 27 Abr 2011 16:20
por clipsis
Olá a todos!

Alguém sabe como funciona e como usa o componente AnimateBox da paleta do HMG ?

Algum exemplo.

Fico no aguardo!

AnimateBox HMG

MensagemEnviado: 27 Abr 2011 18:15
por Pablo César
Ao pesquisar sobre o assunto de AnimateBox, olhe só o que eu encontrei <ver vídeo em anexo>. Pena estar em fracês ou algum outro idioma árabe (creio eu). Pois ensina através de um software chamado PWCT (Magic) do Mahmoud Fayed (pra quem quiser fazer download: http://doublesvsoop.sourceforge.net/) esta ferramenta permite criar sua própria aplicação visual sem código fonte: PWCT - Programming Without Coding Technology.

Re: AnimateBox HMG

MensagemEnviado: 27 Abr 2011 18:26
por Maligno
Minha opinião: em mais de 20 anos de carreira eu nunca vi qualquer linguagem de programação nesse estilo "visual" que permita desenvolver software complexo, de qualidade realmente boa e que seja algo mais que uma simples "curiosidade visual". Se existisse algo do tipo qualquer capiau seria programador. Não dá pra dispensar os dias, meses de desenvolvimento, se a proposta é ter um software de boa qualidade.

Vale mais pela curiosidade. :)

AnimateBox HMG

MensagemEnviado: 27 Abr 2011 18:35
por Pablo César
Realmente interessante a ferramenta. E interessante também foi anexar o video e pelo que parece ele é acionado apenas entra neste tópico... rsrs Se isto incomodar, posso apenas colocar o link.

Re: AnimateBox HMG

MensagemEnviado: 27 Abr 2011 19:00
por Maligno
Pois é. No início pensei que fosse uma imagem, mas quando começou a tocar estranhei. Daí que vi que era flash, que reproduz automaticamente. Também não sabia disso. :)

AnimateBox HMG

MensagemEnviado: 27 Abr 2011 20:49
por Pablo César
Ainda não usei o componente AnimateBox da paleta do HMG, mas existe este exemplo no HMG Extended que modifiquei da pasta Samples:
/*

HMG 4 DEMO
(c) 2010 Roberto Lopez <mail.box.hmg@gmail.com>
Implemented by Pablo César for fórum proposes

*/

#include "hmg.ch"

Function Main
Define window Win1;
    at 10,10      ;
    Width 415     ;
    Height 490
    Title "Exibe arquivos gifs !!!"
    Type WND_MAIN
    Oninit (Win1:Center(),Win1.ab1.play())
   
    Define AnimateBox ab1
       Row 10
       Col 10
       Width 394
       Height 376
       File 'bfly.gif'
    End AnimateBox
   
    Define Button b1
       Row 400
       Col 10
       caption "Play"
       onClick Win1.ab1.play()
    End Button

    Define Button b2
       Row 400
       Col 150
       caption "Stop"
       onClick Win1.ab1.stop()
    End Button
         
    Define Button b3
       Row 400
       Col 290
       caption "Close"
       onClick Fechar()
    End Button

    Define Button b4
       Row 440
       Col 080
       caption "Girassol"
       onClick Girassol()
    End Button

    Define Button b5
       Row 440
       Col 220
       caption "Borboleta"
       onClick Borboleta()
    End Button
   
End Window
Win1:Activate()
Return

Function Girassol()
Win1.ab1.close()
Win1.ab1.file := 'sg4.gif'
Win1.ab1.open('sg4.gif')
SetProperty("Win1","ab1","col",160)
Win1.ab1.show()
Win1.ab1.play()
Return

Function Borboleta()
Win1.ab1.close()
Win1.ab1.file := 'bfly.gif'
Win1.ab1.open('bfly.gif')
SetProperty("Win1","ab1","col",10)
Win1.ab1.show()
Win1.ab1.play()
Return

Function Fechar()
Win1.ab1.close()
Win1.ab1.hide()
Return
Disponibilizei o executável e os arquivos gifs para executarem e verem o resultado.

Obs.: Favor notar em vermelho HMG Extended por HMG versão 4 como correto

Re: AnimateBox HMG

MensagemEnviado: 27 Abr 2011 20:58
por Maligno
Erro: um box avisa que falta o arquivo qt4core.dll. Não dá pra saber se falta algum outro.

AnimateBox HMG

MensagemEnviado: 27 Abr 2011 21:17
por Pablo César
Ué ! Mas que droga ! Não é que para aplicativos feito em HMG 4 (ou ao menos este aqui), precisa registrar as seguintes dlls:

mingwm10.dll
QtCore4.dll
libgcc_s_dw2-1.dll
QtGui4.dll

Estas fazem parte do BIN da HMG 4. Eu me enganei e tinha mencionado que era HMG Extended (mas corrigí) na minha mensagem anterior. Puxa fiquei decepcionado com isso ! Teria alguma coisa a ver com a portabilidade que a QT oferece ?

Re: AnimateBox HMG

MensagemEnviado: 28 Abr 2011 14:29
por Toledo
Segue em anexo um exemplo para HMG 3.0.35.

Abraços,

AnimateBox HMG

MensagemEnviado: 28 Abr 2011 16:00
por Pablo César
Ta aí... esse sim funciona em qualquer Windows e sem precisar instalar nada. Valeu Toledo !