delphi+access

[Doget]

такой вопрос есть база данных созданная на access, в базе данных реализован отчет, сам вопрос надо с дельфи вызвать этот отчет чтобы он открылся, ну тоесть вызов внешней программой отчета с accessa.

[edgy]

Попробуйте так:

implementation

const
  acViewNormal = $00000000;
  acViewDesign = $00000001;
  acViewPreview = $00000002;

  acQuitPrompt = $00000000;
  acQuitSaveAll = $00000001;
  acQuitSaveNone = $00000002;

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
var
  Access: Variant;
begin
  try
    Access := GetActiveOleObject('Access.Application');
  except
    Access := CreateOleObject('Access.Application');
  end;
  Access.Visible := True;
  Access.OpenCurrentDatabase('Указываем здесь путь до БД', True);
  Access.DoCmd.OpenReport('Указываем здесь имя отчета', acViewPreview, EmptyParam, EmptyParam);
//  Access.CloseCurrentDatabase;
//  Access.Quit( acQuitSaveAll );
end;

[edgy]

P.S. Да, и чуть совсем не забыл - пропишите ComObj в Uses.