Configuring and using DBNavigator SQLite3
lazarus / 63-Database

----------------------------------------------------------------------
JLWest · 2020-09-04 00:39

I have read thru the Database form and tried several thing but can't
get DBNavigator to work.

My Database loads and displays in the Grid but nothing from
DBNavigator.

Would like to edit, delete, and insert

Need help.

Thanks

----------------------------------------------------------------------
Ñuño_Martínez · 2020-09-04 10:00

You forgot the DBNavigator.DataSource. Do not create a new DataSource,
it is not necessary.

BTW, why do you set the properties in run-time instead of in design-
time?

----------------------------------------------------------------------
JLWest · 2020-09-04 10:03

Yea, I did at one point it was set to DataSource1. Ot wasn't set in
what I posted.

----------------------------------------------------------------------
wp · 2020-09-04 10:25

Quote from: JLWest on September 04, 2020, 12:03:34 pmYea, I did at one
point it was set to DataSource1. Ot wasn't set in what I posted.
I don't understand what this means...

Change your FormCreate method as follows:
Code: Pascal  [Select][+][-]window.onload = function(){var x1 =
document.getElementById("main_content_section"); if (x1) { var x =
document.getElementsByClassName("geshi");for (var i = 0; i procedure
TForm1.FormCreate(Sender: TObject);begin  DBConnection              
:= TSQLConnector.Create(nil);  DBConnection.ConnectorType :=
'SQLite3';  DBConnection.DataBaseName  := 'Flights.DB';   {* -- Setup
a transaction *}  DBTransaction              :=
TSQLTransaction.Create(DBConnection);  DBTransaction.Database     :=
DBConnection;   {* -- Setup a query *}  DBQuery                    :=
TSQLQuery.Create(DBConnection);  DBQuery.DataBase           :=
DBConnection;  DBQuery.TransAction        := DBTransaction;  {* We
need to make some adjustments to avoid strings being displayed as   
(memo) in a grid and we do that at the afteropen event  *} 
DBQuery.AfterOpen          := @DBQueryAfterOpen;  {* -- Setup the
datasource *}  DataSource                 :=
TDataSource.Create(Self);  DataSource.DataSet         := DBQuery;   {*
-- Connect the grid to the datasource  *}  DBGrid1.DataSource        
:= DataSource;   (* -- Connect the DBNavigator to the datasource *) 
DBNavigator1.DataSource    := DataSource;      // <-----------------
ADDend; 
Normally it is not needed to write an OnClick handler for DBNavigator
because inserting, editing, or deleting of records is built into the
navibator.

BTW, if you use only a DBGrid on the form, not any other DB-aware
controls for editing, adding, deleting of records, then you don't need
a navigator at all because these features can be done with the DBGrid
as well.

----------------------------------------------------------------------
JLWest · 2020-09-04 10:51

Yea, I did at one point it was set to DataSource1. Ot wasn't set in
what I posted.

It means at one point I tested with setting the DataSourse1 in
DBNavagator. When I posted the code  it was removed.

It appears I can delete a row but not insert a row or edit a row with
that line in the Oncreate.