Index: ProScan/ProScanMain.pas
===================================================================
diff -u -r480 -r485
--- ProScan/ProScanMain.pas	(.../ProScanMain.pas)	(revision 480)
+++ ProScan/ProScanMain.pas	(.../ProScanMain.pas)	(revision 485)
@@ -17,6 +17,7 @@
     fUiContext: TUiContext;
     fHuidigScherm: TForm;
     procedure HuidigeGebruikerAfmelden;
+    procedure VerwerkParamStrings;
   public
     property UiContext: TUiContext read fUiContext;
     procedure NavigeerNaar(mr: TModalResult);
@@ -51,10 +52,15 @@
   fUiContext.ImagesScherm := TImagesScherm.Create(self);
   fUiContext.Modus := modusDefault;
 
+  VerwerkParamStrings;
+end;
+
+procedure TfmProScanHoofdscherm.VerwerkParamStrings;
+begin
   if ParamStr(1)='displaymode=desktop' then begin
     Self.BorderStyle := bsSingle;
-    Self.ClientHeight := 640;
-    Self.ClientWidth := 480;
+    Self.ClientHeight := 1000;//640;
+    Self.ClientWidth := 600;//480;
   end;
   if ParamStr(2) <> '' then
     UiContext.ServerName := Copy(ParamStr(2),Pos('=',ParamStr(2))+1,length(ParamStr(2)))