Página 1 de 1

Splashscreen - GTs (como implementar?)

Enviado: 28 Ago 2012 09:50
por Dr.Microso
Prezados, saudações!

Fazendo testes com as GTs (wvw, wvg, wvt), estou encontrando dificuldade em implementar uma tela de abertura com imagem.
Fico grato por qualquer contribuição/idéia.

Um abraço!

Splashscreen - GTs (como implementar?)

Enviado: 28 Ago 2012 19:36
por Imatech
Olá !

Basicamente ira abrir nova janela usando:

Código: Selecionar todos


  LOCAL nTime := Time()
  LOCAL aPaint := { 'Img_Splash', { || Wvt_DrawImage( nTop,nLeft, nBottom, nRight, cFileName ) }, NIL }
  Local oCrt := WvgCrt():New( , , { -1,-1 }, { MaxRow()+1, MaxCol()+1 }, , .T. )

  oCrt:lModal := .T.
  oCrt:icon   := "Icon_From_Ressource"
  oCrt:create()
  oCrt:resizable := .F.

  WvtSetPaint( aPaint )

  While ( nTime + 5 ) < Time()
   Inkey( 1/10 )
  End

  oCrt:destroy()

*----------------------------------------------------------------------*
* This function must be linked with the application
*----------------------------------------------------------------------*
FUNCTION Wvt_Paint()
   WvtPaintObjects()
   RETURN NIL

.
.
.
.
.
Melhor fonte de informações sobre WVG:
...\contrib\gtwvg\tests
.
.
.
.
.
Para manter as imagens na tela, estudar o uso da função:

WvtSetPaint( aArray )
.
.
.
.
.
A beginer wvg tuto by: Giovanni Di Maria

http://www.elektrosoft.it/tutorials/gtwvg/gtwvg.asp

Splashscreen - GTs (como implementar?)

Enviado: 30 Ago 2012 00:43
por Dr.Microso
Muito grato pelo código/exemplo!
Um abraço!

Splashscreen - GTs (como implementar?)

Enviado: 15 Set 2012 14:18
por Abel
Ronaldo, Imatech,

vi os exemplos, os comando wvt_ e pergunto,
consigo utilizar programacao modo console, compilado com -gui e comecar aos poucos a criar telas com a aparencia que vi no exemplo ?

se sim, quais libs ou #includes devo colocar no fonte e na compilacao ?

utilizo harbour, 3.1 nighty , e com a -gtwvt , para usar os comandos hb_gtinfo.

Abracos, desde ja agradeço
ABEL

Splashscreen - GTs (como implementar?)

Enviado: 17 Set 2012 12:39
por Imatech
Olá Abel !

Acredito que nos post's abaixo ira encontrar o necessário:

https://pctoledo.org/forum/viewto ... hbp#p76218

https://pctoledo.org/forum/viewto ... hbp#p75618

Minha recomendação é: após ajustar o projeto usando Wvt/Wvg, fazer a migração gradual diretamente para hbQT...

Qualquer dúvida esteja a vontade para novas perguntas ;)
.
.
.
Abç

Splashscreen - GTs (como implementar?)

Enviado: 17 Set 2012 13:41
por Dr.Microso
Senhores, saudações!

Particularmente, acho que o assunto da tela de entrada ("splashscreen")poderia ser mais explorado, afinal, seja no ínicio do seu app ou no fim, acaba conferindo uma personalização melhor à seu produto (os softwares profissionais e de grandes corporações as possuem...).
Em função disso, criei um tópico dedicado ao tema com a finalidade de compartilhamos telas/codificação nas mais diversas GUIs (GTs, HbQt, HwGui, Fivewin...), para que possamos comparar a simplicidade ou trabalho que dá, trocarmos idéias, apresentar tecnologias e nossa arte, por que não?

Caro Abel, compartilho então no tópico abaixo, um exemplo em GTWVW...

Telas de abertura/finalização ("splashscreen")

Um abraço!

GUI & telas de abertura/finalização ("splashscreen")

Enviado: 17 Set 2012 14:30
por Dr.Microso
Ilustres colegas, saudações!

Sempre senti falta de um tópico dedicado à esse tema, desde quando codificava ainda em CA-Clipper...

Em fóruns de outras linguagens, é comum encontrarmos um ou outro tópico dedicado a explorar melhor, certos elementos (objetos) e/ou facetas que são comuns à aplicativos (browser, box, transparência, efeitos visuais, etc.) que costumam "encantar" o cliente.
A intenção é colher pontos-de-vista sobre o trabalhão que dá e/ou a facilidade de implantar determinadas estruturas, a partir da GUI que foi eleita, evidenciando até as situações onde possa se mesclar GUIs, a fim de obter certo resultado desejado, mas que pela linguagem "carro-chefe", seria complicado.

ACHO que seria interessante e muito útil, poupar-mos comentários como: "essa GUI é ultrapassada/descontinuada...", "por que você não faz na GUI tal...", "se for feito na linguagem tal, dá menos trabalho..." Tente convencer pelo exemplo compartilhando seu código e telas!
Poderá ser muito RICO se concentrarmos aqui as formas diferentes de implantação, que pode ser feita inclusive na mesma linguagem.

Excelentes postagens à todos.

GUI & telas de abertura/finalização ("splashscreen")

Enviado: 17 Set 2012 14:34
por Dr.Microso
Um simples exemplo em GTwvw

Tela de abertura
Imagem

Janela principal
Imagem

splash.prg

Código: Selecionar todos

#include "winuser.ch"

ANNOUNCE Hb_NoStartUpWindow              

*--------
procedure Main()
*--------
local nA

setcursor(0)	                                   
Scroll( )                                                    				

wvw_SetMainCoord( .F. )	
wvw_seticon(, 100)		                    
wvw_SetDefCentreWindow( .t. ) 	                    

*___splash
nA:=wvw_nOpenWindow( , 0, 0, 13, 39,WS_POPUP)
wvw_drawImage(nA, ,,,, "_img\splash.jpg")  	
inkey(3)                                               	
wvw_lCloseWindow(nA)                                    

*___define cor da janela
setcolor("N/W")                                                             
Scroll()

*___janela MAIN
setmode(25,80)
nA:=wvw_nOpenWindow("Janela MAIN - 25x80") 
inkey(0)					
wvw_lCloseWindow(nA)			

return *--------

Baixe aqui o arquivo executável...
Um abraço!

Splashscreen - GTs (como implementar?)

Enviado: 18 Set 2012 21:05
por Abel
Dr.Microso,
ao clicar no topico da msg

O tópico requisitado não existe.

Abel

Splashscreen - GTs (como implementar?)

Enviado: 19 Set 2012 09:44
por Pablo César
Abel escreveu:
Dr.Microso escreveu:Caro Abel, compartilho então no tópico abaixo, um exemplo em GTWVW...

Telas de abertura/finalização ("splashscreen")
Dr.Microso,
ao clicar no topico da msg

O tópico requisitado não existe.

Abel