Página 1 de 1
Janela do prompt levemente moderna
Enviado: 10 Mai 2017 15:17
por JoséQuintas
Pra quem tá cansado da janela de prompt de sempre, o recurso de transparência do Windows 10 ajuda.
Aí passa a ver o papel de parede de sempre.... rs
Janela do prompt levemente moderna
Enviado: 11 Mai 2017 14:53
por asimoes
Como faz ? mostra o milagre mas não diz qual é o santo, kkkk
Janela do prompt levemente moderna
Enviado: 11 Mai 2017 15:07
por JoséQuintas
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.
Janela do prompt levemente moderna
Enviado: 11 Mai 2017 15:24
por JoséQuintas
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
Janela do prompt levemente moderna
Enviado: 11 Mai 2017 15:31
por JoséQuintas
Uia...
Dá pra deixar quem usa LIB gráfica com inveja.... rs
Código: Selecionar todos
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
Janela do prompt levemente moderna
Enviado: 11 Mai 2017 15:39
por JoséQuintas
Acabei achando um bug em console.. essa linha toda em branco não deveria acontecer...
Acontece ao redimensionar a janela.
Janela do prompt levemente moderna
Enviado: 11 Mai 2017 16:17
por JoséQuintas
Atenção pra quem usa console:
Código: Selecionar todos
#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.
Janela do prompt levemente moderna
Enviado: 11 Mai 2017 16:38
por JoséQuintas
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