PC Toledo

Amiguinho

Para o erro "comando ou nome de arquivo inválido" voce deve sacar da função FILE()

Em Clipper:

if file("WKEYKILL.EXE")
   run WKEYKILL.EXE
endif

Em Batch:

Código: Selecionar todos

if exist WKEYKILL.EXE WKEYKILL.EXE

Consegui !!!

Vamos lá...

Veja o código abaixo :

Código: Selecionar todos


*---------------*
 FUNCTION MAIN()
*---------------*
PARAM SISTEMA
IF SISTEMA=NIL
   CLS
   @ 02,02 SAY "Favor especificar o nome do executavel !"
   INKEY(0)
ENDIF
IF .NOT. FILE(SISTEMA)
   CLS
   @ 02,02 SAY "Executavel nao encontrado, verifique !"
   INKEY(0)
ENDIF
CLS
RUN START WKEYKILL.EXE /shared
RUN "&SISTEMA"
RUN START WKEYKILL.EXE /shared
RETURN

Você deve estar pensando. Ué mas eu já fiz isso ou já fiz algo parecido com isso e não funcionou.

A resposta é que o meu funcionou porque eu compilei com xHarbour que acabou com a limitação do Clipper que é de ser 16 bits e monotarefa.

Basta descompactar o arquivo que tá no link abaixo e fazer a chamada do seus sistemas assim :

EXECUTE MEUPROG.EXE
ou
EXECUTE C:\SISTEMA\MEUSIST.EXE

No caso eu assumo que o programa WKEYKILL está num Path visivel ou na pasta do sistema a ser executado, mas isso é o de menos, já temos a solução o resto é só imaginação.

Até logo.

Olha o link aê gente...
http://www.sistemabr2.cjb.net/execute.zip

Ps. Valeu como aprendizado, aprendi mais sobre o registro do windows e fiz meu 1º programa em xHarbour.

Até logo.

Marcelo :)Pos

