Hallo Delphipraxis,
ich probiere via der libSQL auf eine Testdatenbank von sqlite zuzugreifen. Leider klappt das nicht !!
Ich habe eine testdatenbank mit einer Tabelle (myTable) und 3 Datensätzen, auslesen würd ich die jetzt gerne via der libSQL folgendermasssen:
Delphi-Quellcode:
if FileExists('d:\temp\test\test.s3db') then
begin
LiteDB1.Use('d:\temp\test\test.s3db');
LiteDB1.Active := True;
for ndx := 0 to litedb1.Tables.Count - 1 do
showmessage(litedb1.Tables.strings[ndx]);
litedb1.Execute('select * from mytable');
if LiteDB1.RowCount > 0 then
for ndx := 0 to LiteDB1.RowCount - 1 do
begin
ListBox1.Items.Add(LiteDB1.Results[ndx][1])
end;
end;
Leider behauptet litedb1.tables.count das ich nur 0 Tabellen habe und der Select
SQL liefert auch keine Rows zurück
Was mach ich da falsch? Wollt nur mal testen wie das arbeiten mit sqlite überhaupt so is... Die Idee erscheint mir gut!
mfg, Michael