Aus Delphi heraus Access-Datenbankfenster ausblenden

[jschade]

hi leute,

will einen accessbericht anzeigen lassen und damit die leute auf die schnelle nichts ändern können, will ich das datenbankfenster (und möglichst auch die menüleisten) ausblenden, wenn ich den bericht öffne.

wie kann ich das anstellen, weiß nicht wonach ich in der hilfe von access suchen soll, denn da finde ich nur die einstellungen, um menüleisten und datenbankfenster beim öffnen der access-db zu unterdrücken. allerdings wird dann mein bericht nicht mehr gefunden.

deshalb möchte ich diese sachen nach dem öffnen meines berichts

Code:

procedure TReports.Button1Click(Sender: TObject);
var Access: Variant;
begin
Access := CreateOleObject('Access.Application');
// Access anzeigen
Access.Visible := True;
// Gewünschte DB öffnen
Access.OpenCurrentDatabase(''+ExtractFilePath(Application.ExeName)+'\db.mdb', True);
// Anzeige der Druckvorschau
Access.DoCmd.OpenReport('Bericht', acViewPreview, EmptyParam, EmptyParam);
end;

ausblenden lassen?!

mfg jan

[jschade]

hey leute, keiner nen plan?