Aproveitando para tirar uma dúvida com o Rochinha e ou Vagner que são experts no assunto : :{

Eu linkei de 2 maneiras, uma sem usar a GTWVW e outra usando, a unica diferença que notei é que com a GTWVW aparecem rapidamente 2 janelas antes de exetutar o sistema desejado, já sem ela nada aparece, minha pergunta é :

Existe alguma outra diferença em relação ao uso ou não da GTWVW ?

Vale lembrar que praticamente nada é enviado para a tela, o programa faz apenas uma espécie de ponte.

Ps. A versão que está no link é sem o uso da GTWVW, pois pelo menos não tem as janelinhas.

Obrigado.

Marcelo

Amiguinho

Em relação a janelinha nos posts que vi de solução na FiveTechSoft era:

1 - Retirar o parametro -aa na linha do iLink32
2 - Trocar no b32.bc(*) a chamada gtwin.lib por gtgui.lib

(*) b32.bc é o arquivo de compilação do Borland com as bibliotecas.

Quanto a GTWVW o Vagner, provavelmente fez uso dela em um sistema que implantou recenetemente e poderá te dar maiores detalhes.

O esquema é o que o rochinha falou mesmo, no ILINK32 vc tem que especificar o tipo de EXE de saida, se ele vai ser para console ou não.

No ilink32 deve estar especificado um dos dois parametros

-s = Especifica que o aplicativo depende do modo console

-aa = Especifica que o aplicativo nao depende de uma janela de console.

Se vc compilar o seu programa com a GTWIN e com o parametro -aa ele vai rodar, porem nao vai aparecer nada na janela, e o mesmo acontece se usar algum lib GUI como a WVW que é uma mistura de GT+GUI, neste caso como seu programa vai usar uma janela e se vc especificar -s ele abre a janela do console e a outra janela que é seu programa em si, então é só vc parametriza com -aa para uso com a WVW que a jenala do prompt nao será mais acionada.

Clipper escreveu: No caso eu assumo que o programa WKEYKILL está num Path visivel ou na pasta do sistema a ser executado, mas isso é o de menos, já temos a solução o resto é só imaginação.

Você conseguiu seu primeiro programa em xHarbour, mas eu ainda estou devendo, não sai nada... Mas isso é outro assunto.

Você diz que o WKEYKILL está num path visível ou na pasta do sistema. Veja bem:

O arquivo pode ser chamando pelo prompt de qualquer local, de qualquer pasta e até de outras unidades que roda sem travar.

Dentro de um .BAT é que trava, o que não faz o menor sentido. Mesmo que o .BAT esteja na mesma pasta do arquivo WKEYKILL.

Quanto à limitação do Clipper, não creio que tenha influência, pois ele trava em um .BAT que é arquivo de lote do DOS, onde o Clipper não está tendo nenhuma interferência. Creio que se resolvesse o problema de travar no próprio DOS, também não travaria no Clipper.

O que não consegui entender é porque não trava na linha de comando, de qualquer local, mas trava num .BAT...

Vou insistir e grato a todos pela colaboração.

Mesmo com meu programa ele travou ? Se travou é um fantasma pois aqui rodou perfeitamente.

O problema parace ser a máquina virtual do windows NTVDM que é executada quando você roda algum programa dentro de um BAT ou um programa DOS, existe alguma incompatibilidade entre a máquina virtual e o WINKEYKILL.

Mas você agora não precisa mais de um BAT certo ?

Até logo.

Marcelo

Olha,

Para acabar com o Iniciar, se tratando de Clipper, acho que o jeito que o Rochina descreveu seja o mehor mesmo, e antes de sair do programa volta ao normal...

Usando xHarbour, um tempo atrás precisei desabilitar o botão iniciar todo, ele fica cinza daquele jeitinho, e nem com tecla nem com mouse da pra clicar...

Aí vai a pagina onde encontrei tal informação:

http://br.geocities.com/marcosgambeta/hmg/0005.html

(O exemplo é para MiniGUI, mas funciona de qualquer maneira com xHarbour)

Na minha opnião este passa a ser o melhor método, por não necessitar de código externo, a não ser, é claro, da boa e velha Win API...

Falou!

Eu ainda não entendi porque esse post continua a crescer se a solução já foi dada e funciona.

Bom !

Nesse caso acho melhor então instruir os usuário a cada um ter uma chave de fenda fina, aí antes de entrar no sistema eles retiram as teclas e depois de sair eles colacam. Outra opção seria comprar um teclado antigo daqueles tipo IBM AT que não tinham as Winkeys, aqui em Recife tem o sucatão da informática acho que dá para arrumar uns 5 por lá, aí na hora de usar o sistema o cara bota o teclado velho com seu respesctivo adaptador para Ps/2, após sair do sistema o cara bota o teclado normal.

Ps. No caso de usar a primeira opção lembrar aos usuários pra não perder as teclas, senão vão ter que ficar enfiando a chave de fenda no buraquinho.

Opa ! Lembrei de outra solução, essa nem precisa tirar teclas nem trocar teclado.

O usuário pode utilizar o teclado numérico para escrever, ele segura a tecla ALT e vai digitando o código ASCII de cada tecla, tá certo que tem o risco do dedo escorregar para esquerda ou direita e pressionar a bendita winkey, mas nada que um superbonder não resolva. Se precisar eu imprimo aqui umas tabelas ASCII e envio, acho que com uns 2 meses eles vão ter gravado tudo de cabeça.

Ps. do Ps. Lembrar aos usuários que já que perderam as teclas para não perderem as chaves de fenda.

Mas não se preoucupem se nada funcionar, de onde veio essas ideias tem muito mais... :)Pos

Até logo.

Marcelo -:]

OK,

Eu não quis desmerecer a solução proposta por você Marcelo, apenas mostrar mais uma opção, e respondi porque era um dos tópicos do topo da lista.

Marcelo,

Sera que só durepoxi segura? ou sera que super bonder ficar melhor? num armazem perto de casa so tem tree-bond, deve ser a mesma coisa né?

Olha, eu sempre tiro a borrachinha daquela tecla maldita que hiberna o computador, que tem micro que nao adianta configura o windows, acho que se tirar a burrachinha tambem funciona.

Endereço para envio da tabela ASCII

Wagner Nunes
Rua Dom Bosco, 23
Ipanema - MG
CEP: 36.950-000

Fico no aguardo!!!!

)

Só queria lembrar uma coisinha:

só vem aqui quem tem problema ou quer ajudar.

Enquanto o problema não for resolvido satisfatoriamente, novas mensagens serão enviadas. Isso não obriga ninguém a responder.

Acho que relatei o problema bem detalhado. Sugestões como "mude de linguagem" é correta, mas não resolve no momento. Se o tópico se estende é porque a solução ainda não foi encontrada... Sugestões como arrancar a tecla é humorística mas não resolve. Por isso ainda estou tentando comandos MS-DOS x Clipper x XP...

Isso é que resolve o meu problema...

Muitíssimo grato pelas tentativas de ajuda e um 2007 melhor pra todos!

Olá amigo,

Concordo com o que disse.

