Здравствуйте.
Пытаюсь перевести проект с Delphi7 на Lazarus 1.6.4
В программе ведется работа с базой на MS SQL

Есть вопрос про компонент TSQLTransaction
Он обязательно должен быть указан в TMSSQLConnection иначе ошибка.
А дальше возникает проблема.
Например используется две компоненты SQLQuery1 и SQLQuery2
в одной сделана выборка select компонент открыт SQLQuery1.Open данные отображаются в DBGrid
Пользователь работает с данными d DBGrid и вставляет в специальные поля на форме новые данные, которые должны вставляться по ID из текущей строки с помощью запроса во втором компоненте SQLQuery2.ExecSQL
В Delphi через ADO компоненты это работает без проблем.
Но почему-то в Lazarus Транзакция привязывается к соединению, и если выполнить Commit после SQLQuery2.ExecSQL то и выборка SQLQuery1.open закрывается.
Получается что есть два варианта
1. Копить данные на открытой транзакции и закрывать когда будут введены все. Но это глупо.
2. Пускать выборку и вставку данных через разные TMSSQLConnection. Это как-то странно.
Может не понимаю чего-то? Может есть нормальный способ работы с базой, а не эта чудесатая ерунда?

wadman,

Можно но выскакивает ошибка. При попытке открыть или выполнить Query.

посмотрел еще на всякий случай в саму компоненту TSQLTransacrion и увидел, что там тоже можно указать на MSSQLConnection
т.е. не в MSSQLConnection указатель на TSQLTransacrion, а наоборот.
Тогда можно для SQLQuery которые с визуальными гридами. Сделать один общий TSQLTransacrion1
А для всех остальных которые делают манипуляции с данными в режиме открыть-записать-подтвердить сделать TSQLTransacrion2

Спасибо.

Господин Уэф!,

Рано обрадовался.
Сейчас вообще странность какая-то, вроде все запросы проходят нормально, в профайлере их видно. И commit-ы видно
Но данных в базе нет.

kdvГосподин Уэф!,

в ms sql -
- одна транзакция на коннект
- в одном коннекте и транзакции может быть "недочитан" (открыт) одновременно только один запрос (query).

если с компонентами Х это не так, значит они врут, и втихаря открывают более 1 коннекта. или сразу фетчат весь запрос, как clientdataset.
Это полностью не так.
Сколько в Delphi7 делал утилит, всегда был один коннект на всё.
1. Это заметно даже по локальным временным таблицам #Tb, они видны только в рамках породившего коннекта. (в Lazarus-е сейчас чтобы по быстрому проблему решить, сделал два коннекта, на select и на всё остальное, и пришлось временные таблицы переделать на глобальные ##Tb )
2. Да и в профайлере было бы видно несколько подключений, а их нет.

Через два года наткнулся на этот свой вопрос.
Закрываю.

Для того чтобы "вручную" не заниматься открытием (begin) и подтверждением транзакции (commit)
А так же чтобы работать на одном соединении.
Нужно в параметры компоненты TMSSQLConnection внести параметр AutoCommit=true
Видимо в Delphi в TADOConnection эта установка, по умолчанию сделана.

Теперь в новых проектах, в компоненту или при старте программно сразу прописываю три параметра, и закрываю для себя эту тему.

MSSQLServ.Params.Add('AutoCommit=true');
MSSQLServ.Params.Add('TextSize=16777216');
MSSQLServ.Params.Add('ApplicationName=имя программы для удобства отлавливания запросов профайлером');