Скачать: CL | DM;

try except   Найти похожие ветки 

← →
Pavlov ©   (2009-06-03 16:36) [0]

Открываю файл Excel. Хочу сделать так, чтобы выдавалось сообщение, если этого файла нет. Делаю так, но выскакивает ошибка. Что я делаю не правильно?
begin
 try
 path:=ExtractFilePath(Edit1.Text)+"ууу.xls";
 Excel := CreateOleObject("Excel.Application");
 Excel.Workbooks.Open[path, 0, True];
 except
   ShowMessage("Файл не найден");
 end;

---

← →
Собачка Павлова   (2009-06-03 16:38) [1]

F1 FileExists()

---

← →
Медвежонок Пятачок ©   (2009-06-03 16:38) [2]

все верно делаешь.
хочешь сообщения и оно появляется

---

← →
Dennis I. Komarov ©   (2009-06-03 16:39) [3]

FileExists?

> Что я делаю не правильно?

Наверное ловишь не там exception

---

← →
Плохиш ©   (2009-06-03 16:39) [4]

> Что я делаю не правильно?

1. Не нажимаешь кнопку "Run/Continue".
2. Запускаешь программу из среды.
3. Не отключил в настройках "останавливать выполнение при ошибках".

---

← →
Dennis I. Komarov ©   (2009-06-03 16:42) [5]

Сдается мне что DisplayAlerts поможет ;)

---

← →
Медвежонок Пятачок ©   (2009-06-03 16:47) [6]

Хочу сделать так, чтобы выдавалось сообщение, если этого файла нет. Делаю так, но выскакивает ошибка

по моему что хотел, то и получил.

причем не только если файла нет (как будто если он есть, то все обязательно сростется)

---

← →
int64   (2009-06-03 17:30) [7]

А если "Excel не установлен? - "файл не найден"
Как минимум нужно три обработчика.

---

← →
Anatoly Podgoretsky ©   (2009-06-03 19:21) [8]

>    ShowMessage("Файл не найден");

Это реально круто!

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.009 c