Index: UI/PR/GA/dlgTBSpoelbak.cls.xml =================================================================== diff -u -r1789 -r63569 --- UI/PR/GA/dlgTBSpoelbak.cls.xml (.../dlgTBSpoelbak.cls.xml) (revision 1789) +++ UI/PR/GA/dlgTBSpoelbak.cls.xml (.../dlgTBSpoelbak.cls.xml) (revision 63569) @@ -391,7 +391,7 @@ ; Font.Name = 'MS Sans Serif' ; Font.Style = [] ; OldCreateOrder = False - ; Position = poDesktopCenter + ; Position = poScreenCenter ; OnShow = DesignFormShow ; PixelsPerInch = 96 ; TextHeight = 13 @@ -730,7 +730,7 @@ s %this.txtSPZMI=##class(%TMEdit).%New($lb(%this.Form.Address,0)) s %this.txtSPBR2=##class(%TMEdit).%New($lb(%this.Form.Address,0)) s MApplication.ClientState="NoWait" - d %this.Form.SetMultiProperty($lb("Left","Top","Width","Height","BorderIcons","Caption","Color","OldCreateOrder","Position","OnShow","PixelsPerInch"),$lb(2,1,351,285,$lb("biSystemMenu"),"Tandem BOX - Opties",$$$clBtnFace,"False","poDesktopCenter",$lb(%this,"DesignFormShow"),96)) + d %this.Form.SetMultiProperty($lb("Left","Top","Width","Height","BorderIcons","Caption","Color","OldCreateOrder","Position","OnShow","PixelsPerInch"),$lb(2,1,351,285,$lb("biSystemMenu"),"Tandem BOX - Opties",$$$clBtnFace,"False","poScreenCenter",$lb(%this,"DesignFormShow"),96)) d %this.Form.Font.SetMultiProperty($lb("Charset","Color","Height","Name","Style"),$lb($$$DEFAULTCHARSET,$$$clWindowText,-11,"MS Sans Serif",$lb())) d %this.zzLabel1.SetMultiProperty($lb("Left","Top","Width","Height","AutoSize","Caption","Layout"),$lb(19,46,122,21,"False","Spoelbak zijkant Links","tlCenter")) d %this.zzLabel3.SetMultiProperty($lb("Left","Top","Width","Height","AutoSize","Caption","Layout"),$lb(19,142,122,21,"False","Spoelbak zijkant Rechts","tlCenter"))