Создать файл AutoRun.inf с таким содержанием
Код:
[AutoRun]open=Project1.exe
icon=Project1.exe,0
где Project1.exe откомпилированный проект, и разместить эго вместе с Project1.exe в корень диска который необходимо прожечь.
Autorun.exe
В самой проге используем относительные пути к именам файлов программ на запуск, например на запуск будет осуществлять так ShellExecute(0,'open','Папка_программы_на_диске\\Программы.ехе',nil,nil,SW_SHOW);
где 'Папка_программы_на_диске' - папка лежащая в корне диска, а 'Программы.ехе' файл на запуск, который находится в ней.
P.S.
Правильно пишем
Delphi