Clipper On Line • Ver Tópico - Janela do prompt levemente moderna

Janela do prompt levemente moderna

Seção onde você poderá tirar suas dúvidas sobre Sistemas Operacionais. (Windows, Linux...)

Moderador: Moderadores

 

Janela do prompt levemente moderna

Mensagempor JoséQuintas » 10 Mai 2017 15:17

Pra quem tá cansado da janela de prompt de sempre, o recurso de transparência do Windows 10 ajuda.

prompt.png


Aí passa a ver o papel de parede de sempre.... 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

Janela do prompt levemente moderna

Mensagempor asimoes » 11 Mai 2017 14:53

Como faz ? mostra o milagre mas não diz qual é o santo, kkkk
â–ºHarbour 3.x | Minigui xx-x | HwGuiâ—„
Pense nas possibilidades abstraia as dificuldades.
Não corrigir nossas falhas é o mesmo que cometer novos erros.
A imaginação é mais importante que o conhecimento. (Albert Einstein)
Avatar de usuário

asimoes
Colaborador

Colaborador
 
Mensagens: 4919
Data de registro: 26 Abr 2007 16:48
Cidade/Estado: RIO DE JANEIRO-RJ
Curtiu: 341 vezes
Mens.Curtidas: 258 vezes

Janela do prompt levemente moderna

Mensagempor JoséQuintas » 11 Mai 2017 15:07

Realmente.... esqueci disso...rs
Só ajustei nível de transparência.
E o fundo preto se encarrega de escurecer mais ainda a imagem, pra não atrapalhar a leitura do texto.

config.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

Janela do prompt levemente moderna

Mensagempor JoséQuintas » 11 Mai 2017 15:24

Não tinha pensado antes.....
Esse prompt é o que o Clipper usa, e é em preto e branco...
Pode deixar o aplicativo console interessante, sem precisar de LIB nenhuma.... 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

Janela do prompt levemente moderna

Mensagempor JoséQuintas » 11 Mai 2017 15:31

Uia...
Dá pra deixar quem usa LIB gráfica com inveja.... rs

console.png


FUNCTION Main()

   LOCAL nValor, nValor1, nValor2, nQtCalc := 0

   SetMode( 40, 80 )
   CLS
   @ 1, 0 SAY "Valor 1:"  GET nValor1
   @ 3, 0 SAY "Valor 2:" GET nValor2
   @ 5, 0 SAY "Outro..:" GET nValor
   @ 7, 0 SAY "Mais um:" GET nQtCalc
   READ

   RETURN NIL
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

Janela do prompt levemente moderna

Mensagempor JoséQuintas » 11 Mai 2017 15:39

Acabei achando um bug em console.. essa linha toda em branco não deveria acontecer...
Acontece ao redimensionar a janela.
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

Janela do prompt levemente moderna

Mensagempor JoséQuintas » 11 Mai 2017 16:17

Atenção pra quem usa console:

#include "inkey.ch"

FUNCTION Main()

   LOCAL nKey := 0

   SetMode( 15, 80 )
   CLS
   DO WHILE nKey != K_ESC
      ? MaxRow(), MaxCol()
      nKey := Inkey(5)
   ENDDO

   RETURN NIL


Janela fixada no fonte em 15x80


14 79
14 79
26 111
26 111
d:\temp>



Pode dar trabalho pra console, até alguma solução.
É alterar a quantidade de linhas/colunas fora do aplicativo, sem o aplicativo saber.
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

Janela do prompt levemente moderna

Mensagempor JoséQuintas » 11 Mai 2017 16:38

Alguém que tenha Windows 10, seria interessante fazer esse teste.
Pode ser recurso da Creators Update, que instalei adiantado.

Estou me referindo ao problema que acaba acontecendo com Harbour, e não à transparência... 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




Retornar para Sistemas Operacionais

Quem está online

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