Cómo evitar ventana del DOS?

Cómo evitar ventana del DOS?

Postby Armando » Thu Jun 19, 2014 3:36 pm

Hola foreros:

Desde dentro de una aplicación estoy usando el siguiente código:

Code: Select all  Expand view  RUN

WinExec("img2pdf.exe -r -1 -o " + '"' + ALLTRIM(cPdfFile) + '"' + SPACE(01) + '"' + ALLTRIM(aFiles[01]) + '"')
 


Y funciona bien, el pero es que abre una ventana de comandos DOS y se ve muy feo el "pantallazo",
alguien sabe cómo evitar que se abra la ventana de DOS?

Desde luego el .EXE es para ejecutarse desde la línea de comandos.

Saludos
SOI, s.a. de c.v.
estbucarm@gmail.com
http://www.soisa.mex.tl/
http://sqlcmd.blogspot.com/
Tel. (722) 174 44 45
Carpe diem quam minimum credula postero
User avatar
Armando
 
Posts: 3229
Joined: Fri Oct 07, 2005 8:20 pm
Location: Toluca, México

Re: Cómo evitar ventana del DOS?

Postby Manuel Valdenebro » Thu Jun 19, 2014 8:10 pm

Yo uso waitrun y/o msgrun. Aqui tienes un ejemplo:

bAction:=RTRIM(impresor->ESTACION) + "\BTPDF.bat -multi -o " + cDestino + " -quiet -out pdf -c 5 -l listaemf.txt"

TRY
MsgRun ( '...','PDF', {|oDlg1| WaitRun(bAction, 0) })
CATCH

END


Prueba si funciona.
Un saludo

Manuel
User avatar
Manuel Valdenebro
 
Posts: 706
Joined: Thu Oct 06, 2005 9:57 pm
Location: Málaga-España

Re: Cómo evitar ventana del DOS?

Postby Armando » Thu Jun 19, 2014 10:01 pm

Manuel:

E X C E L E N T E !, funciona de 100.

Gracias
SOI, s.a. de c.v.
estbucarm@gmail.com
http://www.soisa.mex.tl/
http://sqlcmd.blogspot.com/
Tel. (722) 174 44 45
Carpe diem quam minimum credula postero
User avatar
Armando
 
Posts: 3229
Joined: Fri Oct 07, 2005 8:20 pm
Location: Toluca, México

Re: Cómo evitar ventana del DOS?

Postby El Loco » Thu Jun 19, 2014 10:01 pm

Armando proba así:

WinExec("img2pdf.exe -r -1 -o " + '"' + ALLTRIM(cPdfFile) + '"' + SPACE(01) + '"' + ALLTRIM(aFiles[01]) + '"', 0 )

Abrazo.
Miguel
FWH 32/64 14.04
Harbour 3.2.0 (r1306211258)
PellesC
El Loco
 
Posts: 328
Joined: Fri May 19, 2006 4:08 pm
Location: Buenos Aires - Argentina

Re: Cómo evitar ventana del DOS?

Postby Armando » Thu Jun 19, 2014 10:10 pm

Miguel:

Gracias por el aporte, efectivamente así lo hice y funciona de 100.

Saludos
SOI, s.a. de c.v.
estbucarm@gmail.com
http://www.soisa.mex.tl/
http://sqlcmd.blogspot.com/
Tel. (722) 174 44 45
Carpe diem quam minimum credula postero
User avatar
Armando
 
Posts: 3229
Joined: Fri Oct 07, 2005 8:20 pm
Location: Toluca, México

Re: Cómo evitar ventana del DOS?

Postby AngelSalom » Fri Jun 20, 2014 3:06 pm

Disculpa la intromisión pero ¿el img2pdf.exe que utilizas convierte los ficheros WMF/EMF a PDF? y en caso afirmativo ¿se puede descargar libremente?
Angel Salom
Visionwin Software - https://www.visionwin.com
------------------------------------------------------------
fwh 19.05 - harbour 3.2 - bcc 7.4
User avatar
AngelSalom
 
Posts: 727
Joined: Fri Oct 07, 2005 7:38 am
Location: Benicarló (Castellón ) - España

Re: Cómo evitar ventana del DOS?

Postby Armando » Fri Jun 20, 2014 4:14 pm

Angel:

Efectivamente, es para convertir varios tipos de ficheros, entre otros los .EMF, a PDF, existen
dos versiones de img2pdf la versión IDE y la versión línea de comandos, esta es la que estoy
usando. No se trata de una impresora virtual !.

Es de paga $$$$, (59 USD), puedes descargar la versión de prueba desde aquí

http://www.verypdf.com/app/image-to-pdf ... index.html

Y ponerla a funcionar es más sencillo que quitarle su dinero a una borracha.

Saludos
SOI, s.a. de c.v.
estbucarm@gmail.com
http://www.soisa.mex.tl/
http://sqlcmd.blogspot.com/
Tel. (722) 174 44 45
Carpe diem quam minimum credula postero
User avatar
Armando
 
Posts: 3229
Joined: Fri Oct 07, 2005 8:20 pm
Location: Toluca, México

Re: Cómo evitar ventana del DOS?

Postby AngelSalom » Fri Jun 20, 2014 4:30 pm

Muchas gracias Armando, la chequeo ahora mismo.
Angel Salom
Visionwin Software - https://www.visionwin.com
------------------------------------------------------------
fwh 19.05 - harbour 3.2 - bcc 7.4
User avatar
AngelSalom
 
Posts: 727
Joined: Fri Oct 07, 2005 7:38 am
Location: Benicarló (Castellón ) - España

Re: Cómo evitar ventana del DOS?

Postby AngelSalom » Mon Jun 23, 2014 7:46 am

Hola Armando, estuve probando la versión demo de Image2pdf en modo consola y es realmente rápido. Lo único es que algo debo estar haciendo mal porque me convierte el EMF del preview de FW con muy poca calidad, bastante borroso. Creía que era por la versión demo pero si pruebo con archivos bmp o jpg la calidad es perfecta. ¿Alguna sugerencia?

Muchas gracias,
Angel Salom
Visionwin Software - https://www.visionwin.com
------------------------------------------------------------
fwh 19.05 - harbour 3.2 - bcc 7.4
User avatar
AngelSalom
 
Posts: 727
Joined: Fri Oct 07, 2005 7:38 am
Location: Benicarló (Castellón ) - España

Re: Cómo evitar ventana del DOS?

Postby Armando » Mon Jun 23, 2014 3:52 pm

Angel:

También hago el PDF desde la vista previa de FW y me va muy bien, tal vez se trata de las OPTIONs
que estas usando, incluso aún cuando el texto esta en diagonal lo crea bien, prueba con estas opciones

Code: Select all  Expand view  RUN

WaitRun("img2pdf.exe -r -1 -o " +;
         '"' + ALLTRIM(cPdfFile) + '"' + SPACE(01) +;
         '"' + ALLTRIM(aFiles[nVez]) + '"',0)
 


Si no te funciona, hay una opción para definir la resolución, dale una mirada al README.TXT.

Saludos
SOI, s.a. de c.v.
estbucarm@gmail.com
http://www.soisa.mex.tl/
http://sqlcmd.blogspot.com/
Tel. (722) 174 44 45
Carpe diem quam minimum credula postero
User avatar
Armando
 
Posts: 3229
Joined: Fri Oct 07, 2005 8:20 pm
Location: Toluca, México


Return to FiveWin para Harbour/xHarbour

Who is online

Users browsing this forum: No registered users and 45 guests