uses System.SysUtils, FireDAC.Comp.Client;

var
  Conn: TFDConnection;
begin
  Conn := TFDConnection.Create(nil);
  Conn.DriverName := 'SQLite';
  Conn.Params.Database := 'data.db';
  Conn.Open;

  //command without a result set
  Conn.ExecSQL(
    'insert into lines (id, name)' +
    ' values (:id, :name)', [3, 'three']);

  WriteLn('rows: ', Conn.ExecSQLScalar(
    'select count(*) from lines'));
end.