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
Janela principal
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,
ao clicar no topico da msg
O tópico requisitado não existe.
Abel