Alexey KovyazinБольшая просьба - посмотреть и прокомментировать, что можно улучшить.
Транзакция с такими параметрами в Firebird может быть открытой сколь угодно долгое время (дни, недели, месяцы)
Пожалуйста, не надо провоцировать данное поведение. Ибо хотя транзакция и стартует как закоммиченная, она всё же жива и имеет побочные эффекты в виде накопления блобов, например.
Счётчик транзакций расширен до 48 бит, так что лучше не мелочиться и делать правильно: создавать отдельные транзакции на отдельные логические куски работы. В вашем мышевозном примере - своя транзакция на каждую форму, которая стартует при открытии (или когда надо) и сразу завершается при закрытии (окончания фетча если компоненты позволяют) последнего связанного с ней датасета.

За использование TDataSet.Refresh (и тем более Requery) - отдельные люли.



Поздравляю, вы только что подвесили пишущую транзакцию в неопределённом состоянии при любой ошибке, не связанной с работой с БД.

И, кстати, если не использовать Application.ShowException(E), а просто выбрасывать исключение дальше, код будет проще и, местами, предсказуемее.



1) Лезть к компонентам в другой форме - архитектурная ошибка. Нарушение инкапсуляции.
2) Вы таки всерьёз сомневаетесь, что StartTransaction приведёт транзакцию в состояние Active?..

Ariochконкретно в BDE или вообще? И почему ?
Лишний запрос на сервер.
В лучшем случае бесполезный (если Refresh стандартный и обновляет только текущую запись),
в худшем - вызывающий формирование нового result set-а, если осуществляется через
Close+Open+Locate.

Ariochа лезть в TDatabase/TSQLConnection/youNameIt расположенном в другой
форме/датамодуле?
Для мышевозников, увы, это меньшее зло.
По-хорошему соединение должно передаваться в форму, работающую с данными, как параметр.
В идеале - вся работа с БД должна осуществляться в отдельном классе, где этот объект
инкапсулирован до приватности и который обменивается с классами морды исключительно
бизнес-объектами.
Posted via ActualForum NNTP Server 1.5

Симонов Денисда это приложение имеет крайне далёкую от реальных систем архитектуру.

Ты это понимаешь, я это понимаю, а тысячи чайников будут тупо копипастить. Не люблю сидеть
на саппорте, хоть это и основной источник дохода. Допиливать такую банку со спагетти тоже
удовольствие ниже среднего.
Posted via ActualForum NNTP Server 1.5

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

Повторяю ещё раз, медленно: "если Refresh стандартный и обновляет только текущую запись".
Я не знаю как работает метод с этим названием в FireDUCK.
Ну и "видеть новые записи" это, конечно, может быть полезный побочный эффект, но лично я
не уверен, что ему место в таком неочевидном месте.
Posted via ActualForum NNTP Server 1.5

Ariochдаже и текущую запись кто-то может изменить
Но этого уже никто никогда не увидит, поскольку строчкой выше эти изменения были навсегда
потеряны.
Posted via ActualForum NNTP Server 1.5

Симонов ДенисТам есть всего лишь демонстрация некоторых способов работы с FireDac.
Именно с компонентами, а не как пример архитектуры приложения.
К сожалению, её будут рассматривать именно как пример архитектуры. И ТСы будут на неё
ссылаться в плане "я всё сделал как там написано, а база всё равно тормозит".
Posted via ActualForum NNTP Server 1.5