Help to windows cmd.

[nocuttree]

Hello all, I am using this code

Code: [Select]

if ShellExecute(0,nil, PChar('cmd'),PChar('/c mybatch.bat'),nil,1) =0 then;
to run a bacth file. I want to hide this windows cmd and have a command to wait this windows cmd close.
Thanks to all!

[Mike.Cornflake]

I don't think you can wait with ShellExecute.  I think it fires off the command and immediately returns to code, letting the command run in another process.

You can TProcess.  It's cross platform and the preferred method

http://wiki.lazarus.freepascal.org/Executing_External_Programs

Just ensure you have poWaitOnExit in the options.  Err, and there's another po for Hide - ahh, poNoConsole...

Extending the Simple Example in the wiki change this line...

Code: [Select]

AProcess.Options := AProcess.Options + [poWaitOnExit, poNoConsole];

[nocuttree]

I don't think you can wait with ShellExecute.  I think it fires off the command and immediately returns to code, letting the command run in another process.

You can TProcess.  It's cross platform and the preferred method

http://wiki.lazarus.freepascal.org/Executing_External_Programs

Just ensure you have poWaitOnExit in the options.  Err, and there's another po for Hide - ahh, poNoConsole...

Extending the Simple Example in the wiki change this line...

Code: [Select]

AProcess.Options := AProcess.Options + [poWaitOnExit, poNoConsole];

Thanks you!