![]() |
Модераторы: Snowy, MetalFan, bems, Poseidon |
![]() ![]() ![]() |
|
Zlo |
|
||||
Бывалый ![]() Профиль Группа: Участник Сообщений: 235 Регистрация: 18.9.2004 Репутация: нет Всего: 1 |
Суть в том что нужно в блоке except записать скажем ошибку в лог, а потом еще переместить указатель и начать новую итерацию цикла.
В общем если делать так:
то компилятор ругается на две строчки
Если убрать конструкции on..do то компилятор не ругается. А как совместить? Это сообщение отредактировал(а) Zlo - 23.7.2013, 19:30 |
||||
|
|||||
kami |
|
|||
Эксперт ![]() ![]() ![]() Профиль Группа: Завсегдатай Сообщений: 1806 Регистрация: 25.8.2007 Где: Санкт-Петербург Репутация: 22 Всего: 72 |
но в данном случае Continue - лишнее. Да и Next все равно надо вынести за пределы try..except (если этого не делается в TESTfunction. А если делается - то убрать оттуда). Это сообщение отредактировал(а) kami - 23.7.2013, 19:48 |
|||
|
||||
Zlo |
|
|||
Бывалый ![]() Профиль Группа: Участник Сообщений: 235 Регистрация: 18.9.2004 Репутация: нет Всего: 1 |
Сделал так:
Тогда ругается на begin. |
|||
|
||||
kami |
|
|||
Эксперт ![]() ![]() ![]() Профиль Группа: Завсегдатай Сообщений: 1806 Регистрация: 25.8.2007 Где: Санкт-Петербург Репутация: 22 Всего: 72 |
хммм. мда? Странно
![]() Почитай про составные операторы - будет полезно. А пока - засунь ShowMessage туда же, под begin. И еще - крайне полезно бывает пользоваться автоматическим форматированием кода. Если им воспользоваться, то код будет выглядеть так:
Увидел? то, что в begin..end ни коим боком не относится к обработке исключения. Вот компилятор и ругается. |
|||
|
||||
Zlo |
|
|||
Бывалый ![]() Профиль Группа: Участник Сообщений: 235 Регистрация: 18.9.2004 Репутация: нет Всего: 1 |
kami,
Тогда уж так:
Но мне нужно чтоб было отдельно от on..do и выполнялось не зависимо от типа ошибки |
|||
|
||||
kami |
|
||||
Эксперт ![]() ![]() ![]() Профиль Группа: Завсегдатай Сообщений: 1806 Регистрация: 25.8.2007 Где: Санкт-Петербург Репутация: 22 Всего: 72 |
Выполнялось всегда, или только когда возникнет ошибка? Добавлено через 1 минуту и 10 секунд Подозреваю, что всегда. В этом случае:
|
||||
|
|||||
Zlo |
|
|||
Бывалый ![]() Профиль Группа: Участник Сообщений: 235 Регистрация: 18.9.2004 Репутация: нет Всего: 1 |
только когда возникнет ошибка
|
|||
|
||||
kami |
|
|||
Эксперт ![]() ![]() ![]() Профиль Группа: Завсегдатай Сообщений: 1806 Регистрация: 25.8.2007 Где: Санкт-Петербург Репутация: 22 Всего: 72 |
Continue - все равно убрать. При выходе из except-блока цикл все равно пойдет на следующий виток.
а вот .Next имхо, придется добавлять в каждый on..do обработчик. Хотя в данном случае, имхо, можно обойтись одним e: Exception и выводить ShowMessage(e.ToString) |
|||
|
||||
northener |
|
|||
![]() Эксперт ![]() ![]() ![]() Профиль Группа: Завсегдатай Сообщений: 1361 Регистрация: 2.9.2010 Репутация: 12 Всего: 20 |
Не во всех версиях Дельфи класс Exception имеет такой метод. Почему-то о весьма значительной полезности такого метода подумали ну очень не сразу! -------------------- Но только лошади летают вдохновенно. Иначе лошади разбились бы мгновенно! |
|||
|
||||
Poseidon |
|
||||
![]() Delphi developer ![]() ![]() ![]() ![]() Профиль Группа: Комодератор Сообщений: 5273 Регистрация: 4.2.2005 Где: Гомель, Беларусь Репутация: 9 Всего: 133 |
Кто тебя этому научил? Ставить begin "где-то там", а end в начале строки - ой как не красиво. kami дал правильный пример форматирования. Посмотри стандартные модули, тот же sysutils, там везде begin на одном уровне с end. -------------------- Если хочешь, что бы что-то работало - используй написанное, если хочешь что-то понять - пиши сам... |
||||
|
|||||
northener |
|
|||
![]() Эксперт ![]() ![]() ![]() Профиль Группа: Завсегдатай Сообщений: 1361 Регистрация: 2.9.2010 Репутация: 12 Всего: 20 |
Я его этому не учил. ![]() Но и я так же пишу. Возможно эта традиция тянется из того же времени что и опция редактора Турбо Паскаля Optimal Fill. И настолько уже привык, что begin на пустой строке я воспринимаю только как начало программы/процедуры. -------------------- Но только лошади летают вдохновенно. Иначе лошади разбились бы мгновенно! |
|||
|
||||
Poseidon |
|
||||||
![]() Delphi developer ![]() ![]() ![]() ![]() Профиль Группа: Комодератор Сообщений: 5273 Регистрация: 4.2.2005 Где: Гомель, Беларусь Репутация: 9 Всего: 133 |
![]()
Это сообщение отредактировал(а) Poseidon - 25.7.2013, 09:38 -------------------- Если хочешь, что бы что-то работало - используй написанное, если хочешь что-то понять - пиши сам... |
||||||
|
|||||||
superVad |
|
|||
![]() Опытный ![]() ![]() Профиль Группа: Участник Сообщений: 735 Регистрация: 6.4.2006 Где: Черкассы, Украина Репутация: 7 Всего: 15 |
||||
|
||||
Zlo |
|
|||
Бывалый ![]() Профиль Группа: Участник Сообщений: 235 Регистрация: 18.9.2004 Репутация: нет Всего: 1 |
||||
|
||||
superVad |
|
|||
![]() Опытный ![]() ![]() Профиль Группа: Участник Сообщений: 735 Регистрация: 6.4.2006 Где: Черкассы, Украина Репутация: 7 Всего: 15 |
Zlo, тебе ответили в первом же предложении. Другое дело, что нету всего кода - но есть подозрения, что Next и Continue могут быть лишними или можно как то организовать по другому.
|
|||
|
||||
![]() ![]() ![]() |
Правила форума "Delphi: Для новичков" | |
|
Запрещается! 1. Публиковать ссылки на вскрытые компоненты 2. Обсуждать взлом компонентов и делиться вскрытыми компонентами
Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Snowy, MetalFan, bems, Poseidon, Rrader. |
1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей) | |
0 Пользователей: | |
« Предыдущая тема | Delphi: Для новичков | Следующая тема » |
|
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности Powered by Invision Power Board(R) 1.3 © 2003 IPS, Inc. |