Error nach Drop-Database Funktion

[DelphiSüchtig]

Hallo zusammen,

neuerdings tritt ein Fehler auf bei folgender Funktion:

Code:

///
/// if existing delete, we want a new Database !
///
if DatabaseExists(ServerName, DatabaseName) then
begin
  self.DropDatabase;
end;

Dabei wird einfach geprüft, ob eine Datenbank existiert und in der Funktion DropDatabase wird die Datenbank dann eben gedropped. Das ganze wird (oder sollte) über mehrere Tests mit der selben Datenbank ausgeführt.
Die Errormessage lautet dann nun wie folgt: Cannot drop database because it is currently in use!

Warum bekomme ich nun diese Errormessage? Was muss vor dem Droppen einer Datenbank passieren dass es keinen Fehler auswirft?

Vielen Dank für eure Antworten!

[zeras]

Die Meldung sagt, dass die Datenbank noch in Benutzung ist.
Kannst du diese nicht vorher schliessen mit einem Befehl?

[hoika]

Hallo,

neuerdings

Was wurde denn geändert?
Welche Art von DB?
Welche Zugriffskomponenten benutzt Du?
Wie sieht DatabaseExists?
Warum einmal DatabaseExists mit Angabe der DB, und einmal Self.DropDatabase ohne den Namen?

So, 5/5 Fragen gestellt, reicht ...