Clique abaixo para nos ajudar
Login

Esqueci minha senha

Estamos no Facebook
Buscar
 
 

Resultados por:
 


Rechercher Busca avançada

Quem está conectado
6 usuários online :: Nenhum usuário registrado, Nenhum Invisível e 6 Visitantes :: 2 Motores de busca

Nenhum

[ Ver toda a lista ]


O recorde de usuários online foi de 468 em 1/3/2012, 10:43
Últimos assuntos
Bloquear edição do ListBox

17/6/2010, 15:13 por Julio

Pessoal

Boa Tarde!

Tnho uma listbox apenas para exibir o resultado.
Preciso bloquear a listbox …

Comentários: 17

automação do mozilla e chrome

15/1/2017, 12:16 por Handerson Mildroz

Boa tarde a todos!

Sou iniciante no VFP. Preciso de ajuda, pois tenho um código que usa o …

Comentários: 0

COMO ESTÃO DESENVOLVENDO EM WEB?

22/8/2016, 10:48 por AJC

Pessoal, já lí sobre vários topicos aqui no forum sobre desenvolvimento web
mas ainda nada …

Comentários: 2

USAR REPORT FORM

30/12/2016, 09:06 por AJC

Pessoal bom dia,
Estou com um grande problema, já pesquisei muita coisa sobre report form, mas o …

Comentários: 0

dll pertocheck

15/12/2016, 12:45 por FERNANDOMATRELLA

Alguem teria ja desenvolvido a comunicação com essa dll estou tento muito trabalho aqui e nenhum …

Comentários: 1

Estatísticas
Temos 6987 usuários registrados
O último usuário registrado atende pelo nome de Alexsander Leal

Os nossos membros postaram um total de 3 mensagens em 1 assuntos

Sumir com o ponteiro e Eventos do mouse no form

Ver o tópico anterior Ver o tópico seguinte Ir em baixo

Resolvido Sumir com o ponteiro e Eventos do mouse no form

Mensagem por Nelson Arcas em 13/3/2010, 13:57

Pessoal

Alguem sabe como sumir com o mouse e seus eventos no form durante um processo e após retorna-los?

Estou com o seguinte problema:
No sistema que estou convertendo do fox 2.5 para o Visual temos diversas janelas "Wait Window" dentro dessa janela colocamos diversas opções para o usuario e conforme a resposta executamos o processo. Porem quando o usuario ao invés de selecionar a tecla indicada ele clica é gerado um erro. "Function argument value, type, or count is invalid"
Verifiquei a possibilidade de utiliza msgbox, mas tenho diversas situações onde a pergunta pode ter 5 respostas diferentes.
O codigo que estou fazendo é este.

Código:

