unit QuickOpenMain;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, DB, uDADataTable, uDACDSDataTable, uDAEngine, uDAADODriver,
  uDAClasses, uDADriverManager, uDABINAdapter, Grids, DBGrids, StdCtrls,
  uDAScriptingProvider, uDADataStreamer;

type
  TQuickOpenMainForm = class(TForm)
    DADriverManager1: TDADriverManager;
    DAADODriver1: TDAADODriver;
    DataTable: TDACDSDataTable;
    dsCustomers: TDADataSource;
    DAConnectionManager1: TDAConnectionManager;
    OpenButton: TButton;
    DBGrid1: TDBGrid;
    DABINAdapter: TDABinDataStreamer;
    DASchema1: TDASchema;
    procedure OpenButtonClick(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  QuickOpenMainForm: TQuickOpenMainForm;

implementation

{$R *.dfm}

procedure TQuickOpenMainForm.OpenButtonClick(Sender: TObject);
begin
   DataTable.Open;
end;

end.