Ошибка Delphi XE3. Exception EAccessViolation in module Project1.exe at 00252E0E

@AleksMysskiu · Регистрация: 14.05.2016

Студворк — интернет-сервис помощи студентам

Есть база данных с 2 таблицами (связь один-ко-многим).
Мне требовалось организовать связывание таблиц следующим образом:
По щелчку по строке основной DBGrid1, должна выводиться связанная информация в DBGrid2.
Я реализовал это через SQL запрос с помещением ID поля в DBEdit1 следующим образом:

Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
procedure TFMain.DBEdit1Change(Sender: TObject);
var h1, h2:string;
begin
h1:=''+dbedit1.text;
h2:=quotedstr(h1);
with DM.ADOQuery2 do
 begin
   close;
   sql.clear;
   sql.Add('select * from tarifs where IDtel like'+h2+' order by Тарифный_план');
   open;
 end;
end;

Вот SQL код ADOQuery2 изначальный:

SQL
1
SELECT * FROM tarifs  ORDER BY Тарифный_план

Компилируется программа успешно и все функции работают, но по закрытию выскакивает ошибка:
Application Error
Exception EAccessViolation in module Project1.exe at 00252E0E.
Access violation at address 00652E0E in module 'Project1.exe'. Read of address 00000000.

Ошибка Event Log:
Thread Exit: Thread ID: 2132. Process Project1.exe (1732).

P.S. При краше выделяется красным строка №9 из вышеприведенного кода.

Помогите устранить люди добрые!!!
Заранее, СПАСИБО.

@krapotkin · 15.05.2016, 20:04

программа закрывается, DM уничтожается, и соответственно значение в DBEdit меняется, оно ж пустое пеперь
программа идет в ваш обработчик, а там ссылка на уже уничтоженный DM
все логично...

вообще очень, крайне странное место для обработчика
лучше скажите, что изначально надо было сделать.
это автозаполнение у вас так реализовано?

@AleksMysskiu · 16.05.2016, 22:17 **[ТС]**

Я так реализовал связывание двух таблиц БД. По нажатию в первой таблице считывается ID строки. ID считывается с помощью DBEdit. Далее идет сортировка второй таблицы по считанному ID через SQL.

В общем проблемы я решил но хочу услышать ваши советы.

P.S Проблемы решил через закрытие ADOQuery.close по закрытию формы. Ибо ошибки выскакивала именно по закрытию и именно на вызов ADOQuery.

Может я и обрубил программу но все же работает!!!

Новые блоги и статьи Все статьи Все блоги /
Автоматическое создание документа при проведении другого документа Maks 29.03.2026 Реализация из решения ниже выполнена на нетиповых документах, разработанных в конфигурации КА2. Есть нетиповой документ "ЗаявкаНаРемонтСпецтехники" и нетиповой документ "ПланированиеСпецтехники". В. . .	Настройка движения справочника по регистру сведений Maks 29.03.2026 Решение ниже реализовано на примере нетипового справочника "ТарифыМобильнойСвязи" разработанного в конфигурации КА2, с целью учета корпоративной мобильной связи в коммерческом предприятии. . . .	Автозаполнение реквизита при выборе элемента справочника Maks 27.03.2026 Программный код из решения ниже на примере нетипового документа "ЗаявкаНаРемонтСпецтехники" разработанного в конфигурации КА2. При выборе "Спецтехники" (Тип Справочник. Спецтехника), заполняется. . .	Сумматор с применением элементов трёх состояний. Hrethgir 26.03.2026 Тут. https:/ / fips. ru/ EGD/ ab3c85c8-836d-4866-871b-c2f0c5d77fbc Первый документ красиво выглядит, но без схемы. Это конечно не даёт никаких плюсов автору, но тем не менее. . . всё может быть. . .
Автозаполнение реквизитов при создании документа Maks 26.03.2026 Программный код из решения ниже размещается в модуле объекта документа, в процедуре "ПриСозданииНаСервере". Алгоритм проверки заполнения реализован для исключения перезаписи значения реквизита,. . .	Команды формы и диалоговое окно Maks 26.03.2026 1. Команда формы "ЗаполнитьЗапчасти". Программный код из решения ниже на примере нетипового документа "ЗаявкаНаРемонтСпецтехники" разработанного в конфигурации КА2. В качестве источника данных. . .	Кому нужен AOT? DevAlt 26.03.2026 Решил сделать простой ланчер Написал заготовку: dotnet new console --aot -o UrlHandler var items = args. Split(":"); var tag = items; var id = items; var executable = args;. . .	Отправка уведомления на почту при создании или изменении элементов справочника Maks 24.03.2026 Программная отправка письма электронной почты на примере типового справочника "Склады" в конфигурации БП3. Перед реализацией необходимо выполнить настройку системной учетной записи электронной. . .

@krapotkin 6849 / 4676 / 1464 Регистрация: 14.04.2014 Сообщений: 20,671 Записей в блоге: 21
	15.05.2016, 20:04
	программа закрывается, DM уничтожается, и соответственно значение в DBEdit меняется, оно ж пустое пеперь программа идет в ваш обработчик, а там ссылка на уже уничтоженный DM все логично... вообще очень, крайне странное место для обработчика лучше скажите, что изначально надо было сделать. это автозаполнение у вас так реализовано? 0

@AleksMysskiu 0 / 0 / 0 Регистрация: 14.05.2016 Сообщений: 2
	16.05.2016, 22:17 [ТС]
	Я так реализовал связывание двух таблиц БД. По нажатию в первой таблице считывается ID строки. ID считывается с помощью DBEdit. Далее идет сортировка второй таблицы по считанному ID через SQL. В общем проблемы я решил но хочу услышать ваши советы. P.S Проблемы решил через закрытие ADOQuery.close по закрытию формы. Ибо ошибки выскакивала именно по закрытию и именно на вызов ADOQuery. Может я и обрубил программу но все же работает!!! 0