FireDac и MySQL

@andevel · Регистрация: 19.07.2015

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

Всем добрый день. Поясните пожалуйста один момент.
1. DB: MySQL InnoDB
2. Подключение через FireDac
3. Параметры запроса:

Delphi

1
2
3

qSys.ResourceOptions.AssignedValues := [rvCmdExecMode, rvCmdExecTimeout];
qSys.ResourceOptions.CmdExecMode := amnonBlocking;
qSys.ResourceOptions.CmdExecTimeout := 8000;

в программе формирую текст запроса:

ТекстЗапроса ( GlobalSQL ) := Запрос 1; + Запрос2; и тд. .

Запрос 1, Запрос 2 и тд - различные - это и UPDATE и SELECT и вызовы хранимых процедур.

После этого выполняю запрос.
Выглядит так:

Delphi

1	SET wait_timeout=8000; SET autocommit = 0; START TRANSACTION; ' +GlobalSQL +' COMMIT; SET autocommit = 1;

Так вот, при подключении к серверу - все работает отлично. А если в момент запроса происходит потеря связи, то все . .программа виснет. Однако, даже при зависании данные записываются в БД.

И, наконец, сам вопрос, как избежать зависания программы?

@qwertehok · 01.07.2016, 14:48

у вас нестыковка

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

происходит потеря связи

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

даже при зависании данные записываются в БД

данные для записи то откуда берутся? из проводов докачиваются?

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

то все . .программа виснет

вроде не виснет, а пытается достучатся до сервера

если не нравится такое поведение попробуйте обработать событие FDConnection1AfterDisconnect
или вынести запросы в потоки )))

@andevel · 01.07.2016, 14:52 **[ТС]**

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

данные для записи то откуда берутся? из проводов докачиваются?

Поясню: Сначала формируется строка запроса. Потом нажимаю кнопку "Выполнить". Если сразу после нажатия кнопки разрываю соединение, то происходит зависание.

@qwertehok · 01.07.2016, 15:03

конечно происходит - программа пытается восстановить соединение и ждет ответа от сервера столько столько выставлен Timeout

@andevel · 01.07.2016, 15:15 **[ТС]**

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

конечно происходит - программа пытается восстановить соединение и ждет ответа от сервера столько столько выставлен Timeout

в том то и дело, что таймаут выставлен на 3 сек.

Добавлено через 10 минут
или же, когда я формирую строку GlobalSQL , перед каждым запросом поставить

Delphi

1	wait_timeout=1000;

Хотя что это даст . .

@qwertehok 5395 / 4323 / 1060 Регистрация: 29.08.2013 Сообщений: 27,130 Записей в блоге: 3
	01.07.2016, 14:48	2
	у вас нестыковка Сообщение от andevel происходит потеря связи Сообщение от andevel даже при зависании данные записываются в БД данные для записи то откуда берутся? из проводов докачиваются? Сообщение от andevel то все . .программа виснет вроде не виснет, а пытается достучатся до сервера если не нравится такое поведение попробуйте обработать событие FDConnection1AfterDisconnect или вынести запросы в потоки ))) 0

@andevel 4 / 4 / 0 Регистрация: 19.07.2015 Сообщений: 96
	01.07.2016, 14:52 [ТС]	3
	Сообщение от qwertehok данные для записи то откуда берутся? из проводов докачиваются? Поясню: Сначала формируется строка запроса. Потом нажимаю кнопку "Выполнить". Если сразу после нажатия кнопки разрываю соединение, то происходит зависание. 0

@qwertehok 5395 / 4323 / 1060 Регистрация: 29.08.2013 Сообщений: 27,130 Записей в блоге: 3
	01.07.2016, 15:03	4
	конечно происходит - программа пытается восстановить соединение и ждет ответа от сервера столько столько выставлен Timeout 0

	01.07.2016, 15:15