-
Всем доброго времени суток! Пользуя KOLEDB заметил очень странную вещь... При переходе на Win 7 перестал корректно вызываться метод TDataSource.Free. База (MSAccess) остается открытой, а из под Delphi 7 выскакивает ошибка. В чистом EXE никаких сообщений не возникает, просто база не закрывается и при запросе о подключенных пользователях выдает список тех, кто (я специально завершал сеанс работы с базой) уже давно не подключен. Даже код вида: Qr.close; // закрытие запроса Qr.free; qs.free; // здесь возникает ошибка, если убрать - то ошибка возникает ниже ds.free; // вот тут при запуске из среды разработки - ошибка. При запуске из-под системы - ничего, но при закрытии программы - база открыта!!!
P.S. События OnShow для компонентов MCK вызываются 2-3 раза, когда программа написанная в среде Delphi 7 под Win 7 запускается под win xp-2000. Бороться приходится созданием булевых переменных и постановкой условий на единичный заход. В Win 7 ни при запуске из под Delphi ни при "чистом" запуске подобного не наблюдается.
-
Да! Забыл указать типы:
ds: PDataSource; qs: PSession; Qs: PQuery;
|