我正在用 Lazarus 编写程序。SQLite 中的数据库。当我单击按钮时，我想更新数据库中的数据并执行以下操作：
fAuto.SQLQ.Close;
fAuto.SQLQ.SQL.Clear;
fAuto.SQLQ.SQL.Text := 'update books set ISBN=:ISBN, book_name=:BN, author=:A, original_name=:ON, original_language=:OL, publisher_name=:PN, translator=:T, issue_year=:IY, page_count=:PC, book_count=:BC, book_price=:BP, only_for_reading_room=:OFRR, comment=:C where index=:I';
fAuto.SQLQ.ParamByName('ISBN').AsString := eISBN.Text;
fAuto.SQLQ.ParamByName('BN').AsString := eBookName.Text;
fAuto.SQLQ.ParamByName('A').AsString := eAuthor.Text;
fAuto.SQLQ.ParamByName('ON').AsString := eOriginalName.Text;
fAuto.SQLQ.ParamByName('OL').AsString := eOriginalLanguage.Text;
fAuto.SQLQ.ParamByName('PN').AsString := ePublisherName.Text;
fAuto.SQLQ.ParamByName('T').AsString := eTranslator.Text;
fAuto.SQLQ.ParamByName('IY').AsString := eIssueYear.Text;
fAuto.SQLQ.ParamByName('PC').AsInteger := ePageCount.Value;
fAuto.SQLQ.ParamByName('BC').AsInteger := eBookCount.Value;
fAuto.SQLQ.ParamByName('BP').AsString := eBookPrice.Text;
fAuto.SQLQ.ParamByName('OFRR').AsBoolean := eOFRR.Checked;
fAuto.SQLQ.ParamByName('C').AsString := eComment.Lines.Text;
fAuto.SQLQ.ParamByName('I').AsInteger := strtoint(eIndex.Text);
fAuto.SQLQ.ExecSQL;
fAuto.SQLTransaction.Commit;
fAuto.SQLQ.Close;
按下按钮后，程序停在 fAuto.SQLQ.ExecSQL 并给出错误
SQLConnection：“索引”附近：语法错误
书籍表的结构：