Eu sei que não é a melhor solução apenas dizer "mude para tal compilador", até porque tempos atrás tivemos grandes discussões em torno de duas LIBs gráficas... ...

No entanto, o esqueminha que o Marcelo demonstrou, apesar de usar um programa auxiliar, é bem interessante, mas pode ser ainda aprimorado se unido com a dica que se encontra no link que passei. Assim ao invés de chamar o WinKeyKill antes e depois do seu sistema, você desabilita já pelo programinha auxiliar.

A diferença seria que ao invés de dois, você estaria usando apenas um programa "extra", e ainda teria o código fonte :=))

Apesar de você dizer que seu problema só se resolveria com DOS/Clipper, se houver interesse eu posso até fazer aqui numa horinha vaga e te enviar, se você for usar e não puder fazer no xharbour.

Afinal, como parece ter ficado claro, a limitação seria do próprio DOS...

Falou mano, e boa sorte...

Meu Deus !!!!

Onde foi que alguém disse para mudar de linguagem ? Quem foi que fez isso ? Me avisa para eu dar uma bronca nele.

É por isso que critico, primeiro leiam e entendam as respostas depois pode postar novamente se não solucionar. Se o problema não foi solucinado é porque não leu atentamente a resposta e não fez o que foi dito. Se fizer o que eu expliquei num post anterior e não funcionar eu me retiro deste fórum para sempre jogo pra cima os 4 anos de fórum.

Pode até dizer que não gostou da solução, mas que ela funciona, isso eu garanto que funciona. Para facilitar eu postei o executavel já pronto, analisado, projetado, compilado, linkado e tudo mais que é ado.

Por favor leia e desta vez faça o teste, se não funcionar pode vir aqui meter o pau.

O que não pode é ficar aqui consumindo banda e gastando dinheiro que não é seu, talvez muitos não saibam mas para cada post existe uma pessoa que paga, ele chama-se Paulo Cesar Toledo, não é justo que fiquemos aqui gastando só porque não pagamos.

Não devia mas...

Recapitulando :

Você não vai compilar nem linkar mais coisa alguma, nem em Clipper, nem em xHarbour, nem em qualquer outra linguagem, você apenas precisa baixar o programa EXECUTE.EXE que está no link e colocar num arquivo BAT ou no atalho do programa ou até no EXECUTAR do menu iniciar, ele irá fazer o que o START, o COMMAND e ou o CMD deveriam fazer :

EXECUTE MEUSIST
ou
EXECUTE C:\ABCDEF\MEUSIST
ou
EXECUTE C:\ESTOQUE\CTRESTOQ
ou
EXECUTE ESTOQUE
ou
EXECUTE C:\ARQUIVOS DE PROGRAMAS\SISTEMA\ABCDE.EXE

Onde : Após o EXECUTE é o nome do executável do sistema podendo usar o path completo ou apenas o nome do programa.

Ps. Coloquei junto o programa fonte apenas para facilitar caso você quizesse fazer suas próprias alterações.

Deu para entender agora ?

Para não precisar procurar, lá vai o link novamente...

http://www.sistemabr2.cjb.net/execute.zip

Fui...

Ps. A sugestão de retirar a tecla resolve sim, é chata, irritante, pouco profissional, ridícula, mas resolvbe sim, pois eu duvido o cara conseguir teclar sem ela.

Marcelo

Enviado: **03 Jan 2007 22:27**

Clipper escreveu:
O que não pode é ficar aqui consumindo banda e gastando dinheiro que não é seu, talvez muitos não saibam mas para cada post existe uma pessoa que paga, ele chama-se Paulo Cesar Toledo, não é justo que fiquemos aqui gastando só porque não pagamos.

Caro amigo Clipper (Sobrenome?)

Esse tipo de informação (custo/post) deveria ser dado no ato do cadastramento. Sou participante de inúmeros fóruns, que discutem até o sexo dos anjos, e é a primeira vez que alguém vem me falar sobre custo de postagem... Aliás essa reclamação é - desculpe o termo - ridícula e sobre ela não comento mais, pois quem disponibiliza um fórum para discussões jamais ficaria contando posts pra saber se tá ficando caro.

Segundo, acho que todos que participam de um fórum profissional como esse sabe ler. Por mais que você ache que não, todo mundo lê as respostas. E quem entende de linguagens de máquinas tem bastante facilidade de entender a linguagem humana...

Quando me refiro às "soluções" humorísticas estou pensando no cliente. Já imaginou um profissional chegar para um cliente e propor "arrancar uma tecla" como solução para um problema?

PC Toledo

Como desativar a tecla Iniciar do Windows