Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Delphi: Общие вопросы > screen.Cursor := crDefault -> AV Access Violation

Автор: Akella 28.9.2011, 13:48

Почему-то вдруг screen.Cursor := crDefault; вызывает Access Violation

Ничего военного в коде нет.

Код


screen.Cursor := crHourGlass;
  try

    Цикл по таблице, скачивание инфы с сайта с помощью компонент ICS, 
finally

  screen.Cursor := crDefault;  
end;

пробовал пройтись отладчиком ,но сразу попадаю в модуль system, в код где куча asm инструкций, там черт ногу сломит %)

AV:

Цитата

Access violation at address 00B30666 in module 'xxxxxxxxxxx.exe'. Read of address 00000000.

Автор: Frees 28.9.2011, 14:03

а если

Код


Forms.Screen.Cursor := crDefault;

Screen случаем не nil?

Автор: Akella 28.9.2011, 14:06

Цитата(Frees @ 28.9.2011, 14:03

)

Screen случаем не nil?

нет

Добавлено через 5 минут и 20 секунд

Цитата(Frees @ 28.9.2011, 14:03

)

Forms.Screen.Cursor := crDefault;

не помогает

Добавлено через 5 минут и 27 секунд
user posted image

Добавлено через 6 минут и 53 секунды
Кстати курсор мышки принимает нормальный вид. Наверняка AV происходит уже в недрах VCL после изменения курсора.

Автор: Frees 28.9.2011, 14:22

а если все между try finally закоментить заработает?

Добавлено через 1 минуту и 46 секунд
а этот код у тебя не в потоке случаем?

Автор: Akella 28.9.2011, 14:24

Ошибка где-то в другом месте. А именно между finally и end %)

Код


      finally
        EndUpdate;
//        forms.screen.Cursor := crDefault;
      end;

Добавлено через 5 минут и 16 секунд
у меня в finally уже даже нет ничего О_о

Автор: Akella 28.9.2011, 14:40

это в мну где-то напартачено, поспешил и тему создал smile

Автор: Akella 28.9.2011, 16:42

Да, баг был у меня. странно что AV вываливалось именно между finnaly/end

Автор: Frees 28.9.2011, 16:59

а флажок Use debug DCUs стоит? или может оптимизация портит....

Автор: Akella 29.9.2011, 09:34

да, наверное