Index: AAPClient/UI/LoginScherm.pas
===================================================================
diff -u -r1 -r3
--- AAPClient/UI/LoginScherm.pas	(.../LoginScherm.pas)	(revision 1)
+++ AAPClient/UI/LoginScherm.pas	(.../LoginScherm.pas)	(revision 3)
@@ -17,6 +17,7 @@
     edtInitialen: TEdit;
     procedure FormCreate(Sender: TObject);
     procedure edtInitialenKeyPress(Sender: TObject; var Key: Char);
+    procedure btnLinksOnderClick(Sender: TObject);
   private
     { Private declarations }
   public
@@ -30,6 +31,12 @@
 
 {$R *.dfm}
 
+procedure TfmLoginScherm.btnLinksOnderClick(Sender: TObject);
+begin
+  inherited;
+  Application.Terminate;
+end;
+
 procedure TfmLoginScherm.edtInitialenKeyPress(Sender: TObject; var Key: Char);
 begin
   inherited;