Can anyone tell me if paradox tables are the kind suitable for use with
previewmodal and previewmodeless. I am having problems using them.
Here is the code I wrote for running a report

procedure reportmenuitemOnclick1 (sender: TObject);
var
    reportform: TQuickReportForm;
    PreviewForm: TPreviewForm;
try
    reportmenuitem.enabled := False;

    reportform := TQuickReportForm.create(self); {a normal form containing
the quickreport}
    PreviewForm := TPreviewForm.create(self); {and mdi child containing my
own preview)
    reportform.UsePreview := PreviewForm; {a public property holdin which
preview to use}

    table1.open;
    reportform.Quickreport1.preview;

finally
    table1.close;
    reportmenuitem.enabled := true;
end;

end;

This procedure is not perfect at the moment, not sure if I have got it
right. The execution stops at th line where the preview is executed,
although I can still execute other menu comands, it is just that when I
close the preview form execytion will begin at the finally statement.

This can cause problems as whn I close the form that contins the menu
command and later close the preview form, execution begins at finally, the
table is closed, which is OK as it still exists but the menuitem no longer
does and an error occurs.

There has got to be a neater way, and I would also like to use
previewmodeless instead of preview which would mean rewriting the procedure.

Any help greatly appreciated, thanks in advance

n.b.

on my report form I have Quickreport1 with the procedure similar to

procedure Quickreport1OnPreview (QPrinter: TObject);
begin
    UsePreview.QPreview1.QPrinter := QPrinter;
    UsePreview.Show;
end;