Модераторы: Poseidon, Snowy, bems, MetalFan
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> try, except ??? 
:(
    Опции темы
ne0n
Дата 4.11.2005, 17:07 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


PlayBoy
**


Профиль
Группа: Участник
Сообщений: 733
Регистрация: 5.8.2005
Где: Н.Новгород

Репутация: 1
Всего: 11



Здрасте!!!
Вот решил в своей программе сделать исключительную ситуацию, но чето ни фига вышлоsmile
у меня есть процедура которая удаляет файл, если файл запушен а прога пытается его
удалить то возникает ошибка! Вот как я делал:
...
try
wipeFile(filename);
except
Show Message('Обломчик вышел');
end;
...
PM MAIL ICQ   Вверх
Snowy
Дата 4.11.2005, 17:17 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Модератор
Сообщений: 11363
Регистрация: 13.10.2004
Где: Питер

Репутация: 192
Всего: 484



Запусти ехешник без дельфи.
PM MAIL   Вверх
_hunter
Дата 4.11.2005, 17:21 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Участник Клуба
Сообщений: 8564
Регистрация: 24.6.2003
Где: Europe::Ukraine:: Kiev

Репутация: 15
Всего: 98



или Internal Debugging отключи


--------------------
Tempora mutantur, et nos mutamur in illis...
PM ICQ   Вверх
Bose
Дата 4.11.2005, 17:56 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Участник Клуба
Сообщений: 1458
Регистрация: 5.3.2005
Где: Riga, Latvia

Репутация: 23
Всего: 51



в меню Tools->Debugger Options можно задать, какие исключения будет обрабатывать Debugger, а какие твоя программа.
PM MAIL WWW Skype   Вверх
Ugr
Дата 5.11.2005, 03:07 (ссылка)    |    (голосов: 0) Загрузка ... Загрузка ... Быстрая цитата Цитата


Unregistered











Цитата(ne0n @ 4.11.2005, 17:07)
в своей программе сделать исключительную ситуацию


если исключение возникает, его подымает Delphi сам,
если ты хочешь поднять исключение после своего сообщения
Код

try
  DoException()
except
  MyMessageBox('Examle for your message box function')
  raise; // поднять исключение
end;

Если в твоем примере не видел сообщение
значит исключения небыло
  Вверх
ne0n
Дата 5.11.2005, 12:45 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


PlayBoy
**


Профиль
Группа: Участник
Сообщений: 733
Регистрация: 5.8.2005
Где: Н.Новгород

Репутация: 1
Всего: 11



Цитата(Snowy @ 4.11.2005, 17:17)
Запусти ехешник без дельфи.

Ну я и стормозил!

Только после моей мессаге появляется сообщение программы типа can't open file C:\1.txt
как его убрать! как я понял убирается в Tools->Debugger Options. а где?
PM MAIL ICQ   Вверх
RST8
Дата 5.11.2005, 12:58 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 232
Регистрация: 8.12.2004

Репутация: 1
Всего: 1



А что у тебя написано после MyMessageBox('Examle for your message box function') ?

В Tools->Debugger Options отключается встроенный отладчик, это все равно что говый exe запускать
из проводника.

Это сообщение отредактировал(а) RST8 - 5.11.2005, 13:00
--------------------
Посадка, с места которой можно уйти на собственных ногах, считается удачной!
PM   Вверх
ne0n
Дата 5.11.2005, 13:34 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


PlayBoy
**


Профиль
Группа: Участник
Сообщений: 733
Регистрация: 5.8.2005
Где: Н.Новгород

Репутация: 1
Всего: 11



Цитата(ne0n @ 4.11.2005, 17:07)
...
try
wipeFile(filename);
except
Show Message('Обломчик вышел');
end;
...


тут все написаноsmile

PM MAIL ICQ   Вверх
Droll
Дата 5.11.2005, 15:25 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 61
Регистрация: 10.11.2004

Репутация: 1
Всего: 3



А вот и не все!
Немного изучив исходники, я обнаружил, что эту ошибку Delphi вызывает только при открытии файла из класса TFileStream. Но, как я не старался, чего только не вписывал в процедуру WipeFile, я при таком раскладе никак не мог получить ошибку. Так что посмотрите что у Вас происходит в этой процедуре, что происходит после try...except...end;
PM   Вверх
RST8
Дата 5.11.2005, 17:24 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 232
Регистрация: 8.12.2004

Репутация: 1
Всего: 1



А еще лучше в отладчике по F7 выполнять команды и смотреть где будет ошибка. Затем то место поместить в try ... except
--------------------
Посадка, с места которой можно уйти на собственных ногах, считается удачной!
PM   Вверх
ne0n
Дата 5.11.2005, 21:17 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


PlayBoy
**


Профиль
Группа: Участник
Сообщений: 733
Регистрация: 5.8.2005
Где: Н.Новгород

Репутация: 1
Всего: 11



Все разобрался!!!Всем спасибо!
З.Ы. WipeFile удаляла файл и ошибка происходила когда файл был открыт ками то приложением и его программа пыталась удалить!
PM MAIL ICQ   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Общие вопросы"
SnowyMetalFan
bemsPoseidon
Rrader

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по Дельфи обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи


Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Snowy, MetalFan, bems, Poseidon, Rrader.

 
1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: Общие вопросы | Следующая тема »


 




[ Время генерации скрипта: 0.0548 ]   [ Использовано запросов: 21 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.