Página 1 de 1

tela PDV com banner CAIXA LIVRE...

Enviado: 25 Jul 2008 10:30
por FARLEY RIBEIRO
Ola winners...

Estou tentando fazer uma tela de PDV e gostaria ao entrar na tela mostrasse uma banner com a expressão CAIXA LIVRE...
Ao movimentar o mouse ou pressionar alguma tecla retornasse a tela de venda.
E quando terminar uma venda voltasse o banner para o próximo cliente...

Alguém tem alguma rotina que realmente funcione desta forma

Se alguem tiver umas ideias ae...

Ah se puder me enviar o banner tb.

Agradeço antecipadamente,

Farley

Re: tela PDV com banner CAIXA LIVRE...

Enviado: 28 Jul 2008 09:28
por rochinha
Amiguinho

Baixe em fechado.pcx e livre.pcx

Re: tela PDV com banner CAIXA LIVRE...

Enviado: 28 Jul 2008 14:31
por FARLEY RIBEIRO
Olá amigo,

Obrigado pelos arquivos, mas não consegui abrir com essa extensão.
Fiz uma pesquisa na net e achei que o Paint poderia abri-lo mas não obtive sucesso.
http://www.criarweb.com/artigos/415.php
Qual o programa que utiliza?

Grato

Farley

Re: tela PDV com banner CAIXA LIVRE...

Enviado: 28 Jul 2008 15:16
por gvc
Use o irfanview: http://www.irfanview.net/
É gratuito e trabalho com vários formatos de arquivos.

Re: tela PDV com banner CAIXA LIVRE...

Enviado: 31 Jul 2008 18:32
por FARLEY RIBEIRO
Perfeito,

Consegui abrir e converter os arquivos para o formato desejado...

Agora como fazer para ao entrar no sistema exibir o CAIXA LIVRE...

Código: Selecionar todos

lSairDlg2 := .f.
DEFINE DIALOG oDlg2 FROM li, ci TO pv,ph PIXEL FONT wfonte_FixedSys ICON oIco
  oDlg2:lHelpIcon := .f.

  @ LING2(1.50),COLG2(2.00) GET ocoditem var mcoditem pict "@k XXXXXXXXXXXXXXXXXXXX" SIZE 120,25 ;
  VALID fVerProduto(@mcoditem, oDlg2) COLOR PRETO,RGB(202,223,254) FONT oFntD OF oDlg2 UPDATE
  ocoditem:bKeyDown:={|nKey| If(nKey=VK_ESCAPE.AND.len(aVendas)=0,(lSairDlg2 := .t., oDlg2:End()),)}
@ 5.0,1.0 LISTBOX oLbx ;
    FIELDS if(len(aVendas) > 0, aVendas[oLbx:nat], "") ;
    HEADER "Item Código" + space(len(pr->coditem)-6) + " Descrição" + space(len(pr->descricao)-9) + "  S.T.  Qtde.   Vlr.Unitário  Valor Total" ;
    SIZE 380, 175 FONT wfont2_FixedSys UPDATE
  oLbx:SetArray(aVendas)

ACTIVATE DIALOG oDlg2 CENTER on INIT (fFocus("ocoditem")) VALID (lSairDlg2)

Sei que poderia carregar no INIT mas gostaria que quando teclasse qualquer tecla, ou movimentasse o mouse, a imagem/banner desativasse.... e quando terminar a venda ativar novamente...

grato

farley

Re: tela PDV com banner CAIXA LIVRE...

Enviado: 31 Jul 2008 19:24
por rochinha
Amiguinho,

Deixe a imagem como esta, e acrescente um campo pedindo senha, caso o usuario digite a tela apresenta seu PDV e ao terminar pode voltar a ela.