Имя пользователя:
Пароль:  
Помощь | Регистрация | Забыли пароль?  

Показать сообщение отдельно

Ветеран


Сообщения: 27449
Благодарности: 8088

Профиль | Отправить PM | Цитировать


YooJoo, примерно так (NB! — для предыдущей версии):
Код: Выделить весь код
----------------------------------------------------
function fnFound(sFileName)
    return false;
end 
----------------------------------------------------

----------------------------------------------------
sAppName = "MyApp.exe";

if (Drive.GetType(_SourceDrive) == DRIVE_CDROM) then
	tPath2MyApp = File.Find(_SourceDrive, sAppName, true, false, nil, fnFound);
	
	if (tPath2MyApp) then
		File.Run(tPath2MyApp[1]);
	else
		Dialog.Message("Not found", "Not found " .. sAppName .. " on " .. _SourceDrive);
	end
else
	Dialog.Message("Current drive is not a CD/DVD", _SourceDrive .. " is not a CD/DVD");
end
P.S. Если должно работать не только с CD/DVD — уберите внешний блок «if (Drive.GetType(_SourceDrive)…».

Отправлено: 07:14, 11-02-2010 | #9