From f1ae13770d4f0109ae4dcdcae0f9f560245f4d08 Mon Sep 17 00:00:00 2001
From: Ansgar Becker <ansgarbecker@users.noreply.github.com>
Date: Fri, 14 May 2010 22:37:53 +0000
Subject: [PATCH] Bugfix: After click on password generator button, user was
 not marked as modified.

---
 source/usermanager.pas | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/source/usermanager.pas b/source/usermanager.pas
index 823faccc..1146c8a8 100644
--- a/source/usermanager.pas
+++ b/source/usermanager.pas
@@ -588,7 +588,9 @@ procedure TUserManagerForm.editPasswordRightButtonClick(Sender: TObject);
 begin
   // Auto generate a random password, display it for a second and copy it to clipboard
   Screen.Cursor := crHourglass;
+  editPassword.SetFocus;
   editPassword.Text := GeneratePassword(8);
+  editPassword.Modified := True;
   editPassword.PasswordChar := #0;
   editPassword.Repaint;
   Sleep(1000);