Показать сообщение отдельно
  #2  
Старый 10.02.2008, 12:53
Аватар для AMD
AMD AMD вне форума
Прохожий
 
Регистрация: 10.02.2008
Сообщения: 2
Репутация: 10
По умолчанию

Цитата:
Сообщение от Merch7
Вот код, по которому я переименовываю файл и сопоставленную ему картинку(.png). Работает почему-то только с маленькими картинками, если отключить try, то выпадет сообщение об ошибке - файл картинки, дескать, занят дугим процесом, каким - неизветно. Проверял картинку через Unlocker - не блокируется. В чем дело? Другие картинки не мешают
Код:
procedure MainForm.OKRename_Click(sender: System.Object; e: System.EventArgs);
var sw1, sw2: FileInfo;
begin
try
  sw1:=FileInfo.Create(CurrentDir+'\'+OldName.Text);
  sw1.MoveTo(CurrentDir+'\'+NewName.Text);
if fileExists(CurrentDir+'\Screenshots\'+ChangeFileExt(OldName.Text,'png')) then begin
  sw2:=FileInfo.Create(CurrentDir+'\Screenshots\'+ChangeFileExt(OldName.Text,'png'));
  sw2.MoveTo(CurrentDir+'\Screenshots\'+ChangeFileExt(NewName.Text,'png'));

  end;
  end;
except
end;
RenameBox.Hide;
end;
Используй теги!!!!

Видимо это глюк
Ответить с цитированием