Суть в том что нужно в блоке except записать скажем ошибку в лог, а потом еще переместить указатель и начать новую итерацию цикла.
В общем если делать так:



то компилятор ругается на  две строчки


Если убрать конструкции on..do то компилятор не ругается. А как совместить?

Это сообщение отредактировал(а) Zlo - 23.7.2013, 19:30

но в данном случае Continue - лишнее. Да и Next все равно надо вынести за пределы try..except (если этого не делается в TESTfunction. А если делается - то убрать оттуда).

Это сообщение отредактировал(а) kami - 23.7.2013, 19:48

Сделал так:

Тогда ругается на begin. 

хммм. мда?  Странно  

Почитай про составные операторы - будет полезно. А пока - засунь ShowMessage туда же, под begin. И еще - крайне полезно бывает пользоваться автоматическим форматированием кода. Если им воспользоваться, то код будет выглядеть так:


Увидел? то, что в begin..end ни коим боком не относится к обработке исключения. Вот компилятор и ругается.

kami, 
Тогда уж так:

Но мне нужно чтоб было отдельно от on..do и выполнялось не зависимо от типа ошибки

Выполнялось всегда, или только когда возникнет ошибка?

Добавлено через 1 минуту и 10 секунд
Подозреваю, что всегда. В этом случае:

 только когда возникнет ошибка

Continue - все равно убрать. При выходе из except-блока цикл все равно пойдет на следующий виток.
а вот .Next имхо, придется добавлять в каждый on..do обработчик. 
Хотя в данном случае, имхо, можно обойтись одним e: Exception и выводить ShowMessage(e.ToString)

Не во всех версиях Дельфи класс Exception имеет такой метод. Почему-то о весьма значительной полезности такого метода подумали ну очень не сразу!

Кто тебя этому научил? Ставить begin "где-то там", а end в начале строки - ой как не красиво. kami дал правильный пример форматирования. Посмотри стандартные модули, тот же sysutils, там везде begin на одном уровне с end.

Я его этому не учил. 
Но и я так же пишу.
Возможно эта традиция тянется из того же времени что и опция редактора Турбо Паскаля Optimal Fill.
И настолько уже привык, что begin на пустой строке я воспринимаю только как начало программы/процедуры.

begin без пробелов перед ним - начало процедуры, с пробелами - логическая секция. Всегда так было, стиль написания кода, который заложен в делфийских модулях, считается стандартом. Да, каждый пишет как привык и как хочет, но выдавать свой личный стиль написания за правильный со словами "тогда уж так" - это грубо. Почему-то вы не ставите begin на один уровень с procedure и function. Получается при таком виде нет стандарта, куда хочу, туда леплю. Посмотрите код не стандартных, но более-менее серьезных проектов на Delphi. Jedi, VirtualTreeView и им подобных. Нигде не используется такой стиль обрамления логической секции. Вот, почитайте (кратко на русском). Старожилов вроди northener уже не перестроишь , но новичкам будет полезно.



Это сообщение отредактировал(а) Poseidon - 25.7.2013, 09:38

Оставлю это здесь - ссылка  и еще ссылка.
Хотя, думаю, что многие уже читали.

Все почему-то  пишут, что я begin не там леплю, на ошибку никто даже не посмотрел.   
Ну да ладно вопрос был совсем в другом.

Спасибо. Пойдет.

Zlo, тебе ответили в первом же предложении. Другое дело, что нету всего кода - но есть подозрения, что Next и Continue могут быть лишними или можно как то организовать по другому.