|
Вопрос # 5 899/ вопрос решён / |
|
Здравствуйте, подскажите как удалить файл, другие удаляются а этот не хочет (:
вот код:
procedure TMac.FormDestroy(Sender: TObject);
begin
if gin = true then begin
Agent1.Characters.Unload('MyAgent');
SysUtils.DeleteFile('Mac.avi'); // Удаляем временное avi
//SysUtils.DeleteFile(Put.Caption); // Удаляем временного агента
//if FileExists(Put.Caption) then SysUtils.DeleteFile(Put.Caption); // Удаляем временного агента
end;
видео удаляется а вот файл агента нет ((
 |
Вопрос задал: casio (статус: Посетитель)
Вопрос отправлен: 19 января 2012, 22:03
Состояние вопроса: решён, ответов: 0.
|
Мини-форум вопроса
Всего сообщений: 10; последнее сообщение — 9 февраля 2012, 17:04; участников в обсуждении: 5.
|
casio (статус: Посетитель), 19 января 2012, 22:22 [#1]:
должно удалятся по нажатию по Esc
procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);
begin
if Key = VK_ESCAPE then
begin
Application.Terminated;
end;
end;
|
|
Ерёмин А.А. (статус: *Администратор), 19 января 2012, 23:00 [#2]:
Может он просто используется какой-то запущенной программой?
|
19 января 2012, 23:02: Вопрос перемещён из тематического раздела Delphi » Общие вопросы по программированию в раздел Delphi » Работа с файловой системой модератором Ерёмин А.А.
|
casio (статус: Посетитель), 19 января 2012, 23:23 [#3]:
Ерёмин А.А.: ага видно что используется уже протестировал на кнопке с начало выгрузил,а потом удалил. Но по идеи он же должен выгружаться сам в коде?
procedure TMac.FormDestroy(Sender: TObject);
begin
Agent1.Characters.Unload('MyAgent');
end;
|
|
Ерёмин А.А. (статус: *Администратор), 19 января 2012, 23:45 [#4]:
По идее должен. Unload точно вызывается перед DeleteFile?
|
|
casio (статус: Посетитель), 20 января 2012, 00:21 [#5]:
Ерёмин А.А.: ну вроде, я нажимаю Esc вызавается Close, а в FormDestroy идет Agent1.Characters.Unload('MyAgent') - выгрузить а потом удалить - SysUtils.DeleteFile('Merlin.acs');
но что то не работает
|
|
Ерёмин А.А. (статус: *Администратор), 20 января 2012, 11:27 [#6]:
Попробуйте сделать тоже самое на кнопке — мало ли, что там в момент OnDestroy творится.
|
|
Мережников Андрей (статус: Абитуриент), 21 января 2012, 07:38 [#7]:
может просто не успевает выгружаться до удаления?
|
|
bugmenot (статус: 3-ий класс), 21 января 2012, 13:49 [#8]:
А зачем их вообще каждый раз удалять?
виконання програми розпочинається з того самого мiсця, де призупинилося.
|
|
Эхо Унитазного Бачка (статус: 1-ый класс), 9 февраля 2012, 01:35 [#9]:
SysUtils.DeleteFile('полный путь');
Если не удаляется, значит нет прав на удаление файла на уровне файловой системы.
Если файл типизированный, то скорее всего вы не закрыли файл, это обязательно нужно делать после завершения операций с оным методом System.СloseFile(переменная);
|
9 февраля 2012, 17:04: Статус вопроса изменён на решённый (изменил автор вопроса — casio)
Чтобы оставлять сообщения в мини-форумах, Вы должны авторизироваться на сайте.
|