sashaoli, можно и так. Но есть несколько замечаний:
1. А не пробовал обработать несколько файлов подряд (чистить надо StrCat)
или
2.отказаться от выбора имени файла для сохранения.
Нажал ты в SDialog "Отменить". Ну и что ?
(SDialog не на том месте)
или
3. Pos не нашёл "shdr". Зачем тогда Copy, Delete, SaveToFile и иже с ними?

[flood][/flood]
По хорошему должно быть так: И утверждение ложное по тем же причинам - нарушен порядок действий программы.
А его Hub сразу после кнопки Пуск - вообще полный писец.
Бумага, резинка и карандаш.