Página 1 de 1

tela preta - prompt dos dos...

Enviado: 01 Set 2008 11:12
por FARLEY RIBEIRO
pessoal,

gero alguma etiqueta para impressora zebra e no final imprimo através do comando COPY. só que toda vez aparece a tela preta do prompt do DOS.

Código: Selecionar todos


// AQUI ESTA O MEU PROBLEMA...

run copy /b temp.txt prn >null

// JÁ TENTEI TAMBÉM...

cPorta:= "LPT1"
cFileTxt := "temp.txt"
WAITRUN("COMMAND.COM /C COPY /B " + cFileTxt + " " + cPorta, 0 )

Por acaso, alguém tem alguma solução definitiva para esse problema?

Aguardo sugestões.

Atenciosamente

Farley

Re: tela preta - prompt dos dos...

Enviado: 01 Set 2008 11:14
por Maligno
O problema se repete quando executado em outra máquina, com hardware diferente do desta?

Re: tela preta - prompt dos dos...

Enviado: 01 Set 2008 13:53
por FARLEY RIBEIRO
Sim acontece em qq máquina. O problema todo é pq estou usando o comando RUN e por isso aparece a tela preta do prompt.

Disseram que o harbour tem o comando COPY FILE <origem> to <destino>...

Eu tentei assim e não deu certo.

worigem = "temp.txt"
wdestino = "LPT1"
COPY FILE &worigem to &wdestino

Alguma dica????

Atenciosamente

Farley

Re: tela preta - prompt dos dos...

Enviado: 01 Set 2008 14:12
por FARLEY RIBEIRO
Perfeito, no caso do comando COPY o problema foi resolvido!

Utilizei o comando abaixo:

COPY FILE temp.txt to LPT1

Aproveitando o bonde.. como faço para executar programas externo sem exibir a tela preta...
Será que teria que criar um bat para executar outros comandos?

run <aplicativo.exe>

grato

farley

Re: tela preta - prompt dos dos...

Enviado: 01 Set 2008 19:12
por sygecom
Olá Farley,
Pode usar o exemplo abaixo para chamar programas externo:

MYRUN(aplicativo.exe)

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. )

Re: tela preta - prompt dos dos...

Enviado: 06 Set 2008 20:26
por rochinha
Amiguinhos,

Se voce mudar o segundo parametro de WaitRUN( ..., 0 ) para WaitRUN( ..., 7 ) resolve.

Re: tela preta - prompt dos dos...

Enviado: 07 Set 2008 08:23
por Toledo
Veja abaixo todos os valores para o segundo parâmetro da função WAITRUN():

0 - Esconde a janela e passa a ativação para outra janela.
1 - Ativa e exibe uma janela. Se a janela é minimizada ou maximizada, Windows restaura para o seu tamanho e posição original (o mesmo que 9).
2 - Ativa uma janela e exibe como um ícone.
3 - Ativa uma janela e exibe como uma janela maximizada.
4 - Exibe uma janela em seu mais recente tamanho e posição. A janela que está atualmente ativa permanece ativa.
5 - Ativa uma janela e mostra na sua atual dimensão e localização.
6 - Minimiza a janela especificada e ativa a janela de nível superior dentro da lista do sistema.
7 - Exibe uma janela como um ícone. A janela que está atualmente ativa permanece ativa.
8 - Exibe uma janela, no seu estado atual. A janela que está atualmente ativa permanece ativa.
9 - Ativa e exibe uma janela. Se a janela é minimizada ou maximizada, Windows restaura para o seu tamanho e posição original (o mesmo que 1).

Abraços,

Re: tela preta - prompt dos dos...

Enviado: 20 Abr 2009 19:26
por clodoaldomonteiro
Olá pessoal!

Qual a biblioteca que encontro a função waitRUN()?

Re: tela preta - prompt dos dos...

Enviado: 21 Abr 2009 00:19
por sygecom
Faz parte da FIVEWIN

Re: tela preta - prompt dos dos...

Enviado: 14 Mai 2009 23:18
por Itamar M. Lins Jr.
Faz parte da FIVEWIN
É , bem, como aqui é fivewin, tudo bem, mas podemos encontrar em outras libs e até no harbour console.

Saudações,
Itamar M. Lins Jr.

Re: tela preta - prompt dos dos... (resolvido)

Enviado: 20 Jul 2009 18:48
por FARLEY RIBEIRO
A dica do Rochinha foi batata!!!! mudar o segundo parâmetro para 7.

Muito grato mesmo.

Veja...

xComando := "copy /b temp.txt prn > NUL"
WaitRun( xCOMANDO, 7 )

Atenciosamente...

Farley Ribeiro