procedure ShellExecute(aFileName: string)
procedure openFiles; begin ShellExecute('WINWORD.EXE c:\test.doc'); ShellExecute('c:\temp\test.bat'); end;