Página 1 de 1

Winexec ShellExecute Run __Run ??

Enviado: 28 Jul 2005 15:11
por Dudu_XBase
To tentando chamar um programa externo mas naum vai...to usando xharbour + gtwvt....
Qdo chamo ele pelo run ele carrega um prompt do Dos junto...
Tentei usar o Winexec e o ShellExecute e naum vai tb...
Alguém conhece outro jeito ??

Enviado: 30 Jul 2005 00:38
por Stanis Luksys
Puxa!!!!

Entrei aqui no forum só pra fazer exatamente a mesma pergunta agora!!!!!!!

:-o

Enviado: 31 Jul 2005 19:08
por Stanis Luksys
Olá Dudu,

Depois de longas horas horas de pesquisa, encontrei a solução, e olha que nem abre a tela preta do prompt... hehehe

entra neste link ae que tem muuuita dica boa pra miniGUI...

http://dicasprog.codigolivre.org.br/hmg/0012.php

para rodar programa externo como a calculadora do Windows (no exemplo) basta usar:

EXECUTE FILE "calc.exe"

muito simples não??

Enviado: 31 Jul 2005 19:12
por Stanis Luksys
Aliás acho que este comando é do Harbour mesmo, apesar de não constar na documentção, e não da miniGUI...

Enviado: 01 Ago 2005 10:57
por Dudu_XBase
Vlw Stanis e tb achei outra solução.
Abaixo o código da função q estou utilizando agora para executar programas externos.

Código: Selecionar todos

 Function xhbrun(ccommand)
 LOCAL hIn, hOut, hErr
 LOCAL cData, hProc, nLen
 Local nRet
 hProc := HB_OpenProcess( cCommand , @hIn, @hOut, @hOut )
 nRet :=  HB_ProcessValue( hProc )

   FClose( hProc )
   FClose( hIn )
   FClose( hOut )
   FClose( hErr )
  return nRet