Ver Mensaje Individual
  #6  
Antiguo 28-09-2012
albertougo albertougo is offline
Registrado
 
Registrado: ago 2010
Posts: 8
Reputación: 0
albertougo Va por buen camino
Pues muy simple.
Abro un nuevo proyecto, un form, pongo un botón, y un control edit para ver mi registro, si se abre la DB.
En el Click del boton este código:
Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
var        // Boton Conectar
    AdrDBpath: string;
    AdrDb: TSQLiteDatabase;
begin
      AdrDBPath := 'C:\sqlite\dist2013.db';
      
      AdrDb := TSQLiteDatabase.Create(AdrDBpath);
end;
Nada mas. Las uses son las mismas que en el programa de ejemplo.
Incluso el proyecto es igual al ejemplo de ellos:
Código Delphi [-]
program Project1;

uses
  Forms,
  Unit1 in 'Unit1.pas' {Form1},
  SQLite3 in 'SQLite3.pas',
  SQLiteTable3 in 'SQLiteTable3.pas';

{$R *.res}

begin
  {$IF RTLVersion >= 18}
   ReportMemoryLeaksOnShutdown := true;
  {$IFEND}
  Application.Initialize;
  Application.CreateForm(TForm1, Form1);
  Application.Run;
end.

Cuando hago Run el programa se compila pien pero no muestra el form.
Y si ejecuto el .exe me da un error que no encuentra la MSVCR110.DLL

Última edición por Casimiro Notevi fecha: 28-09-2012 a las 18:32:11.
Responder Con Cita