请问如何在Delphi中调用Access的Report

Question

Access做的Report需要移植到Delphi中,如果想偷偷懒,
直接调用Access里的Report,用如下代码可以做到
    AccessApplication1.Connect;
  AccessApplication1.OpenCurrentDatabase('C:\db1.mdb',
True);
  AccessApplication1.DoCmd.OpenReport('Report1', acViewPreview,
EmptyParam, EmptyParam);
  AccessReport1.ConnectTo(AccessApplication1.Reports['Report1']);
  AccessReport1.Caption := 'Annual sales - from bad to worse';
  ...但这样会打开一个新的Access窗口并且在用户关闭该Report后不会自动关闭
请问如何在Delphi的界面中直接调用该打印预览窗口?

Answer 1

formStyle =  fsstayOntop