Olá pessoal,
Toda vez que vou chamar um programa externo com o comando RUN meu sistema abre outra janela prá executar o comando, mesmo que não precise mostrar nada, como faço prá essa janela não aparecer, meu sistema é em xHarbour modo CONSOLE.
Obrigado
Fernando
Comando Run no modo console
Moderador: Moderadores
-
lfernandolopes
- Usuário Nível 1

- Mensagens: 9
- Registrado em: 03 Dez 2006 09:06
- Localização: São Bernardo do Campo-SP
- Contato:
- vagucs
- Membro Master

- Mensagens: 1480
- Registrado em: 10 Jul 2004 10:45
- Localização: Ipanema - MG
- Contato:
mas vc está usando em modo console mesmo? com a GTWIN? pois se está usando a WVT ou WVW isto acontece mesmo porque estas libs nao sao para modo console.
Veja na WATH32.LIB tem uma rotina acho que é WINEXEC que executa um comando e vc pode passar um parametro para a janela nao aparecer, ele executa minimizado e nao atrapalha seu sistema, é na WATH32 ou na MINIGUI não tenho certeza.
Veja na WATH32.LIB tem uma rotina acho que é WINEXEC que executa um comando e vc pode passar um parametro para a janela nao aparecer, ele executa minimizado e nao atrapalha seu sistema, é na WATH32 ou na MINIGUI não tenho certeza.
Usa essa função, é ótima:
Só acho que no win98 não funciona, só no XP.
Janio
Código: Selecionar todos
function MYRUN( cComando )
**************
local oShell, RET
oShell := CreateObject( "WScript.Shell" )
RET := oShell:Run( "%comspec% /c " + cComando, 0, .T. )
oShell := NIL
return iif( RET = 0, .T., .F. )
Janio
fui...
e-mail:janioaguiar@yahoo.com.br
msn: janio_aguiar@hotmail.com
xHarbour1.2.1/Harbour3.2 + wvg + hwgui + Mediator + MySql
e-mail:janioaguiar@yahoo.com.br
msn: janio_aguiar@hotmail.com
xHarbour1.2.1/Harbour3.2 + wvg + hwgui + Mediator + MySql

