Ошибка при сворачивании в трей

[Ericnex]

Даже при переносе компонента ошибка осталась.

[evg_m]

Сообщение от Ericnex

Точка остановки выявило проблемное место здесь

DM.TrayIcon1.Visible := true;

теперь смотрим ГДЕ объявлена DM.
все сейчас скажут в DataModule переменная класса.
Да согласен, она там есть. (именно ее использует Application.CreateForm(....); )

НО почти наверняка в том же unit1 (TForm1) тоже есть ТАКАЯ же переменная.

Даже при переносе компонента ошибка осталась.

так и использовать в таком случае надо ЕЕ (self.TrayIcon ), а не из неизвестного объекта DM (DM.TrayIcon)

[Ericnex]

В Unit1 только вот так

var
  Form1: TForm1;

[evg_m]

BreakPoint и ЗНАЧЕНИЯ
1.переменная DM (должна быть <>nil, но скорее всего =nil раз AV)
ищем разные переменные DM (где-то они есть). может это КАКОЕ-то поле в TForm1 ????
мышку на DM ; Сtrl + leftclick должно вывести на используемое объявление.

2. DM<>nil смотрим DM.TrayIcon =nil ( а почему так ? ).
3. проект в студию.

[Ericnex]

Прикладываю файл проекта

[evg_m]

D7 не понимает TrayIcon
Lazarus не понимает TApplicationEvents TADO... ;
после исключения перечисленного (ADO и AppEvents) проект нормально запустился в Lazarus.

ДА, чуть не забыл Lazarus к тому же еще не не понял и TrayIcon.Animate (это тоже было исключено).01.jpg

так что думаю собака зарылась в Animate =true или же каких-то левых (мусорных, не обновленных dcu) из-за которых не используется правильный(обновленный) исходный код.

[Ericnex]

Просто у меня Delphi XE стоит, поэтому у меня компонент TrayIcon уже встроенный.

[northener]

Д2007 понимает и TrayIcon и TApplicationEvents. Пришлось только деактивировать связь с БД в виду отсутствия таковой. AV при старте приложения не наблюдается.