Did you check all of the Properties settings? I can't check now, but there may be a Windows Property to keep the cmd window hidden.
- Phil
Thanks Phil:
Yes there is API way to do it.
Emilio
Quote from: Phil Harvey on September 19, 2010, 03:50:56 PM
Did you check all of the Properties settings? I can't check now, but there may be a Windows Property to keep the cmd window hidden.
- Phil
Some more details may be useful in case people may want to do this.
- Phil
Phil:
I should have state it better...
I can do it using this function that works with dBASE PLUS
which is the program I use to do the aplication.
Still I feel all this hidding in DOS is very complicated
It should be a RUN/invisible exiftool ;)
I am putting the function here, it might give a idea.
Emilio [evilaro]
function RunHidden(cDOScommands,cBatchfile)
// Example: RunHidden("copy test1.txt LPT1"+chr(13)+chr(10)+"copy test2.txt LPT1")
*/
#define SW_HIDE 0
local nCommands, cType, nMessage
if((argCount()<2).or.(empty(cBatchfile)))
cBatchfile = "Junk.bat"
endif
//
// Find the number of commands to enter in the batch file ......................
cType = type("Argvector(1)")
if(cType = "A")
nCommands = ALEN(cDOScommands,1)
elseif(cType = "C")
if(empty(cDOScommands))
nMessage=msgbox("Empty Command. Operation Abandoned.","Alert",0+16)
return
endif
nCommands = 1
else
nMessage=msgbox("False Command format. Operation Abandoned.","Alert",0+16)
return
endif
// Pass commands in the batch file .............................................
nH = fcreate(cBatchfile)
for i=1 TO nCommands
if (cType="A")
if (not empty(cDOScommands
))
fputs(nH,cDOScommands)
endif
elseif(cType="C")
fputs(nH,cDOScommands)
endif
endfor
fclose(nH)
if (type("WinExec") # "FP")
extern CWORD WinExec(CSTRING, CUINT) Kernel32
endIf
WinExec(cBatchfile+Chr(0), SW_HIDE)
return
// -- eof: RunHidden()
Quote from: Phil Harvey on September 20, 2010, 11:17:27 AM
Some more details may be useful in case people may want to do this.
- Phil