Index: AAPClient/UI/LoginScherm2.pas
===================================================================
diff -u -r192 -r193
--- AAPClient/UI/LoginScherm2.pas	(.../LoginScherm2.pas)	(revision 192)
+++ AAPClient/UI/LoginScherm2.pas	(.../LoginScherm2.pas)	(revision 193)
@@ -43,7 +43,7 @@
 var
   Response: GebruikerAanmeldenResponse;
 begin
-  Response := fAgent.GebruikerAanmelden(edtInitialen.Text,edtPinCode.Text);
+  Response := TAgent.Create(UiContext).GebruikerAanmelden(edtInitialen.Text,edtPinCode.Text);
   try
     if Response.Header.Status <> '200' then begin
       Self.ModalResult := mrLogin;
@@ -95,7 +95,7 @@
 
 procedure TfmLoginScherm2.HuidigeGebruikerAfmelden;
 begin
-  fAgent.GebruikerAfmelden();
+  TAgent.Create(UiContext).GebruikerAfmelden();
 end;
 
 procedure TfmLoginScherm2.SetContext;