Index: CHUI/Derde/EC/Logging/dlgStatSettings.cls.xml =================================================================== diff -u -r1074 -r2578 --- CHUI/Derde/EC/Logging/dlgStatSettings.cls.xml (.../dlgStatSettings.cls.xml) (revision 1074) +++ CHUI/Derde/EC/Logging/dlgStatSettings.cls.xml (.../dlgStatSettings.cls.xml) (revision 2578) @@ -2,8 +2,7 @@ 1 -%CHUI.TForm -0 +TCHUI.TForm -%CHUI.TLabel +TCHUI.TLabel -%CHUI.TLabel +TCHUI.TLabel -%CHUI.TLabel +TCHUI.TLabel @@ -36,7 +35,7 @@ -%CHUI.TKader +TCHUI.TKader @@ -47,35 +46,35 @@ -%CHUI.TCheckBox +TCHUI.TCheckBox -%CHUI.TCheckBox +TCHUI.TCheckBox -%CHUI.TCheckBox +TCHUI.TCheckBox -%CHUI.TCheckBox +TCHUI.TCheckBox -%CHUI.TCheckBox +TCHUI.TCheckBox -%CHUI.TCheckBox +TCHUI.TCheckBox -%CHUI.TCheckBox +TCHUI.TCheckBox -%CHUI.TCheckBox +TCHUI.TCheckBox @@ -86,11 +85,11 @@ -%CHUI.TButton +TCHUI.TButton -%CHUI.TButton +TCHUI.TButton @@ -101,7 +100,7 @@ -%CHUI.TLijn +TCHUI.TLijn @@ -116,41 +115,41 @@ Do ..Center() //Labels - Do ##class(%CHUI.TLabel).CreateSet(%this,"lblGroepering","Groepering",3,3,,,$$$alLeft,,,$LB(,,$$$fsNoUnderline)) - Do ##class(%CHUI.TLabel).CreateSet(%this,"lblUser","Gebruiker",8,3,,,$$$alLeft,,,$LB(,,$$$fsNoUnderline)) - Do ##class(%CHUI.TLabel).CreateSet(%this,"lblFilter","Filter",12,3,,,$$$alLeft,,,$LB(,,$$$fsNoUnderline)) + Do ##class(TCHUI.TLabel).CreateSet(%this,"lblGroepering","Groepering",3,3,,,$$$alLeft,,,$LB(,,$$$fsNoUnderline)) + Do ##class(TCHUI.TLabel).CreateSet(%this,"lblUser","Gebruiker",8,3,,,$$$alLeft,,,$LB(,,$$$fsNoUnderline)) + Do ##class(TCHUI.TLabel).CreateSet(%this,"lblFilter","Filter",12,3,,,$$$alLeft,,,$LB(,,$$$fsNoUnderline)) //Kaders - Do ##class(%CHUI.TKader).CreateSet(%this,"kdrMain","",1,1,..Height,..Width,10,,,) + Do ##class(TCHUI.TKader).CreateSet(%this,"kdrMain","",1,1,..Height,..Width,10,,,) Set ..kdrMain.Fill=0 Set ..CaptionControl=..kdrMain //CheckBoxs - Do ##class(%CHUI.TCheckBox).CreateSet(%this,"chkRequests","Requests",3,15,,12) + Do ##class(TCHUI.TCheckBox).CreateSet(%this,"chkRequests","Requests",3,15,,12) Set ..chkRequests.Checked=0 - Do ##class(%CHUI.TCheckBox).CreateSet(%this,"chkSessions","Sessions",4,15,,12) + Do ##class(TCHUI.TCheckBox).CreateSet(%this,"chkSessions","Sessions",4,15,,12) Set ..chkSessions.Checked=0 - Do ##class(%CHUI.TCheckBox).CreateSet(%this,"chkUsers","Gebruikers",5,15,,14) + Do ##class(TCHUI.TCheckBox).CreateSet(%this,"chkUsers","Gebruikers",5,15,,14) Set ..chkUsers.Checked=0 - Do ##class(%CHUI.TCheckBox).CreateSet(%this,"chkGVOs","Goed voor order",6,15,,19) + Do ##class(TCHUI.TCheckBox).CreateSet(%this,"chkGVOs","Goed voor order",6,15,,19) Set ..chkGVOs.Checked=0 - Do ##class(%CHUI.TCheckBox).CreateSet(%this,"chkUserKlanten","Klanten",8,15,,9) + Do ##class(TCHUI.TCheckBox).CreateSet(%this,"chkUserKlanten","Klanten",8,15,,9) Set ..chkUserKlanten.Checked=0 - Do ##class(%CHUI.TCheckBox).CreateSet(%this,"chkUserVTWs","Vertegenwoordigers",9,15,,22) + Do ##class(TCHUI.TCheckBox).CreateSet(%this,"chkUserVTWs","Vertegenwoordigers",9,15,,22) Set ..chkUserVTWs.Checked=0 - Do ##class(%CHUI.TCheckBox).CreateSet(%this,"chkUserIntern","Intern (lokaal IP)",10,15,,22) + Do ##class(TCHUI.TCheckBox).CreateSet(%this,"chkUserIntern","Intern (lokaal IP)",10,15,,22) Set ..chkUserIntern.Checked=0 - Do ##class(%CHUI.TCheckBox).CreateSet(%this,"chkFilterToegang","Toegang",12,15,,9) + Do ##class(TCHUI.TCheckBox).CreateSet(%this,"chkFilterToegang","Toegang",12,15,,9) Set ..chkFilterToegang.Checked=0 //Buttons - Do ##class(%CHUI.TButton).CreateSet(%this,"btnOk","Ok",14,19,,8,,,,,$$$alCenter) + Do ##class(TCHUI.TButton).CreateSet(%this,"btnOk","Ok",14,19,,8,,,,,$$$alCenter) Set ..btnOk.ModalResult=$$$mrOk - Do ##class(%CHUI.TButton).CreateSet(%this,"btnCancel","Cancel",14,28,,8,,,,,$$$alCenter) + Do ##class(TCHUI.TButton).CreateSet(%this,"btnCancel","Cancel",14,28,,8,,,,,$$$alCenter) Set ..btnCancel.ModalResult=$$$mrCancel //Lines - Set ..lnBottom=##class(%CHUI.TLijn).CreateLijn($$$loHorizontal,%this,"lnBottom",..Height-2,3,..Width-4) + Set ..lnBottom=##class(TCHUI.TLijn).CreateLijn($$$loHorizontal,%this,"lnBottom",..Height-2,3,..Width-4) Do ..SetTabAndPaintOrder(..chkRequests,..chkSessions,..chkUsers,..chkGVOs,..chkUserKlanten,..chkUserVTWs,..chkUserIntern,..chkFilterToegang,..btnOk,..btnCancel) ]]>