program SynDBExplorer;

(*

  Synopse mORMot framework

  Sample 12 - SynDB explorer
    purpose of this sample is to show SynDB classes at work
    resulting speed is quite amazing, and available features make it useful

  Version 1.15 - July 12, 2011
  - Initial Release, handling OleDB, Oracle/OCI, and SQLite3 databases

  Version 1.16
  - SynDbExplorer now executes selected text statement (very convenient)
  - will try to reconnect to the server in case of error triggerred
  - added advanced Query Builder
  - now accepts a SQLite3 database file as command line parameter
  - fix error ORA-00932 at OCI client level
  - added UTF-8 BOM to CSV or TXT exports
  - now direct-to-file fast export feature (into CSV, TXT, SQLite3,
    Synopse BigTable records or two JSON flavors)
  - now multi tables direct export into SQLite3 DB files (e.g. for support)
  - SQLite3 3.7.12.1 including (beta) private encryption methods

  Version 1.17
  - added Jet / MSAccess direct support (via OleDB provider)
  - now accepts a Jet / MSAccess database file as command line parameter
  - added ODBC providers direct support
  - added log history of SQL requests (in SynDBExplorer.history file)
  - SQLite3 engine updated to revision 3.7.13
  - changed .config file format from binary to JSON (with Base64+Zip if needed)

  Version 1.18
  - SQlite3 engine updated to revision 3.21.0
  - optimized grid content initialization speed and layout
  - will now initialize the REGEXP function for SQLite3 (for Delphi XE+)
  - added incremental text search in SQL history
  - added "Exec to Tab" button (accessible with Shift+F9 shortcut)

  first line of uses clause below must be {$I SynDprUses.inc} to enable FastMM4
  conditional define should contain INCLUDE_FTS3 to handle FTS3/FTS4 in SQLite3 
*)

uses
  {$I SynDprUses.inc}
  Forms,
  {$ifdef FPC}
  Interfaces,
  {$endif}
  SynDBExplorerMain in 'SynDBExplorerMain.pas' {DbExplorerMain},
  SynDBExplorerClasses in 'SynDBExplorerClasses.pas',
  SynDBExplorerFrame in 'SynDBExplorerFrame.pas' {DBExplorerFrame: TFrame},
  SynDBExplorerQueryBuilder in 'SynDBExplorerQueryBuilder.pas' {DBQueryBuilderForm},
  SynDBExplorerExportTables in 'SynDBExplorerExportTables.pas' {DBExportTablesForm},
  SynDBExplorerServer in 'SynDBExplorerServer.pas' {HTTPServerForm};

{$R *.res}

begin
  Application.Initialize;
  Application.CreateForm(TDbExplorerMain, DbExplorerMain);
  Application.CreateForm(THTTPServerForm, HTTPServerForm);
  Application.Run;
end.