Index: ProScan/ProScanMain.pas
===================================================================
diff -u -r537 -r684
--- ProScan/ProScanMain.pas	(.../ProScanMain.pas)	(revision 537)
+++ ProScan/ProScanMain.pas	(.../ProScanMain.pas)	(revision 684)
@@ -44,15 +44,14 @@
   var Action: TCloseAction);
 begin
   HuidigeGebruikerAfmelden();
+  fUiContext.Free;
 end;
 
 procedure TfmProScanHoofdscherm.FormCreate(Sender: TObject);
 begin
   fUiContext := TUiContext.Create();
   fUiContext.ImagesScherm := TImagesScherm.Create(self);
   fUiContext.Modus := modusDefault;
-  fUiContext.LaatstAfgemeldeDnaCodesStringList := TStringList.Create();
-  fUiContext.AfTeDrukkenDnaCodesStringList := TStringList.Create();
 
   VerwerkParamStrings;
 end;
@@ -78,7 +77,7 @@
   end;
 
   if UiContext.ServerName = '' then
-    UiContext.ServerName := 'tve-w10';
+    UiContext.ServerName := 'jlm-ws020';
 
 end;