Clipper On Line • Ver Tópico - Tela de login deste natal

Tela de login deste natal

Aqui é o lugar para bater papo e trocar idéias sobre os mais variados assuntos

Moderador: Moderadores

 

Tela de login deste natal

Mensagempor JoséQuintas » 13 Dez 2018 20:07

Minha tela de login deste natal...

natal.png


Tá fazendo sucesso.... rs
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: 18008
Data de registro: 26 Fev 2007 11:59
Cidade/Estado: São Paulo-SP
Curtiu: 15 vezes
Mens.Curtidas: 1206 vezes

Tela de login deste natal

Mensagempor JoséQuintas » 13 Dez 2018 20:15

Sei lá...
Na resolução máxima daqui.

natal2.png


Deixei a janela do aplicativo no máximo, e só cortei a área "útil".
Esse corte tem o tamanho de 2467 x 999, não cabe em uma tela HD 1920 X 1080.
Até agora não entendo como esses ícones podem ficar legais em qualquer resolução....
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: 18008
Data de registro: 26 Fev 2007 11:59
Cidade/Estado: São Paulo-SP
Curtiu: 15 vezes
Mens.Curtidas: 1206 vezes

Tela de login deste natal

Mensagempor JoséQuintas » 13 Dez 2018 20:20

Cortei só o ícone agora.
Ficou em 422 x 403 por causa da ampliação da GTWVG.

sonoel.png


Sei lá...
Não deixa nada a desejar pra nenhuma LIB GUI.
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: 18008
Data de registro: 26 Fev 2007 11:59
Cidade/Estado: São Paulo-SP
Curtiu: 15 vezes
Mens.Curtidas: 1206 vezes

Tela de login deste natal

Mensagempor JoséQuintas » 13 Dez 2018 20:31

Aqui ao contrário, reduzi tanto que nem dá pra ler

natal3.png


A tela inteira está com 606 x 416, nem sei o ícone.
Mesmo assim o ícone está legível.

Todas as imagens deste post são print-screen.
Apenas abri o aplicativo com a tela da GTWVG, e usei a opção de redimensionar janela.
Qualquer resolução, o ícone continua legível....
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: 18008
Data de registro: 26 Fev 2007 11:59
Cidade/Estado: São Paulo-SP
Curtiu: 15 vezes
Mens.Curtidas: 1206 vezes

Tela de login deste natal

Mensagempor JoséQuintas » 13 Dez 2018 20:51

Faltou dizer:

Harbour puro, Windows puro, nenhuma DLL ou rotina pra mexer com imagem.
Sei lá... as LIBs GUI só complicam.... kkkkk
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: 18008
Data de registro: 26 Fev 2007 11:59
Cidade/Estado: São Paulo-SP
Curtiu: 15 vezes
Mens.Curtidas: 1206 vezes

Tela de login deste natal

Mensagempor JoséQuintas » 13 Dez 2018 21:27

A rotina pra isso?
Como eu já disse, os recursos do meu aplicativo não tem nenhum segredo, tá até aberto demais...

https://github.com/JoseQuintas/JoseQuintas/blob/master/source/ze_apres.prg

o primeiro ícone:

   WITH OBJECT oControl := wvgtstIcon():New()
      :SetColorBG( SetColor() )
      :cImage := "icojpatecnologia"
      :Create( , , { -nRow, -24 }, { -5.5, -84 } )
   ENDWITH


o segundo ícone (do noel):

   WITH OBJECT oControl := wvgTstIcon():New()
      :SetColorBG( SetColor() ) // "W/B" )
      DO CASE
      CASE Month( Date() ) == 12 .AND. Day( Date() ) < 26
         :cImage := "icoSanta"
      OTHERWISE
         :cImage := "icoUserId"
      ENDCASE
      :Create( , , { -( Row() + 1 ), -33 }, { -6, -13 } )
   ENDWITH


A propósito....
Comentaram outro dia comigo sobre a GTWVG trabalhar com linhas/colunas...

Números positivos são coordenadas XY, e números negativos são linhas/colunas.

{ 10, 10 }, { 100, 100 } equivale a posição 10 x 10 pixels, e altura/largura 100 X 100 pixels.
{ -10, -10 }, { -20, -20 } equivale a posição linha 10 coluna 10, e altura 20 linhas, largura 20 colunas.
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: 18008
Data de registro: 26 Fev 2007 11:59
Cidade/Estado: São Paulo-SP
Curtiu: 15 vezes
Mens.Curtidas: 1206 vezes

Tela de login deste natal

Mensagempor JoséQuintas » 17 Dez 2018 14:22

Achei um ícone mais legal....
Como tem poucos dias entre natal e ano novo....
Dá pra manter este durante o mês de dezembro inteiro....
É o Noel comemorando ano novo.... rs

noel.png
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: 18008
Data de registro: 26 Fev 2007 11:59
Cidade/Estado: São Paulo-SP
Curtiu: 15 vezes
Mens.Curtidas: 1206 vezes




Retornar para Bate Papo

Quem está online

Usuários vendo este fórum: Nenhum usuário registrado online e 5 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