Помогите разобраться в приложений с SQLite?

[McLion]

Тоже не помогает... тут можно проект скачать -> https://yadi.sk/d/UjclTK0Ai2dRp

Если б кто то глянул, отблагодарю ка смогу!

[Снег Север]

но не помогает

В AfterPost надо делать ApplyUpdates, раз нет Options. И хорошо еще добавить Transaction1.CommitRetaining.

Добавлено спустя 15 минут 39 секунд:
Добавил у вас

Код: Выделить всё

procedure TForm1.FormCreate(Sender: TObject);
begin
     SQLiteLibraryName := 'sqlite3.dll';
     SQLite3Connection1.Connected := true;
     if SQLite3Connection1.Connected then
        SQLQuery1.Open;
end;   

и у SQLTransaction1 поменял Action на caCommitRetaining - всё работает как надо...

[McLion]

Прикольно, а у меня нет.... хотя сделал все тоже самое...

Добавлено спустя 6 минут 15 секунд:
Блиииииииииин походу разобрался, я ID задавал, вот и не шло. ID не задаешь и все идет... с ума сойти можно.

[Снег Север]

посмотрите мой вариант
https://onedrive.live.com/redir?resid=5 ... file%2czip

если у вас всё равно не работает, то попробуйте поставить у себя тоже CodeTyphon

Добавлено спустя 4 минуты 8 секунд:

я ID задавал, вот и не шло. ID не задаешь и все идет... с ума сойти можно

У вас же id описано как автоинкрементное - конечно, его нельзя задавать самому.

[McLion]

После перезагрузки Lazarus сново ничего не пашет.... короче этот Lazarus все чепуха...

[Vadim]

конечно, его нельзя задавать самому.

Я, ради эксперимента, зада ID ничего не меняя в коде - идёт, да ещё и семечки щёлкает.
Единственное только - не стоит держать открытым соединение при разработке.

Добавлено спустя 2 минуты 47 секунд:

После перезагрузки Lazarus сново ничего не пашет.... короче этот Lazarus все чепуха...

Ну, если так рассуждать, то и вообще всё на свете чепуха. У меня, вон, кот посуду после себя не моет, так что же мне его теперь за дверь выставлять?

[Лекс Айрин]

McLion, а может, дело не в Лазарусе?

[McLion]

посмотрите мой вариант
https://onedrive.live.com/redir?resid=5 ... file%2czip

если у вас всё равно не работает, то попробуйте поставить у себя тоже CodeTyphon

Добавлено спустя 4 минуты 8 секунд:

я ID задавал, вот и не шло. ID не задаешь и все идет... с ума сойти можно

У вас же id описано как автоинкрементное - конечно, его нельзя задавать самому.

Пасиб... сейчас сравню, буду искать ошибку.

Добавлено спустя 6 минут 46 секунд:
Отключил базу, подключил и все поехало сново... надежности никакой короче, одни игрушки.

CodeTyphon стабильнее в этом плане?

[Vadim]

надежности никакой короче, одни игрушки.

Чисто для прикола: у меня на Лазарусе сделана программа поиска иностранных патентов. Работает с терабайтной базой MSSQL, как в винде так и в Linux без переделки кода. Скорость поиска, по сравнению с оригинальной программой (сделаной профессионалами-монополистами из "Иниц-патент") намного выше. Поиск патентов по одному и тому же (непростому ) условию у них идёт 6..10 минут, у меня же время поиска укладывается в рекоммендованные Коддом 15 секунд. Хороши игрушки, не правда ли?

[Снег Север]

CodeTyphon стабильнее в этом плане?

Там компоненты sqldb явно поновее. Но я рекомендую компоненты Zeos как более надежные. В CodeTyphon они уже инсталированы. И, по своему опыту, крайне рекомендую всегда включать и проверять коннекшн в рантайме.

Добавлено спустя 8 минут 45 секунд:

Я, ради эксперимента, зада ID ничего не меняя в коде - идёт, да ещё и семечки щёлкает.

Насколько я знаю, крайне не рекомендуется задавать значения автоинкрементному полю вручную - может неожиданно выскочить черте что...

[McLion]

надежности никакой короче, одни игрушки.

Чисто для прикола: у меня на Лазарусе сделана программа поиска иностранных патентов. Работает с терабайтной базой MSSQL, как в винде так и в Linux без переделки кода. Скорость поиска, по сравнению с оригинальной программой (сделаной профессионалами-монополистами из "Иниц-патент") намного выше. Поиск патентов по одному и тому же (непростому ) условию у них идёт 6..10 минут, у меня же время поиска укладывается в рекоммендованные Коддом 15 секунд. Хороши игрушки, не правда ли?

У меня есть приложение, где я только ДБ компоненты на форму бросил а все остальное делаю только кодом, к обьектинспектору не дотрагиваюсь. Так вот там тоже все стабильно, но как начнешь в инспекторе что то переставлять - ужас дикий.

[Снег Север]

Так вот там тоже все стабильно, но как начнешь в инспекторе что то переставлять - ужас дикий.

- Доктор, мне больно, когда я делаю - во-о-от так...
- Ну, так не делайте...

[Unvictis]

Всем привет,

хочу научиться работать с БД и написал маленькую прогу. Так вроде все получилось, только не получается добавлять, редактировать и удалять записи.
Насколько я понимаю надо прописывать соответствующие команды в InsertSQL, UpdateSQL и DeleteSQL.

Не подскажите, что там прописать?

Используй код для кнопки:

Код: Выделить всё

if SQLQuery1.Modified then
  begin
    SQLQuery1.Post; // Посылка изменений в набор данных
    SQLQuery1.ApplyUpdates; // Применение изменений в наборе, данные по факту всё ещё в кэше
    SQLTransaction1.Commit; // Сохранение всех изменений в БД

Добавлено спустя 49 секунд:

Всем привет,

хочу научиться работать с БД и написал маленькую прогу. Так вроде все получилось, только не получается добавлять, редактировать и удалять записи.
Насколько я понимаю надо прописывать соответствующие команды в InsertSQL, UpdateSQL и DeleteSQL.

Не подскажите, что там прописать?

Используй код для кнопки:

Код: Выделить всё

if SQLQuery1.Modified then
  begin
    SQLQuery1.Post; // Посылка изменений в набор данных
    SQLQuery1.ApplyUpdates; // Применение изменений в наборе, данные по факту всё ещё в кэше
    SQLTransaction1.Commit; // Сохранение всех изменений в БД
end;