[fpc-pascal] If ShellExecute(0, 'open', PChar(ExecuteName), '', '', 0) <= 32 Then

["Vinzent Höfler"]

-------- Original-Nachricht --------
> Datum: Mon, 26 Jan 2009 17:42:23 -0600
> Von: "vmars" <vmars at rgv.rr.com>
> An: fpc-pascal at lists.freepascal.org
> Betreff: [fpc-pascal] If ShellExecute(0, \'open\', PChar(ExecuteName), \'\', \'\',	0)  <= 32 Then

> Thanks in advance!
> 
> [Any ideas why this works:
>   ExecuteName := (AppPathExe + 'Del2Pas.bat.lnk');
>   ExecuteShell;   ]
> 
> 
> [But this doesn't work:
>   ExecuteName := (AppPathExe + 'Del2Pas.bat');
>   ExecuteShell;
> And doesn't give an error msg.]

Just trying an educated guess here, but I suppose .bat-files can only be executed via command.com (cmd.exe). Something like "%COMSPEC% /c Del2Pas.bat" could do the trick.


Vinzent.

-- 
Psssst! Schon vom neuen GMX MultiMessenger gehört? Der kann`s mit allen: http://www.gmx.net/de/go/multimessenger