//Ayri bir dosya (program) nasil calistirilir?
//Herhangi bir programi calistirmak icin
ShellExecute(Handle, 'open', PChar('c:\test\Tanz_AnthroX.exe'), nil, nil, SW_SHOW);
//NOTEPAD'I calistirmak
ShellExecute(Handle, 'open', PChar('notepad'), nil, nil, SW_SHOW);
//NOTEPAD'e BeniOku.TXT dosyasini actirmak
ShellExecute(Handle, 'open', PChar('notepad'), PChar('c:\AnthroX\benioku.txt', nil, SW_SHOW);
//Web sayfasini actirmak
ShellExecute(Handle, 'open', PChar('http://www.delphiturk.com/'), nil, nil, SW_SHOW);
//Print ettirmek
ShellExecute(Handle, 'print', PChar('c:\test\readme.txt'), nil, nil, SW_SHOW);
//WINDOWS EXPLORER la dizinlere bakmak
ShellExecute(Handle, 'explore', PChar('c:\windows)', nil, nil, SW_SHOW);