Можно тут немного на судьбу пожаловаться?

[Climber]

Рефакторил проект, уперся в тупик.
Есть одна функция, вылетает при совершенно невинных обращениях к компоненту TZQuery и при вызове ShowMessage.
Доходит до смешного:

Код: Выделить всё

procedure MyForm.XXX;
var q: TZQuery;
begin
q:=TZQuery.Create(Self);  // Тут вылетает!!!
ShowMessage('Тест');  // И тут выетает!!!
end;

try .. except не помогает - приложение просто молча валится и все. Если функцию закомментить - все работает. Потоков нет. Я в трауре второй день.

Всем спасибо за внимание и сочувствие.

[GrayEddy]

Код: Выделить всё

q := TZQuery.Create(nil)

заодно и проверить потом на вшивость

Код: Выделить всё

if q <> nil then ... else ...

[Climber]

Если бы все было так просто! Такие варианты я пишу сразу, "не приходя в сознание". Если б они всегда помогали, я бы счастливым человеком был. А тут реально призадумался.
Нечто похожее было около года назад, я так и не разобрался, в чем проблема, просто с нуля переписал кучу кода. Теперь куча раз в пять больше, и че-то мне лень переписывать всё...

[GAMER]

Какая СУБД?
Я как-то работал с МайСКЛ, так там ошибка вылетала совершенно не там, где ожидалось.

[Climber]

Какая СУБД?

А какая разница? На ShowMessage тоже падает. Я надеюсь на понедельник и свежую голову. А ща пока логи базы перелопачиваю...
Если пройдет, отпишусь, что помогло, если сам пойму...

[stikriz]

Где-то в другом месте неправильно работаете с памятью. Это может быть где угодно, хоть в 26 строке.
У меня такое было. Думал рехнусь...

[Vadim]

procedure MyForm.XXX;

Может быть перед "My" поставить букву T?

[zub]

stikriz
+1
Гдето раньше портится куча. Отлов таких ошибок дело очень увлекательное))

>>Если функцию закомментить - все работает
не факт, вылетит гденить в другом месте.
Смотреть все места где идет работа с выделенной памятью - указатели, стринги, динмассивы...
Я в таких случаях коментирую куски программы, пока ошибка не исчезнет, исчезнет - скорее всего куча портится в последнем закоментированом коде.
Может ченибуть всплывет в heaptrc? под линукс можно попробовать valgrind, там вроде есть контроль к обращениям невыделенной памяти

[hinst]

stikriz

Думал рехнусь...

интересно, и что же спасло вас от неминуемой моральной гибели

[stikriz]

Я нашел те места, где освобождаю память повторно. В деструкторах. Был метод Clear виртуальный, в потомке перегружен. В предке вызывался, в потомке тоже... Ну, далее понятно