Index: AAPClient/UI/LoginScherm.pas
===================================================================
diff -u -r8 -r9
--- AAPClient/UI/LoginScherm.pas	(.../LoginScherm.pas)	(revision 8)
+++ AAPClient/UI/LoginScherm.pas	(.../LoginScherm.pas)	(revision 9)
@@ -44,19 +44,20 @@
 var
   Service: GebruikerServiceSoap;
   Request: GebruikerAfmeldenRequest;
-  Response: GebruikerAfmeldenResponse;
+  Header: RequestHeader;
 begin
   inherited;
   Service := GebruikerService.GetGebruikerServiceSoap();
 
   Request := GebruikerAfmeldenRequest.Create;
+  Header := RequestHeader.Create;
   try
     Request.Initialen := edtInitialen.Text;
     Request.LoginCode := edtPincode.Text;
-    Request.Header.Initialen := edtInitialen.Text;
+    Header.Initialen := edtInitialen.Text;
+    Request.Header := Header;
 
-    Response := Service.GebruikerAfmelden(Request);
-    ShowMessage(Response.Header.Omschrijving);
+    Service.GebruikerAfmelden(Request);
   finally
     Request.Free;
   end;