Путь к файлам

← →
Shved (2004-10-11 20:55) [0]

Вопрос следующий. Делаю презентацию на CD. Помимо прочего, в ней используется довольно громоздкий видео-файл AVI (250 Mb). Как сформулировать MediaPleyer"у путь к этому файлу? Ведь этот диск будут смотреть на разнообразных компьютерах, и номера дисков будут разными.
Создание инсталляционного файла не подходит - презентация должна запускаться автораном. Упаковка в файл ресурсов тоже не целесообразна - видео файл нужно использовать и отдельно от самой презентации.

← →
begin...end © (2004-10-11 20:57) [1]

Т.е. ты не знаешь, какая буква диска будет у CD-ROM"а, что ли?

← →
Shved (2004-10-11 20:57) [2]

Да.

← →
begin...end © (2004-10-11 21:01) [3]

function GetCDROMDrives: String;
var
Ch: Char;
begin
for Ch := "A" to "Z" do
if GetDriveType(PChar(Ch + ":\")) = DRIVE_CDROM then
Result := Result + Ch;
end;

Результатом этой функции будет строка, составленная из букв CD-приводов.
Если он один - хорошо, если приводов несколько - тогда не знаю.

Или, может быть, всё намного проще - если твоя программа будет запускаться с CD, то можно же и просто узнать текущую букву диска?

← →
Palladin © (2004-10-11 21:02) [4]

запускатся твоя презентация откуда будет?

← →
Shved (2004-10-11 21:02) [5]

Последнее лучше. А чем и как это сделать?

← →
Shved (2004-10-11 21:03) [6]

Запускаться сразу с диска.

← →
Palladin © (2004-10-11 21:03) [7]

скопировать два символа из ParamStr(0)

← →
begin...end © (2004-10-11 21:06) [8]

См. [7], а в общем-то, это может даже и не понадобиться, поскольку ты сможешь обращаться к файлу без полного пути.

← →
Palladin © (2004-10-11 21:08) [9]

и то верно

← →
Shved (2004-10-11 21:11) [10]

Так что-то ругается, если не полное имя пишу. Поэтому и вопрос такой встал.

ParamStr(0)[1] - это и будет буква диска, с которого запущена программа. Хоть CD-ROM, хоть винт, хоть что угодно.

Еще можно использовать относительный путь (относительно каталога самого Exe). Тогда диск вообще неважен.

значит не то пишешь...
относительный путь можно адресовать двумя способами...
относительно корневого каталога, начиная с "\" и относительно текущего каталога... а как пишешь ты?

← →
Shved (2004-10-11 21:18) [13]

Блин, простите чайника! :)
Модуль проекта сохранил в другую папку, а потом и сам забыл. Поэтому и ругалось.

Путь к файлам Найти похожие ветки