query.SQL.Text:='INSERT INTO jobs (type,openTime, closeTime,description,org,Close) values ('+IntToStr(popupbox2.ItemIndex+1)+','+#39+TimeToStr(timeedit1.Time)+#39+','+#39+TimeToStr(timeedit2.Time)+#39+','+#39+edit1.Text+#39+','+inttostr(org)+', 0)';
query.ExecSQL;
query.Close;
jobs.Active:=false;
jobs.Active:=true;
Ошибка:
First chance exception . Exception class Bus error (10). Process Project1.apk (9052)
Компоненты:
query:TSQLQuery
jobs:TBindSourseDBX
расположены на форме, связаны через jobs.SQLConnection=query
Таблица:
CREATE TABLE Jobs (
Jobid INTEGER PRIMARY KEY ASC AUTOINCREMENT,
type TEXT,
openTime DATETIME,
closeTime DATETIME,
description TEXT,
Close BOOLEAN DEFAULT ( 0 ),
org INTEGER
);
Возможно стоит использовать TBindCourseDB в сочетании с TSQLDataSet, вместо TBindCourseDBX? Проверю, напишу если это решит проблему.