setblink()

Fórum sobre a linguagem CA-Clipper.

Moderador: Moderadores

juniortte
Usuário Nível 1
Usuário Nível 1
Mensagens: 10
Registrado em: 29 Mar 2005 09:08

setblink()

Mensagem por juniortte »

Bom dia;

Estou desenvolvendo um PRG para um bar

O Bar tem 40 mesas e 100 comandas

Amarrei mesa com comanda, tudo ok.

Coloquei 40 numeros na tela representando as mesas e uso o dbedit (comanda+mesa+fechado)

para ver os produtos pedidos na comanda

tudo ok

O dono pediu para mesa estiver ocupada o numero da mesa fique piscando, ai bicho pegou!

Tem alguma dica como fazer isto!

OBS: setblink(.t.) fica piscando a tela inteira
setblink(.f.) para de piscar
Avatar do usuário
Clipper
Colaborador
Colaborador
Mensagens: 1334
Registrado em: 23 Ago 2004 00:04
Localização: Recife/PE

Mensagem por Clipper »

Prezado Colega

Dentro do DBEDIT() creio que não tenha como fazer, talvez com o TBROWSE(), mas você pode montar uma tela como se fosse uma grade mostrando todas as mesas e desta forma poderá mostrar da forma que seu cliente quer, essa grade ficaria parecida com um tabuleiro de damas com o número da mesa/comanda no meio. Espero que tenha entendido.

Até logo.

Marcelo
Programador que é programador, quando tá de folga vai inventar função nova, fazer testes, ou seja... se divertir
Cobra 210 - Drive de 8" 1.024 KB - 64 KB RAM - Impressora de Linha Cobra - Visicalc - Fortran - Dialog - Sistema Operacional SP/M (é sp/m mesmo - era o cp/m da cobra)
Alessandro
Usuário Nível 3
Usuário Nível 3
Mensagens: 141
Registrado em: 07 Jul 2004 09:39
Localização: Santo Antonio da Platina-PR

Mensagem por Alessandro »

Junioorte

Cara não se pode fazer tudo o que o cliente quer....
Imagine o cara com a tela piscando na cara dele constantemente....
Com certeza seu cliente não pensou que pode ficar cansativo para o operador, experimente convencê-lo, ou faça e mostre a ele a inviabilidade.
Arranje outra solução, como alterar a cor entre as ocupadas.
Beleza, garanto que fica melhor.


Inté
Alessandro
Jorge Adourian
Usuário Nível 2
Usuário Nível 2
Mensagens: 95
Registrado em: 05 Jul 2004 23:38
Localização: São Paulo-SP-Brasil
Contato:

Mensagem por Jorge Adourian »

É isto aí Alessandro...Um pouco de Bom Senso não faz mal a ninguem.

E que os Clientes nos ouçam !!!
Até...
Jorge Adourian
Clipper5.2e, Blinker7.0, SIX2(NSX), ADS7.1, FW2.3c, PrintFile2.1.5 e PDFCreator0.8.0(2)
Responder