$20 Task: Full Text Search in SQLite

[paweld]

no, for SQLdb. For ZEOS all are Memo

[Zvoni]

no, for SQLdb. For ZEOS all are Memo

Just did a test with an FTS5-Table

I added the text of the first post of this thread to the FTS5-table.
it's 1558 characters(?) in Length

I added a single line in sqlite3conn in AddFieldDefs-Method

Code: Pascal  [Select][+][-]

1. if FT=ftUnknown then
2.       case TStorageType(sqlite3_column_type(st,i)) of
3.         stInteger: FT:=ftLargeInt;
4.         stFloat:   FT:=ftFloat;
5.         stBlob:    FT:=ftBlob;
6.         stText:    FT:=ftMemo;  //THIS ONE WAS ADDED
7.         else       FT:=ftString;
8.       end;                  

Using "standard" sqlite3conn with sqldb, i executed a "SELECT * FROM MyFTS5Table" with a TSQLQuery-Object.
It returned the full text.
A writeln(Length(MyQuery.Fields[0].AsString)); returend 1558

and a Writeln(MyQuery.Fields[0].DataType);  returns ftMemo

[paweld]

@Zvoni: Can you add a patch on https://gitlab.com/freepascal.org/fpc/source/-/issues

[Zvoni]

@Zvoni: Can you add a patch on https://gitlab.com/freepascal.org/fpc/source/-/issues

Would love to, but have never done that.
Nevermind, that i'm at my company laptop, and i don't have diff-app there.

Though, shouldn't that be tested beforehand? That was just a quick and dirty way to determine what the Fieldtype of an FTS5-Column really is.
No idea if it affects anything else

btw: I just did the opposite test (removed that one line) with the Text from the first post

I confirm your findings:
Fields[0].DataSize returns 1021

[TRon]

fwiw something similar was done in fixes for odbcconnection here

[paweld]

@TRon: thank you.

@Zvoni: Based on a commit from link shared by @TRon, I think you can add a issue with a patch.

[Zvoni]

@TRon: thank you.

@Zvoni: Based on a commit from link shared by @TRon, I think you can add a issue with a patch.

That's exactly my problem: Never created a patch
Could/Would you?

[Zvoni]

@TRon: thank you.

@Zvoni: Based on a commit from link shared by @TRon, I think you can add a issue with a patch.

https://gitlab.com/freepascal.org/fpc/source/-/issues/40686
My first one
Though no patch....

[wp]

Already fixed by MvC. Open source at its best...

[Zvoni]

Already fixed by MvC. Open source at its best...

We might get pawel to move his FTS-Stuff from Zeos to FPC-regular components? *gg*

[TRon]

Thank you for the report Zvoni, paweld for the help  and ofc MvC for the commit 

Indeed open source at its best 

[paweld]

@Zvoni: Thank you.The sqldb versions - one with htmlviewer, the other with ipro - are attached. Of course, all text will be visible after compilation with the current fpc trunk