TSQlite3Dataset.open returns "index out of bounds"
lazarus / 16-Databases

----------------------------------------------------------------------
Caste1610 · 2006-12-16 14:33

Hello everybody,

I have just installed the SQLite package for Lazarus (btw. 0.9.20) and
now I wanted to try it:
I created a TSqlite3Dataset in my app and called it SQL, I set
filename and tablename as said in the wiki to my databasse and wanted
to create a table by right-click and "Create Table".
This fails each time I try and I erased all information in the
properties window and made my program do the initialisation:
Code: [Select]SQL := TSQLite3Dataset.Create(nil);
SQL.FileName := '/home/tbcm/ausleihen.db';
SQL.SQL := 'create table table(index INTEGER PRIMARY_KEY NOT NULL,von
VARCHAR(50),an VARCHAR(50),was VARCHAR(200),datum DATE)';
SQL.TableName:='table';
SQL.SaveOnClose:=true;
SQL.Open;
But when I want to run, the program aborts and tells me the index (-1)
is out of bounds...

The file was created, but is still empty.. How can I make my app
create the table?

----------------------------------------------------------------------
LuizAmérico · 2006-12-28 17:07

Instead of SQL.Open do SQL.EXECSQL