neto_23

exemplo: DEFINE WINDOW oMainWnd FROM 0, 0 TO 35, 100 ; TITLE "SISLOCAD" + IIF(!EMPTY(mEmp)," - "+ALLTRIM(mEmp),""); MENU BuildMenu() ; ICON oIcon ; BRUSH oBrush oMainWnd:oFont := oFont a variavel mEmp tem que pegar o nome da empresa quando selecionada mais eu coloco ela mostra .F. como eu faco para ela mostra o nome da empresa quando selecionada eu ja public ela. mais nao resolveu.. a selecao e feita pelo listbox quando entra no sistema... antonio

me ajudem com o listbox quero fazer uma pesquisa a partir de um get quando eu teclar F1 no get chama o listbox isso ja esta sendo feito... dentro do listbox quero saber como saber se a tecla F2,F3,F4,INS,DEL,+,<-,->,setas, foram pressionada..... Obrigado .......pelas dicas anterios.. antonio

o primeiro get se deu ESC tudo bem pode sair, MAIS SE EU ESTIVER EDITANDO NO SEGUNDO GET EM DIANTE SE DEU ESC TEM QUE VOLTAR PARA O PRIMEIRO GET, COMO DEVO PROCEDER.. . O PRIMERIO GET MEU ESTA COM A FUNCAO VALID DESSA FORMA IF LASTKEY() = 27 ELSE IF CORD = SPACE(02) MSGINFO('PREENCHIMENTO É OBRIGATORIO') ENDIF ENDIF EU NAO CONSIGO LE ESSA TECLA QUANDO E PRESSIONADA QUE COISA INCRIVEL. antonio

Eu ja conseguir o que eu queria pra limpar as variaveis, obrigado do coracao, a tecla ESC, para cancelar no get ainda nao.. mais vou tentar a rotina do Kbelo, uma pergunta a mais setkey(vk_ESC, NIl), desabilita e abilitar novamente? antonio

citação: kbelo obrigado fonte em clipper do while .t. *** tela de apresentacao @ say 0,0 'NOme: ' color('..') cord = space(02) @ get cord pict '99' read if cord = space(02) .or. lastkey() = 27 return endif sele 1 go top seek cord if found() nom = nomem ** no fivewin quando eu quero alterar; pegar o valor do campo de arquivo nao consigo atualiar o get; que merda.... else nom = space(40) endif @ 10,10 get nom pict '@!' read se eu de um esc aqui ele volta para o get cord e nao fecha o dialogo como fivewin faz... kbelo me ajude..... me diga como eu devo proceder antonio id=quote>id=quote>antonio

citação:kbelo e a tecla ESC como faco para desabilita? id=quote>id=quote>antonio

citação: bem pessoal! Eu agradeco a quem me ajudar.... o b r i g a d o ! ! ! ! ! VAmos la! eu quero saber como desabiltar ou habilitar a tecla ESC, em get.... saber como limpar variaveis get por exemplo eu adiciono um registro ele volta para o primeiro get tudo bem mais quando eu coloco um novo codigo! os outros campos tem que esta vazio ... os gets mantem os dados da ultima digitacao como faco para limpar... nao estou querendo usar botao por hora... antonio id=quote>id=quote>antonio

citação: bem pessoal! Eu agradeco a quem me ajudar.... o b r i g a d o ! ! ! ! ! VAmos la! eu quero saber como desabiltar ou habilitar a tecla ESC, em get.... saber como limpar variaveis get por exemplo eu adiciono um registro ele volta para o primeiro get tudo bem mais quando eu coloco um novo codigo! os outros campos tem que esta vazio ... os gets mantem os dados da ultima digitacao como faco para limpar... nao estou querendo usar botao por hora... antonio id=quote>id=quote>antonio

bem pessoal! Eu agradeco a quem me ajudar.... o b r i g a d o ! ! ! ! ! VAmos la! eu quero saber como desabiltar ou habilitar a tecla ESC, em get.... saber como limpar variaveis get por exemplo eu adiciono um registro ele volta para o primeiro get tudo bem mais quando eu coloco um novo codigo! os outros campos tem que esta vazio ... os gets mantem os dados da ultima digitacao como faco para limpar... antonio

pessoal eu entendi o que eu quero aogra obrigado por me ajudar no conhecimento de teclas minha duvida quando um get pede o foco como eu devo proceder para criar um funcao ou acao... e no caso retornar para o mesmo get se Foi .Falso. um get peder focus fazer acao e o get receber focus... antonio

Pessoal obrigado pelo interesse de voces me ajudarem! Voces estão de parabéns! bem a minha duvida.. no fivewin: clipper 5.2e blinker 4.0 do proprio clipper 5.2e fivewin biblioteca 1.92 versao demonstracao downloa da internet Estou testando realmente se eu consigo passar um sistema em clipper para fivewin.... bem primeira barreira encontrada.../ como eu consigo ler dentro do get ativo qual foi a tecla pressionada... por exemplo se foi Enter ele mudar de campo e fazer a rotina se foi ESC ele sair se foi F1 chamar rotina de consulta do banco de dados.. no Caso de Enter fazer a funcao para ele pesquisa no banco de dados... me ajudem... antonio

no clipper nvar = space(02) @ 10,10 get nvar pict '99' read if lastkey()= 27 return endif seek nvar if found() endif no five win como eu devo proceder..... antonio