Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Запустить программу с флехи и флеху отключить

Страницы: < 1 2
AngelXXX © (2007-12-11 20:04:00)
Я понимаю что нужно скопировать прогу на диск а потом ее запустить, и отключить флеху...
Но после всех монипуляций... этого ни как не выходит....

s1:= ParamStr(0);
s4:= ExtractFileDrive(s1);
ShowMessage(s1);
ShowMessage(s4);
integer(LogDrives) := GetLogicalDrives;
for i := 0 to 2 do
if (i in LogDrives) then
s2:= chr(i + 65);
ShowMessage(s2);
s3:= s2 + ':\' + ExtractFileName(ParamStr(0));

CopyFile(PChar(s1), PChar(s3), True); // копируем

s3:= s3 + ' ' +s4;

ShowMessage(s3);
WinExec(PChar(s3), SW_SHOW); // Запускаем копию
//пармаетром из s4
CloseHandle(Application.Handle);

AngelXXX (2007-12-11 21:04:00) [21]
Алгоритм такой..
1. запускаем приложение
2. если есть параметры то пускаем приложение в обычном режиме
3. если пораметров нет то копируем прогу на диск и запускаем ее с параметрами

так вот когда она пускаеться уже с диска... то попрежнему флеха заблокированна для отключения...

? как обойти ума не приложу... нужно просто запустить приложение а флеху отключить...

походу где та храниться ссылка на запущенное приложение но где... и как ее рубануть

tesseract (2007-12-11 20:40:00) [22]
А что именно не выходит ? WinExec вроде как со времен win98 не рекомендован к использованию. Да и ты уверен, что права на запись у рользователя есть?

Страницы: < 1 2

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »