Ver Mensaje Individual
  #1  
Antiguo 28-05-2018
Arturo.Molina Arturo.Molina is offline
Miembro
 
Registrado: feb 2018
Posts: 28
Reputación: 0
Arturo.Molina Va por buen camino
SQLQuery no encuentra una tabla

Hola a todos,
en un pequeño proyecto que estoy haciendo en Delphi 10.2, estoy usando una base de datos SQLite3 que tiene 2 tablas (libros y ventas).

Para atacarla, he colocado un SQLConnection y un SQLQuery, ambos de DBExpress.
Tengo en el directorio de la aplicación el archivo sqlite3.dll versión 3.23.0100, descargado esta misma mañana.
La conexión usa el driver sqlite, le coloco como parámetro la dirección de la base de datos y conecto:
Código Delphi [-]
procedure TDM.DataModuleCreate(Sender: TObject);
begin
   Conexion.LoginPrompt := false;
   Conexion.DriverName := 'sqlite';
   Conexion.Params.Add( 'Directorio = ' + ExtractFilePath( ParamStr(0) ) + 'feria.db' );
   try
     Conexion.Open;
   except
     on E: Exception do
       ShowMessage( 'Hubo un error al conectar con la base de datos' );
   end;
 end;
Hasta aquí, sin problemas.
Para obtener los datos, uso el SQLQuery así:
Código Delphi [-]
procedure TfAgregarLibros.edtISBNExit(Sender: TObject);
begin
   if edtISBN.Text <> '' then     // Buscamos si existe el libro
     if DM.QueryLibros.Active then
       Close;
     DM.QueryLibros.SQL.Clear;
     DM.QueryLibros.SQL.Add( 'SELECT * FROM libros WHERE isbn = :isbn1;' );
     DM.QueryLibros.Params.ParamByName( 'isbn1' ).AsString := edtISBN.Text;
     DM.QueryLibros.Active := true;
     ...

Y aquí me salta un error diciendo que no encuentra la tabla "libros"...
¿Álguien sabe que estoy haciendo mal?
Responder Con Cita