Função WaitRUN para Harbour

Projeto [x]Harbour - Compilador de código aberto compatível com o Clipper.

Moderador: Moderadores

microvolution
Usuário Nível 5
Usuário Nível 5
Mensagens: 1231
Registrado em: 02 Set 2011 22:17
Contato:

Função WaitRUN para Harbour

Mensagem por microvolution »

Olá pessoal boa noite!
Não sei se tem alguém aqui nesse tópico pois já se passaram 3 anos após o último comentário.
Bom, meu problema é semelhante e, para não duplicar o mesmo assunto, o que preciso está neste tópico aqui:
https://pctoledo.org/forum/viewto ... 56#p100856

Aí pesquisando me deparei com este tópico aqui "FUNÇÃO WAITRUN para harbour"... bom eu uso o harbour mas é através da HMG 3.0.35.
Aí fui experimentar o MYRUN() mas aparece a seguinte mensagem de erro ao compilar:
"undefined reference to MYRUN". ou no arquivo ERROR "undefined reference to HB_FUN_MYRUN"
já acrescentei o "#include 'hbcompat.ch'" mas nada adiantou.
Também já tentei usar o HB_RUN mas deu as mensagens de erro que estão no outro fórum.

Bom, se puderem me ajudar, por favor leiam o fórum que passei o link acima.
Vlw!
Grato,
MICROVOLUTION - 16 anos Evoluindo Com Você!


Você já leu a Bíblia hoje?
João 3:16 - Porque Deus amou ao mundo de tal maneira que deu seu Único Filho para que todo aquele que nEle crê não pereça mas tenha a Vida Eterna!
Avatar do usuário
rochinha
Administrador
Administrador
Mensagens: 4664
Registrado em: 18 Ago 2003 20:43
Localização: São Paulo - Brasil
Contato:

Função WaitRUN para Harbour

Mensagem por rochinha »

Amiguinhos,

microvolution,
A função MyRun() é invenção do povo aqui, não é padrão do Harbour ou qualquer outro.

As funções Myblablabla, são melhorias específicas quando a função verdadeira não retorna aquele MAIS que queremos e ai inventamos uma similar e acrescentamos o que queremos e pronto temos a função MyFuncaoQueFazOQueEuQuero().

Veja a partir deste post e terás a resposta.
OPS! LINK QUEBRADO? Veja ESTE TOPICO antes e caso não encontre ENVIE seu email com link do tópico para [url=mailto://fivolution@hotmail.com]fivolution@hotmail.com[/url]. Agradecido.

@braços : ? )

A justiça divina tarda mas não falha, enquanto que a justiça dos homens falha porque tarda.
microvolution
Usuário Nível 5
Usuário Nível 5
Mensagens: 1231
Registrado em: 02 Set 2011 22:17
Contato:

Função WaitRUN para Harbour

Mensagem por microvolution »

bacana Rochinha...
bom, o Toledo me passou uma ideia mais correta do HB_RUN e estou testando...
Eu usava até no windows xp (32 ou 64 bit) o RUN TYPE arquivo.prn > prn...
acontece que no Windows 7, o arquivo é criado normalmente pelo SET PRINT TO ARQUIVO.PRN, mas o RUN TYPE e em seguida o RUN DEL não funcionam.

Agora, no windows 10, percebo que nem o SET PRINT TO ARQUIVO.PRN quanto o RUN TYPE/DEL funcionam...
daí que vi esse tópico relacional. Bom, o HB_RUN ou o MYRUN já estão funcionando e dando mensagem de erro que o ARQUIVO.PRN não existe.

Você sabe me dizer por que ele não está sendo criado?
Grato,
MICROVOLUTION - 16 anos Evoluindo Com Você!


Você já leu a Bíblia hoje?
João 3:16 - Porque Deus amou ao mundo de tal maneira que deu seu Único Filho para que todo aquele que nEle crê não pereça mas tenha a Vida Eterna!
Avatar do usuário
rochinha
Administrador
Administrador
Mensagens: 4664
Registrado em: 18 Ago 2003 20:43
Localização: São Paulo - Brasil
Contato:

Função WaitRUN para Harbour

Mensagem por rochinha »

Amiguinhos,

Também tive problemas assim relacionados às frescuras de proteção que o Windows tem, tipo, só funciona quando voce roda via Administrador.

Veja minha dica para RunAsAdmin.prg: Rodando o Prompt do DOS como Administrador.

