глюк в OpenDialog

[pigeonhole]

Простая программа: на форме кнопка, компонент OpenDialog1 и поле Edit1.
При нажатии на кнопку

  if (OpenDialog1.Execute) and (FileExists(OpenDialog1.FileName)) then
      edit1.Text:=OpenDialog1.FileName

так вот запускаю программу, нажимаю на кнопку и открывается OpenDialog отображая содержимое рабочего стола. Навожу мышкой на какой либо файл (не выбираю) - при этом появляется подсказка(размер, тип, дата создания и т.п.). После нажимаю отмена и закрываю окно OpenDialog. После повторяю эти же операции заново. И вот когда я второй раз пытаюсь получить подсказку о файле на рабочем столе вся программа выключается автоматом без сообщений.
Помогите?

[RXL]

pigeonhole, пользуйся отладчиком!