- Код: Выделить всё
procedure tratata;
begin
try
ZQuery1.SQL.Text:='текст запроса';
ZQuery1.Open;
...
except
ShowMessage('Сообщение об ошибке');
end;
end;
Модератор: Модераторы
procedure tratata;
begin
try
ZQuery1.SQL.Text:='текст запроса';
ZQuery1.Open;
...
except
ShowMessage('Сообщение об ошибке');
end;
end;
Climber писал(а):У меня есть 2 ZQuery в разных модулях, которые используют один общий ZConnection. При запуске программы происходит коннект к базе, потом в обработчиках OnCreate форм выполняются процедуры такого типа:Обе процедуры выглядят похоже, только выполняют немного разные манипуляции с результатами запросов. Вторую я добавил недавно. Теперь происходит вот что: после выполнения первой процедуры во второй процедуре возникает ошибка SIGSEGV на строчке ZQuery1.SQL.Text:='текст запроса', причем обработчиком исключений она не обрабатывается, программа просто тихо завершается. Если первую процедуру закомментить, то вторая работает нормально.Что там может быть не так?
- Код: Выделить всё
procedure tratata;
begin
try
ZQuery1.SQL.Text:='текст запроса';
ZQuery1.Open;
...
except
ShowMessage('Сообщение об ошибке');
end;
end;
Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 24