WAIT WINDOW 'Selecione a opção para saída do Relatório? (V-Video I-Impressora P-Planilha A-Arquivo texto)
DO CASE
   CASE UPPER(CHR(LASTKEY())='V'
      DO REPORT FORM teste.frx TO PRINTER
   CASE UPPER(CHR(LASTKEY())='I'
      DO REPORT FORM teste.frx TO PRINTER no CONSOLE
   CASE UPPER(CHR(LASTKEY())='P'
      EXPORT TO &nomearq TYPE XLS
   OTHERWISE
      COPY TO &nomearq TYPE SDF
ENDCASE
 

Nelson Arcas
Participa Bastante
Participa Bastante


Voltar ao Topo Ir em baixo

Resolvido Re: Sumir com o ponteiro e Eventos do mouse no form

Mensagem por lardecristo em 13/3/2010, 15:34

Olá Nelson,

Fiz algumas pequenas alterações no seu código.

Explicações:

1 - O comando LASTKEY() está recebendo um número negativo, por isso do erro;
2 - o comando CHR é que está gerando o erro, número negativo não existe na tabela ASCII, para resolver isso eu coloquei um IF.
3 - O seu Default será sempre "A", se sim, então é só colocar ELSE e executar o mesmo comando do OTHERWISE.

Obs.: No código estou assumindo que não importe que o usuário tecle ou click sempre usará o Default.
Código:

WAIT WINDOW 'Selecione a opção para saída do Relatório? (V-Video I-Impressora P-Planilha A-Arquivo texto)'

MESSAGEBOX(LASTKEY())      && Aqui eu mostro o valor só para você entender melhor, pode remover esta linha.

IF LASTKEY() > 0 THEN
   DO CASE
     CASE UPPER(CHR(LASTKEY()))='V'
         DO REPORT FORM teste.frx TO PRINTER
     CASE UPPER(CHR(LASTKEY()))='I'
         DO REPORT FORM teste.frx TO PRINTER no CONSOLE
     CASE UPPER(CHR(LASTKEY()))='P'
         EXPORT TO &nomearq TYPE XLS
     OTHERWISE
         COPY TO &nomearq TYPE SDF
   ENDCASE
ELSE
         COPY TO &nomearq TYPE SDF
ENDIF

lardecristo
Participa Bastante
Participa Bastante


Voltar ao Topo Ir em baixo

Resolvido Re: Sumir com o ponteiro e Eventos do mouse no form

Mensagem por alceu11 em 13/3/2010, 17:38

Nelson
pq nao faz assim
link
[Você precisa estar registrado e conectado para ver este link.]

ja que esta fazendo na versao 90.

So uma ideia,,,,,,nem caprichei nas opcoes.

nois trbalha ate de sabado..........

alceu11
Usuário 5 Estrelas
Usuário 5 Estrelas


Voltar ao Topo Ir em baixo

Resolvido Re: Sumir com o ponteiro e Eventos do mouse no form

Mensagem por Nelson Arcas em 13/3/2010, 20:31

Alceu, valeu!
Mas isso não iria matar todo o problema, eu tenho situações onde tenho que tomar outras decisões. Exemplo quando chamo um relatorio de Renovação.
Código:

WAIT WINDOW 'Qual o relatório de Renovação A - Antecedentes, B - Exame Médico, C - Psicotécnico, D - Habilitação, E - Integração?'
DO CASE
   CASE UPPER(CHR(LASTKEY())='A'
      SELECT ......
   CASE UPPER(CHR(LASTKEY())='B'
      SELECT ......
   CASE UPPER(CHR(LASTKEY())='C'
      SELECT ......
   CASE UPPER(CHR(LASTKEY())='D'
      SELECT ......
   OTHERWISE
      SELECT ......
ENDCASE

Nelson Arcas
Participa Bastante
Participa Bastante


Voltar ao Topo Ir em baixo

Resolvido Re: Sumir com o ponteiro e Eventos do mouse no form

Mensagem por Nelson Arcas em 13/3/2010, 20:36

Cristo valeu pelo Dica, acabei olhando só a dica do Alceu a principio e não havi visto a sua.

Realmente o problema estava no retorno da função CHR() que retorna uma valor negativo, vou alterar as rotina e consistir se lastkey()<0, como na Versão 2.5 quando voce clica ele não traz nada e por isso não gerava erro.

Legal problema resolvido. Very Happy
Vou começar o meu final de semana agora! cheers

Nelson Arcas
Participa Bastante
Participa Bastante


Voltar ao Topo Ir em baixo

Resolvido Re: Sumir com o ponteiro e Eventos do mouse no form

Mensagem por hugo em 13/3/2010, 21:56

boa galera

status de resolvido!

Smile

_________________
"A tristeza é a falta de alegria, mais sem ela eu não poderia entender a alegria do fato de que a felicidade existe!"
Helio Leites - [Você precisa estar registrado e conectado para ver este link.]

hugo
Usuário 5 Estrelas
Usuário 5 Estrelas


Voltar ao Topo Ir em baixo

Ver o tópico anterior Ver o tópico seguinte Voltar ao Topo


 
Permissão deste fórum:
Você não pode responder aos tópicos neste fórum