Форум программистов, компьютерный форум, киберфорум
Delphi для начинающих
Войти
Регистрация
Восстановить пароль
 
Рейтинг 5.00/15: Рейтинг темы: голосов - 15, средняя оценка - 5.00
5 / 5 / 4
Регистрация: 26.08.2010
Сообщений: 262
1

OpenDialog и SaveDialog

20.02.2011, 18:35. Показов 3008. Ответов 2
Метки нет (Все метки)

Здравствуйте. Имеется такой код:
Delphi
1
2
3
if SaveDialog1.Execute then
FName := SaveDialog1.FileName;
if not SaveDialog1.Execute then Exit;
При нажатии на кнопку появляется диалоговое окно которое предлагает сохранить файл. Но чтобы сохранить файл нужно нажать на кнопку "Сохранить" 2 раза. Аналогично и с "Отмена". Что бы отменить сохранение необходимо два раза нажать на кнопку "Отмена". Такая же проблема и с OpenDialog:

Delphi
1
2
3
If OpenDialog1.Execute then
FName := OpenDialog1.FileName;
if not OpenDialog1.Execute then Exit;
Если не использовать
Delphi
1
if not OpenDialog1.Execute then Exit;
то работает нормально. Но при нажатии на кнопку "Отмена" выскакивает ошибка так как естественно не выбран файл и прога не может дальше работать.
Помогите кто может!
__________________
Помощь в написании контрольных, курсовых и дипломных работ здесь
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
20.02.2011, 18:35
Ответы с готовыми решениями:

OpenDialog SaveDialog
Всем присуствующим низкий поклон и мои приветствия. Я что-то увлёкся Дельфи и самостоятельно пишу...

Opendialog и savedialog
При нажатии на спидбаттон загружается файл, я хочу что при нажатии на кнопку сохранялся файл в...

openDialog и saveDialog
В общем есть программа, она по нажании кнопки выводит исходный список студентов, и по нажатию...

Исчезает OpenDialog и SaveDialog
У меня в форме стоят OpenDialog и SaveDialog, но почему-то когда запускаю программу они исчезают....

2
2184 / 1254 / 143
Регистрация: 28.04.2010
Сообщений: 4,592
20.02.2011, 18:42 2
Цитата Сообщение от demiancz Посмотреть сообщение
Delphi
1
2
3
If OpenDialog1.Execute then 
FName := OpenDialog1.FileName; 
if not OpenDialog1.Execute then Exit;
нагородил огород, а потом удивляешься что это 2 раза срабатывает OpenDialog.
Этого будет достаточно
Delphi
1
if not OpenDialog1.Execute then Exit;
0
425 / 53 / 15
Регистрация: 31.12.2010
Сообщений: 191
20.02.2011, 20:19 3
Delphi
1
2
3
If OpenDialog1.Execute then 
FName := OpenDialog1.FileName
else  Exit;
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
20.02.2011, 20:19

SaveDialog и OpenDialog в StringGrid.
В одной программе SaveDialog в другой OpenDialog. Первая должна сохранять данные из StringGrid в...

Заменить системный OpenDialog, SaveDialog
Мне надо сделать программу для интернет салона, и как мне заменить системный openDialog,...

Работа с текстовыми файлами, компоненты OpenDialog и SaveDialog
Помогите, пожалуйста! Нужно написать программу: Задача: Сформировать список лиц, записавшихся...

Считать двумерный массив из текстового файла с использованием компонент OpenDialog и Savedialog
Необходимо размерность массива и сам массив считать из текстового файла.При открытии и сохранении...

OpenDialog or SaveDialog
Никак не разберусь с Open и Save диалогами. В папке, куда установлена программа, имеется файл bdf...

OpenDialog и SaveDialog
Как сохранить и открыть программу через OpenDialog и SaveDialog. Подскажите пожалуйста код...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2022, CyberForum.ru