А вот кто ещё помнит седьмой Delphi?

[falcrum]

Коллегу попросили слегка поколупаться в старом проекте:

Comments

[kouzdra]

Что-то не так нахакано и трется по ходу стек. Конкретно в виде переменной LocalTaskObject. Перезапись естественно помогает.

Отладчик в руки и смотреть когда и где и как трется.

[kouzdra]

PS: Кстати совершенно не факт, что раньше стек не терся - возможно просто мелкое изменение проявило ошибку.

[falcrum]

Похоже, да...

[kouzdra]

Ставишь watch на LocalTaskObject и просто прощелкиваешь по шагам - и смотришь где он трется. Ну и там разбираешься.

Реально скорее всего х-ня в Load2 с соглашениями о связях или чем там ищо.

[metaclass]

Ищите соседний поток. Или баг с затиранием памяти в DLL.

И да, "заработало" - это оно будет падать теперь только при определенной фазе луны и наполнении памяти, готовьтесь к невоспроизводимым баг-репортам.

[arush_damage]

ErrorCode: integer;
и
var codeErr: LongInt

ИМХО стек затирается

[metaclass]

Не собралось бы, компилятор возмутится.

[falcrum]

Не, дельфя с таким умная...