PHP DM Gate v0.9 » Траблы с KOLSQLiteDb

abyss_by © (15.06.09 23:30) [0]

Работал кто-нибудь с сабжем?
Даже в поставляемой демке откомпиленая прога вылетает с РанТайм ошибкой - 216 ?

<Цитата>
D[u]fa (16.06.09 09:56) [1]

Всё работает. про http://kolnmck.kolmck.net/files/components/db/sqlitedll.7z не забыли случайно? в папку с примером ложить

<Цитата>
abyss_by © (16.06.09 22:24) [2]

Да, действительно работает. Но без MCK.
PSLDataSource, PSLSession и PSLQuery создавать именно в указанной последовательности. С зеркальными компонентами они создаются с точностью до наоборот ;)

> про http://kolnmck.kolmck.net/files/components/db/sqlitedll.
> 7z не забыли случайно?

Нет, случайно не забыл. Тем более до инициализации, в случае с MCK, не доходит.

<Цитата>
D[u]fa (17.06.09 10:47) [3]

ну я сам тестил без МСК, но с этим
> С зеркальными компонентами они создаются с точностью до
> наоборот ;)
>

не согласен. вот отрывок кода(который мск сгенерил), который подтверждает мои слова:

Result.SLData := NewSLDataSource('test.db', False);
Result.SLData.BusyTimeout := 1000;
Result.Form.Add2AutoFree( Result.SLData );
Result.SLData.OnBusy := Result.SLDataBusy;

Result.SLSession := NewSLSession('SLSession',Result.SLData);
Result.SLSession.IfConflict := cfRollback;
Result.Form.Add2AutoFree( Result.SLSession );

Result.SLQuery := NewSLQuery( Result.SLSession );
Result.Form.Add2AutoFree( Result.SLQuery );

<Цитата>
abyss_by © (17.06.09 13:01) [4]

Result.SLQuery := NewSLQuery( Result.SLSession );

Result.SLData := NewSLDataSource('test.db', False);
Result.SLData.BusyTimeout := 1000;
Result.Form.Add2AutoFree( Result.SLData );
Result.SLData.OnBusy := Result.SLDataBusy;

Result.SLSession := NewSLSession('SLSession',Result.SLData);
Result.SLSession.IfConflict := cfRollback;

Вот так у меня на чистой демке. Сейчас даже не выставлял в FALSE свойство проекта NewIF (грешил на условную компиляцию). Кстати, Add2AutoFree только в SLData !
Хоть это уже не так важно, можно и ручками, но почему так? :(
D7, KOL&MCK 2.88. С такой расстановочкой столкнулся впервые ;)

<Цитата>
D[u]fa (17.06.09 15:02) [5]

У меня в Turbo всё норм. Очень странно.. похоже на глюк или совпадение неудачное

<Цитата>
Boguslaw (01.03.10 21:25) [6]

proper code below:

Result.SLData := NewSLDataSource('test.db', False);
Result.SLData.BusyTimeout := 1000;
Result.Form.Add2AutoFree( Result.SLData );
Result.SLData.OnBusy := Result.SLDataBusy;

Result.SLSession := NewSLSession('SLSession',Result.SLData);
Result.SLSession.IfConflict := cfRollback;
Result.SLQuery := NewSLQuery( Result.SLSession );

look at the source. TSLDataSource always destroy all attached sessions and each session destroys queries.

<Цитата>
supercommander (02.01.13 19:50) [7]

http://zolotov.h14.ru/download/SQLite.rar
нашол прекрасно зделанную програмку для работы c SQLite3 базами данных.
(поидее легко внедрить в KOL-проект)
форум где обитает автор:
http://freepascal.ru/forum/viewtopic.php?f=6&t=2008
(версия из первого сообщения - самая новая,
версия в комментариях - старая)

<Цитата>