Com ela você abre o prompt e executa comandos de forma que eles não sejam impedidos pelo S.O.

Esta função suprime a ShellExecute original do Harbour, sugiro alterar seu nome para ShellExecuteAdmin. Os parâmetros são os mesmo da ShellExecute.

Ao invés de usar os comandos RUN BLABLABLA, tente usar as funções de baixo nivel fCreate(), fErase(), __CopyFile(), etc.
OPS! LINK QUEBRADO? Veja ESTE TOPICO antes e caso não encontre ENVIE seu email com link do tópico para [url=mailto://fivolution@hotmail.com]fivolution@hotmail.com[/url]. Agradecido.

@braços : ? )

A justiça divina tarda mas não falha, enquanto que a justiça dos homens falha porque tarda.
Avatar do usuário
JoséQuintas
Administrador
Administrador
Mensagens: 20267
Registrado em: 26 Fev 2007 11:59
Localização: São Paulo-SP

Função WaitRUN para Harbour

Mensagem por JoséQuintas »

Em alguns casos aonde preciso disso, de esperar execução, uso o bom e velho RUN.

Código: Selecionar todos

RUN "NOTEPAD.EXE"
Só volta ao programa depois que fechar o bloco de notas.
José M. C. Quintas
Harbour 3.2, mingw, gtwvg mt, fivewin 25.04, multithread, dbfcdx, MySQL, ADOClass, PDFClass, SefazClass, (hwgui mt), (hmg3), (hmg extended), (oohg), PNotepad, ASP, stored procedure, stored function, Linux (Flagship/harbour 3.2)
"The world is full of kings and queens, who blind our eyes and steal our dreams Its Heaven and Hell"

https://github.com/JoseQuintas/
microvolution
Usuário Nível 5
Usuário Nível 5
Mensagens: 1231
Registrado em: 02 Set 2011 22:17
Contato:

Função WaitRUN para Harbour

Mensagem por microvolution »

xiiii complicou mais ainda!
Grato,
MICROVOLUTION - 16 anos Evoluindo Com Você!


Você já leu a Bíblia hoje?
João 3:16 - Porque Deus amou ao mundo de tal maneira que deu seu Único Filho para que todo aquele que nEle crê não pereça mas tenha a Vida Eterna!
Avatar do usuário
JoséQuintas
Administrador
Administrador
Mensagens: 20267
Registrado em: 26 Fev 2007 11:59
Localização: São Paulo-SP

Função WaitRUN para Harbour

Mensagem por JoséQuintas »

Pera aí, não li direito sua mensagem anterior.
Agora, no windows 10, percebo que nem o SET PRINT TO ARQUIVO.PRN quanto o RUN TYPE/DEL funcionam...
daí que vi esse tópico relacional. Bom, o HB_RUN ou o MYRUN já estão funcionando e dando mensagem de erro que o ARQUIVO.PRN não existe.
Ainda tenho opção de saída pra matricial.
Nesse caso uso um PREVIEW.
Ao sair do preview, apaga o(s) temporário(s).
O preview é em Harbour mesmo, vém desde os tempos do Clipper.
Ao sair do preview, não tem erro apagar os temporários.

Qualquer dia altero o preview Harbour pra multithread, assim fica em janela separada, apesar do pouco uso.
José M. C. Quintas
Harbour 3.2, mingw, gtwvg mt, fivewin 25.04, multithread, dbfcdx, MySQL, ADOClass, PDFClass, SefazClass, (hwgui mt), (hmg3), (hmg extended), (oohg), PNotepad, ASP, stored procedure, stored function, Linux (Flagship/harbour 3.2)
"The world is full of kings and queens, who blind our eyes and steal our dreams Its Heaven and Hell"

https://github.com/JoseQuintas/
Avatar do usuário
asimoes
Colaborador
Colaborador
Mensagens: 4919
Registrado em: 26 Abr 2007 16:48
Localização: RIO DE JANEIRO-RJ

Função WaitRUN para Harbour

Mensagem por asimoes »

temos 2 tópicos tratando do mesmo assunto?

https://pctoledo.org/forum/viewto ... f=4&t=9698
►Harbour 3.x | Minigui xx-x | HwGui◄
Pense nas possibilidades abstraia as dificuldades.
Não corrigir nossas falhas é o mesmo que cometer novos erros.
A imaginação é mais importante que o conhecimento. (Albert Einstein)
Responder