diff --git a/source/usermanager.pas b/source/usermanager.pas
index 54d7dc05..70248f98 100644
--- a/source/usermanager.pas
+++ b/source/usermanager.pas
@@ -1072,6 +1072,7 @@ begin
         Conn.Query('DELETE FROM mysql.user WHERE User='+esc(User.Username)+' AND Host='+esc(User.Host))
       else
         Conn.Query('DROP USER '+UserHost);
+      Conn.Query('FLUSH PRIVILEGES');
       FUsers.Remove(User^);
       listUsers.DeleteNode(listUsers.FocusedNode);
     except on E:EDatabaseError do