var pas={$libimports:{}},rtl={version:30301,quiet:!1,debug_load_units:!1,debug_rtti:!1,$res:{},debug:function(){!rtl.quiet&&console&&console.log&&console.log(arguments)},error:function(t){throw rtl.debug("Error: ",t),t},warn:function(t){rtl.debug("Warn: ",t)},checkVersion:function(t){if(rtl.version!=t)throw"expected rtl version "+t+", but found "+rtl.version},hiInt:Math.pow(2,53),hasString:function(t){return rtl.isString(t)&&t.length>0},isArray:function(t){return Array.isArray(t)},isFunction:function(t){return"function"==typeof t},isModule:function(t){return rtl.isObject(t)&&rtl.hasString(t.$name)&&pas[t.$name]===t},isImplementation:function(t){return rtl.isObject(t)&&rtl.isModule(t.$module)&&t.$module.$impl===t},isNumber:function(t){return"number"==typeof t},isObject:function(t){return"object"==typeof t&&null!=t},isString:function(t){return"string"==typeof t},getNumber:function(t){return"number"==typeof t?t:NaN},getChar:function(t){return"string"==typeof t&&1===t.length?t:""},getObject:function(t){return"object"==typeof t||"function"==typeof t?t:null},isTRecord:function(t){return rtl.isObject(t)&&t.hasOwnProperty("$new")&&"function"==typeof t.$new},isPasClass:function(t){return rtl.isObject(t)&&t.hasOwnProperty("$classname")&&rtl.isObject(t.$module)},isPasClassInstance:function(t){return rtl.isObject(t)&&rtl.isPasClass(t.$class)},hexStr:function(t,e){return("000000000000000"+t.toString(16).toUpperCase()).slice(-e)},m_loading:0,m_loading_intf:1,m_intf_loaded:2,m_loading_impl:3,m_initializing:4,m_initialized:5,module:function(t,e,i,s){var n=pas[t];n?n.$intfcode=i:rtl.modulenew(t,e,i,s)},modulenew:function(t,e,i,s){rtl.debug_load_units&&rtl.debug('rtl.module name="'+t+'" intfuses='+e+" impluses="+s),rtl.hasString(t)||rtl.error('invalid module name "'+t+'"'),rtl.isArray(e)||rtl.error('invalid interface useslist of "'+t+'"'),rtl.isFunction(i)||rtl.error('invalid interface code of "'+t+'"'),null==s||rtl.isArray(s)||rtl.error('invalid implementation useslist of "'+t+'"'),pas[t]&&rtl.error('module "'+t+'" is already registered');var n=Object.create(rtl.tSectionRTTI),r=n.$module=pas[t]={$name:t,$intfuseslist:e,$impluseslist:s,$state:rtl.m_loading,$intfcode:i,$implcode:null,$impl:null,$rtti:n};s&&(r.$impl={$module:r,$rtti:n})},exitcode:0,run:function(t){try{rtl.hasString(t)||(t="program"),rtl.debug_load_units&&rtl.debug('rtl.run module="'+t+'"'),rtl.initRTTI();var e=pas[t];if(e||rtl.error('rtl.run module "'+t+'" missing'),rtl.loadintf(e),rtl.loadimpl(e),"program"==t||"library"==t){rtl.debug_load_units&&rtl.debug("running $main");var i=pas[t].$main();rtl.isNumber(i)&&(rtl.exitcode=i)}}catch(t){if(!rtl.showUncaughtExceptions)throw t;rtl.handleUncaughtException(t)||(rtl.showException(t),rtl.exitcode=216)}return rtl.exitcode},showException:function(t){var e="";e=rtl.isObject(t)&&t.hasOwnProperty("FJSError")&&rtl.isObject(t.FJSError)&&null!=t.FJSError.stack?t.FJSError.stack:rtl.isObject(t)&&t.hasOwnProperty("stack")&&null!=t.stack?t.stack:t;var i=rtl.hasString(t.$classname)?t.$classname:"";i+=(i?": ":"")+(t.hasOwnProperty("fMessage")?t.fMessage:""),i="Uncaught Exception:\n"+(i+=(i?"\n":"")+e),console.log(i),alert(i)},handleUncaughtException:function(t){if(!rtl.onUncaughtException)return!1;try{return rtl.onUncaughtException(t),!0}catch(t){return!1}},loadintf:function(t){t.$state>rtl.m_loading_intf||(rtl.debug_load_units&&rtl.debug('loadintf: "'+t.$name+'"'),t.$state===rtl.m_loading_intf&&rtl.error('unit cycle detected "'+t.$name+'"'),t.$state=rtl.m_loading_intf,rtl.loaduseslist(t,t.$intfuseslist,rtl.loadintf),rtl.debug_load_units&&rtl.debug('loadintf: run intf of "'+t.$name+'"'),t.$intfcode(t.$intfuseslist),t.$state=rtl.m_intf_loaded)},loaduseslist:function(t,e,i){if(null!=e)for(var s=e.length,n=0;n<s;n++){var r=e[n];rtl.debug_load_units&&rtl.debug('loaduseslist of "'+t.$name+'" uses="'+r+'"'),null==pas[r]&&rtl.error('module "'+t.$name+'" misses "'+r+'"'),i(pas[r])}},loadimpl:function(t){t.$state>=rtl.m_loading_impl||(t.$state<rtl.m_intf_loaded&&rtl.error('loadimpl: interface not loaded of "'+t.$name+'"'),rtl.debug_load_units&&rtl.debug('loadimpl: load uses of "'+t.$name+'"'),t.$state=rtl.m_loading_impl,rtl.loaduseslist(t,t.$impluseslist,rtl.loadintf),rtl.loaduseslist(t,t.$intfuseslist,rtl.loadimpl),rtl.loaduseslist(t,t.$impluseslist,rtl.loadimpl),rtl.debug_load_units&&rtl.debug('loadimpl: run impl of "'+t.$name+'"'),rtl.isFunction(t.$implcode)&&t.$implcode(t.$impluseslist),rtl.debug_load_units&&rtl.debug('loadimpl: run init of "'+t.$name+'"'),t.$state=rtl.m_initializing,rtl.isFunction(t.$init)&&t.$init(),t.$state=rtl.m_initialized)},createCallback:function(t,e){var i;if("string"==typeof e){if(t.hasOwnProperty("$events")||(t.$events={}),i=t.$events[e])return i;t.$events[e]=i=function(){return t[e].apply(t,arguments)}}else i=function(){return e.apply(t,arguments)};return i.scope=t,i.fn=e,i},createSafeCallback:function(t,e){var i;if("string"==typeof e){if(!t[e])return null;if(t.hasOwnProperty("$events")||(t.$events={}),i=t.$events[e])return i;t.$events[e]=i=function(){try{return t[e].apply(t,arguments)}catch(t){if(!rtl.handleUncaughtException(t))throw t}}}else{if(!e)return null;i=function(){try{return e.apply(t,arguments)}catch(t){if(!rtl.handleUncaughtException(t))throw t}}}return i.scope=t,i.fn=e,i},eqCallback:function(t,e){return t===e||null!=t&&null!=e&&t.fn&&t.scope===e.scope&&t.fn===e.fn},initStruct:function(t,e,i){return e.$module&&e.$module.$impl===e&&(e=e.$module),t.$parent=e,rtl.isModule(e)?(t.$module=e,t.$name=i):(t.$module=e.$module,t.$name=e.$name+"."+i),e},initClass:function(t,e,i,s,n){e[i]=t,t.$class=t,t.$classname=n||i,e=rtl.initStruct(t,e,i),t.$fullname=e.$name+"."+i,rtl.debug_rtti&&rtl.debug("initClass "+t.$fullname);var r=t.$module.$rtti.$Class(t.$classname,{class:t});t.$rtti=r,rtl.isObject(t.$ancestor)&&(r.ancestor=t.$ancestor.$rtti),r.ancestor||(r.ancestor=null),s.call(t)},createClass:function(t,e,i,s,n){var r=t[e];if(r)return rtl.initClass(r,t,e,s,n),r;var a=null;null!=i?(a=Object.create(i)).$ancestor=i:((a={$ancestor:null}).$create=function(t,e){null==e&&(e=[]);var i=Object.create(this);i.$init();try{"string"==typeof t?i[t].apply(i,e):t.apply(i,e),i.AfterConstruction()}catch(t){throw i.Destroy&&i.Destroy(),i.$final(),t}return i},a.$destroy=function(t){this.BeforeDestruction(),this[t]&&this[t](),this.$final()}),rtl.initClass(a,t,e,s,n)},createClassExt:function(t,e,i,s,n,r){var a=t[e];if(a)return rtl.initClass(a,t,e,n,r),a;var o=rtl.isFunction(i),l=null;if(o?((l=Object.create(i.prototype)).$ancestorfunc=i,l.$ancestor=null):i.$func?(o=!0,(l=Object.create(i)).$ancestor=i):(l=Object.create(i)).$ancestor=null,l.$create=function(t,e){null==e&&(e=[]);var i=null;(i=s.length>0?this[s](t,e):o?new this.$func(e):Object.create(l)).$init&&i.$init();try{"string"==typeof t?this[t].apply(i,e):t.apply(i,e),i.AfterConstruction&&i.AfterConstruction()}catch(t){throw i.Destroy&&i.Destroy(),i.$final&&i.$final(),t}return i},l.$destroy=function(t){this.BeforeDestruction&&this.BeforeDestruction(),this[t]&&this[t](),this.$final&&this.$final()},rtl.initClass(l,t,e,n,r),o){function h(){}h.prototype=l,l.$func=h}},createHelper:function(t,e,i,s,n){var r=t[e];if(r)return s.call(r),r;var a=null;null!=i?(a=Object.create(i)).$ancestor=i:a={$ancestor:null},t[e]=a,a.$class=a,a.$classname=n||e,t=rtl.initStruct(a,t,e),a.$fullname=t.$name+"."+e;var o=a.$module.$rtti.$Helper(a.$classname,{helper:a});a.$rtti=o,rtl.isObject(i)&&(o.ancestor=i.$rtti),o.ancestor||(o.ancestor=null),s.call(a)},tObjectDestroy:"Destroy",free:function(t,e){if(null==t[e])return null;t[e].$destroy(rtl.tObjectDestroy),t[e]=null},freeLoc:function(t){return null==t||t.$destroy(rtl.tObjectDestroy),null},hideProp:function(t,e,i){Object.defineProperty(t,e,{enumerable:!1,configurable:!0,writable:!0}),arguments.length>2&&(t[e]=i)},recNewT:function(t,e,i,s){if(t){var n=t[e];if(n)return i.call(n),n}var r={};t&&(t[e]=r);var a=rtl.hideProp;return s&&(rtl.initStruct(r,t,e),r.$record=r,a(r,"$record"),a(r,"$name"),a(r,"$parent"),a(r,"$module"),a(r,"$initSpec")),i.call(r),r.$new||(r.$new=function(){return Object.create(r)}),r.$clone=function(t){return r.$new().$assign(t)},a(r,"$new"),a(r,"$clone"),a(r,"$eq"),a(r,"$assign"),r},is:function(t,e){return e.isPrototypeOf(t)||t===e},isExt:function(t,e,i){return null!=t&&(("object"==typeof e||"function"==typeof e)&&(t===e?1!==i&&(2!==i||rtl.isPasClass(t)):e.isPrototypeOf&&e.isPrototypeOf(t)?1===i?rtl.isPasClassInstance(t):2!==i||rtl.isPasClass(t):"function"==typeof e&&t instanceof e))},Exception:null,EInvalidCast:null,EAbstractError:null,ERangeError:null,EIntOverflow:null,EPropWriteOnly:null,raiseE:function(t){var e=rtl[t];if(null==e){var i=pas.SysUtils;i||(i=pas.sysutils),i||(i=pas["System.SysUtils"]),i&&((e=i[t])||(e=i[t.toLowerCase()]),e||(e=i.Exception),e||(e=i.exception)),e&&(rtl[t]=e)}if(e){if(e.Create)var s=e.$create("Create");else if(e.create)s=e.$create("create");if(s)throw s.FJSError=new Error,s}if("EInvalidCast"===t)throw new Error("invalid type cast");if("EAbstractError"===t)throw new Error("Abstract method called");if("ERangeError"===t)throw new Error("range error");throw t},as:function(t,e){if(null===t||rtl.is(t,e))return t;rtl.raiseE("EInvalidCast")},asExt:function(t,e,i){if(null===t||rtl.isExt(t,e,i))return t;rtl.raiseE("EInvalidCast")},createInterface:function(t,e,i,s,n,r,a){var o=t[e];if(o)return rtl.isFunction(r)&&r.call(o),o;var l=n?Object.create(n):{};if(t[e]=l,l.$module=t,l.$name=a||e,l.$fullname=t.$name+"."+l.$name,l.$guid=i,l.$guidr=null,l.$names=s||[],rtl.isFunction(r)){rtl.debug_rtti&&rtl.debug("createInterface "+l.$fullname);var h=l.$module.$rtti.$Interface(l.$name,{interface:l,module:t});l.$rtti=h,n&&(h.ancestor=n.$rtti),h.ancestor||(h.ancestor=null),r.call(l)}return l},strToGUIDR:function(t,e){var i=0;function s(e){var s=t.substr(i,e);return i+=e,parseInt(s,16)}i+=1,e.D1=s(8),i+=1,e.D2=s(4),i+=1,e.D3=s(4),i+=1,e.D4||(e.D4=[]),e.D4[0]=s(2),e.D4[1]=s(2),i+=1;for(var n=2;n<8;n++)e.D4[n]=s(2);return e},guidrToStr:function(t){if(t.$intf)return t.$intf.$guid;for(var e=rtl.hexStr,i="{"+e(t.D1,8)+"-"+e(t.D2,4)+"-"+e(t.D3,4)+"-"+e(t.D4[0],2)+e(t.D4[1],2)+"-",s=2;s<8;s++)i+=e(t.D4[s],2);return i+="}"},createTGUID:function(t){var e=pas.System?pas.System.TGuid:pas.system.tguid;return rtl.strToGUIDR(t,e.$new())},getIntfGUIDR:function(t){if(!t)return null;if(!t.$guidr){var e=rtl.createTGUID(t.$guid);t.hasOwnProperty("$guid")||(t=Object.getPrototypeOf(t)),e.$intf=t,t.$guidr=e}return t.$guidr},addIntf:function(t,e,i){function s(t){return"function"==typeof t?function(){return t.apply(this.$o,arguments)}:function(){rtl.raiseE("EAbstractError")}}i||(i={});var n=e,r=Object.create(n);t.hasOwnProperty("$intfmaps")||(t.$intfmaps={}),t.$intfmaps[e.$guid]=r;do{var a=n.$names;if(!a)break;for(var o=0;o<a.length;o++){var l=a[o],h=i[l];h||(h=l),r[l]=s(t[h])}n=Object.getPrototypeOf(n)}while(null!=n)},getIntfG:function(t,e,i){if(!t)return null;var s=t.$intfmaps;if(!s)return null;var n=s[e];if(!n)return null;if("function"==typeof n)return n.call(t);var r=null;if(t.$interfaces&&(r=t.$interfaces[e]),r||((r=Object.create(n)).$o=t,t.$interfaces||(t.$interfaces={}),t.$interfaces[e]=r),"object"==typeof i){var a=null;return 0===r.QueryInterface(rtl.getIntfGUIDR(i),{get:function(){return a},set:function(t){a=t}})?a:null}return 2===i&&"com"===r.$kind&&r._AddRef(),r},getIntfT:function(t,e){return rtl.getIntfG(t,e.$guid)},queryIntfT:function(t,e){return rtl.getIntfG(t,e.$guid,e)},queryIntfIsT:function(t,e){var i=rtl.getIntfG(t,e.$guid);return!!i&&("com"===i.$kind&&i._Release(),!0)},asIntfT:function(t,e){var i=rtl.getIntfG(t,e.$guid);if(null!==i)return i;rtl.raiseEInvalidCast()},intfIsIntfT:function(t,e){return null!==t&&rtl.queryIntfIsT(t.$o,e)},intfAsIntfT:function(t,e){if(!t)return null;var i=rtl.getIntfG(t.$o,e.$guid);if(i)return i;rtl.raiseEInvalidCast()},intfIsClass:function(t,e){return null!=t&&rtl.is(t.$o,e)},intfAsClass:function(t,e){return null==t?null:rtl.as(t.$o,e)},intfToClass:function(t,e){return null!==t&&rtl.is(t.$o,e)?t.$o:null},intfRefs:{ref:function(t,e){var i=this[t];return i&&(delete this[t],i._Release()),e&&(this[t]=e),e},free:function(){for(var t in this)if(this.hasOwnProperty(t)){var e=this[t];e&&e._Release()}}},createIntfRefs:function(){return Object.create(rtl.intfRefs)},setIntfP:function(t,e,i,s){var n=t[e];n!==i&&(null!==n&&(t[e]=null,n._Release()),null!==i&&(s||i._AddRef(),t[e]=i))},setIntfL:function(t,e,i){return t!==e?(null!==e&&(i||e._AddRef()),null!==t&&t._Release()):i&&null!==t&&t._Release(),e},_AddRef:function(t){return t&&t._AddRef(),t},_Release:function(t){return t&&t._Release(),t},trunc:function(t){return t<0?Math.ceil(t):Math.floor(t)},checkMethodCall:function(t,e){rtl.isObject(t)&&rtl.is(t,e)||rtl.raiseE("EInvalidCast")},oc:function(t){if(Math.floor(t)===t&&t>=-9007199254740991&&t<=9007199254740991)return t;rtl.raiseE("EIntOverflow")},rc:function(t,e,i){if(Math.floor(t)===t&&t>=e&&t<=i)return t;rtl.raiseE("ERangeError")},rcc:function(t,e,i){if("string"==typeof t&&1===t.length){var s=t.charCodeAt(0);if(s>=e&&s<=i)return t}rtl.raiseE("ERangeError")},rcSetCharAt:function(t,e,i){return("string"!=typeof t||e<0||e>=t.length)&&rtl.raiseE("ERangeError"),rtl.setCharAt(t,e,i)},rcCharAt:function(t,e){return("string"!=typeof t||e<0||e>=t.length)&&rtl.raiseE("ERangeError"),t.charAt(e)},rcArrR:function(t,e){if(Array.isArray(t)&&"number"==typeof e&&e>=0&&e<t.length){if(arguments.length>2){t=t[e];for(var i=2;i<arguments.length;i++)t=rtl.rcArrR(t,arguments[i]);return t}return t[e]}rtl.raiseE("ERangeError")},rcArrW:function(t,e,i){for(var s=3;s<arguments.length;s++)t=rtl.rcArrR(t,e),e=arguments[s-1],i=arguments[s];if(Array.isArray(t)&&"number"==typeof e&&e>=0&&e<t.length)return t[e]=i;rtl.raiseE("ERangeError")},length:function(t){return null==t?0:t.length},arrayRef:function(t){return null!=t&&rtl.hideProp(t,"$pas2jsrefcnt",2),t},arrayManaged:function(t,e,i){if(i||(i=[]),i.$pas2jsrefcnt=t||0,i._AddRef=function(){this.$pas2jsrefcnt++},i._Release=function(){if(this.$pas2jsrefcnt--,0==this.$pas2jsrefcnt)for(var t=0;t<this.length;t++)rtl.setIntfP(this,t,null)},e>0)for(var s=0;s<i.length;s++)2===e?rtl._AddRef(i[s]):i[s]=null;return i},arraySetLength:function(t,e,i){for(var s=[],n=9999,r=2;r<arguments.length;r++){var a=arguments[r];"s"===a?n=r-2:s.push({dim:a+0,a:null,i:0,src:null})}var o=s.length-1,l=0,h=0,d=null,u=null,c=t,F=0,p=0,S=0,m=!1;for(rtl.isArray(e)?S=1:rtl.isObject(e)?S=rtl.isTRecord(e)?2:3:"R"==e&&(S=4,m=!0);;){if(l>0&&(c=(d=s[l-1]).src&&d.src.length>d.i?d.src[d.i]:null),c?c.$pas2jsrefcnt>1||l>=n?(m?(u=rtl.arrayManaged(1),c.$pas2jsrefcnt--):u=[],p=F=c.length):(F=0,p=(u=c).length):(u=m?rtl.arrayManaged(1):[],F=0,p=0),h=s[l].dim,m)if(u.length>=h){for(r=u.length-1;r>=h;r--)rtl.setIntfP(u,r,null);u.length=h}else{var C=u.length;u.length=h;for(r=C;r<h;r++)u[r]=null;p=h}else u.length=h;if(!(l>0&&(d.a[d.i]=u,d.i++,0===h&&d.i<d.a.length))){if(h>0){if(l<o){(d=s[l]).a=u,d.i=0,d.src=c,l++;continue}if(F>h&&(F=h),0==S){for(r=0;r<F;r++)u[r]=c[r];for(r=p;r<h;r++)u[r]=e}else if(1==S){for(r=0;r<F;r++)u[r]=c[r];for(r=p;r<h;r++)u[r]=[]}else if(2==S){for(r=0;r<F;r++)u[r]=e.$clone(c[r]);for(r=p;r<h;r++)u[r]=e.$new()}else if(3==S){for(r=0;r<F;r++)u[r]=rtl.refSet(c[r]);for(r=p;r<h;r++)u[r]={}}else if(4==S){for(r=0;r<F;r++)rtl.setIntfP(u,r,c[r]);for(r=p;r<h;r++)u[r]=null}}for(;l>0&&s[l-1].i>=s[l-1].dim;)l--;if(0===l)return 0===o?u:s[0].a}}},arrayEq:function(t,e){if(null===t)return null===e;if(null===e)return!1;if(t.length!==e.length)return!1;for(var i=0;i<t.length;i++)if(t[i]!==e[i])return!1;return!0},arrayClone:function(t,e,i,s,n,r){if("refSet"===t)for(;i<s;i++)n[r++]=rtl.refSet(e[i]);else if("slice"===t)for(;i<s;i++)n[r++]=e[i].slice(0);else if("function"==typeof t)for(;i<s;i++)n[r++]=t(e[i]);else if(rtl.isTRecord(t))for(;i<s;i++)n[r++]=t.$clone(e[i]);else if("R"===t)for(;i<s;i++)n[r++]=rtl._AddRef(e[i]);else for(;i<s;i++)n[r++]=e[i]},arrayConcat:function(t){for(var e=[],i=0,s=1;s<arguments.length;s++){null!==(n=arguments[s])&&(i+=n.length)}e.length=i,"R"===t&&rtl.arrayManaged(1,1,e),i=0;for(s=1;s<arguments.length;s++){var n;null!==(n=arguments[s])&&(rtl.arrayClone(t,n,0,n.length,e,i),i+=n.length)}return e},arrayConcatN:function(){for(var t=null,e=0;e<arguments.length;e++){var i=arguments[e];if(null!==i)if(null===t)t=rtl.arrayRef(i);else if(t.$pas2jsrefcnt>1)t=t.concat(i);else for(e=0;e<i.length;e++)t.push(i[e])}return t},arrayPush:function(t,e){return null===e?e="R"===t?rtl.arrayManaged(1):[]:e.$pas2jsrefcnt>1&&(e=rtl.arrayCopy(t,e,0,e.length)),rtl.arrayClone(t,arguments,2,arguments.length,e,e.length),e},arrayPushN:function(t){null===t?t=[]:t.$pas2jsrefcnt>1&&(t=t.concat());for(var e=1;e<arguments.length;e++)t.push(arguments[e]);return t},arrayCopy:function(t,e,i,s){if(null===e)return"R"===t?null:[];void 0===s&&(s=e.length),i<0&&(s+=i,i=0);var n=i+s;if(n>e.length&&(n=e.length),i>=n)return"R"===t?null:[];if(0===t)return e.slice(i,n);var r=[];return r.length=n-i,"R"===t&&rtl.arrayManaged(1,1,r),rtl.arrayClone(t,e,i,n,r,0),r},arrayInsert:function(t,e,i,s){var n="R"===s;return n&&rtl._AddRef(t),e?(e.$pas2jsrefcnt>1&&(n?(e.$pas2jsrefcnt--,e=rtl.arrayManaged(1,2,e.concat())):e=e.concat()),e.splice(i,0,t),e):(e=[t],n&&(e=rtl.arrayManaged(1,0,e)),e)},arrayDeleteR:function(t,e,i){if(null===t||e<0||e>=t.length||i<=0)return t;e+i>t.length&&(i=t.length-e),t.$pas2jsrefcnt>1&&(t.$pas2jsrefcnt--,t=rtl.arrayManaged(1,2,t.concat()));for(var s=0;s<i;s++)rtl.setIntfP(t,e+s,null);return t.splice(e,i),t},setCharAt:function(t,e,i){return t.substr(0,e)+i+t.substr(e+1)},getResStr:function(t,e){var i=t.$resourcestrings[e];return i.current?i.current:i.org},createSet:function(){for(var t={},e=0;e<arguments.length;e++)if(null!=arguments[e])t[arguments[e]]=!0;else for(var i=arguments[e+=1],s=arguments[e+=1],n=i;n<=s;n++)t[n]=!0;return t},cloneSet:function(t){var e={};for(var i in t)e[i]=!0;return e},refSet:function(t){return rtl.hideProp(t,"$shared",!0),t},includeSet:function(t,e){return t.$shared&&(t=rtl.cloneSet(t)),t[e]=!0,t},excludeSet:function(t,e){return t.$shared&&(t=rtl.cloneSet(t)),delete t[e],t},diffSet:function(t,e){var i={};for(var s in t)e[s]||(i[s]=!0);return i},unionSet:function(t,e){var i={};for(var s in t)i[s]=!0;for(var s in e)i[s]=!0;return i},intersectSet:function(t,e){var i={};for(var s in t)e[s]&&(i[s]=!0);return i},symDiffSet:function(t,e){var i={};for(var s in t)e[s]||(i[s]=!0);for(var s in e)t[s]||(i[s]=!0);return i},eqSet:function(t,e){for(var i in t)if(!e[i])return!1;for(var i in e)if(!t[i])return!1;return!0},neSet:function(t,e){return!rtl.eqSet(t,e)},leSet:function(t,e){for(var i in t)if(!e[i])return!1;return!0},geSet:function(t,e){for(var i in e)if(!t[i])return!1;return!0},strSetLength:function(t,e){var i=t.length;if(i>e)return t.substring(0,e);if(t.repeat)return t+" ".repeat(e-i);for(;i<e;)t+=" ",i++;return t},spaceLeft:function(t,e){var i=t.length;if(i>=e)return t;if(t.repeat)return" ".repeat(e-i)+t;for(;i<e;)t=" "+t,i++;return t},floatToStr:function(t,e,i){if(arguments.length>2)return rtl.spaceLeft(t.toFixed(i),e);var s="",n=Math.abs(t);n>1&&n<1e10||n>1e-10&&n<1?s="00":(n>1&&n<1e100||n<1e-10)&&(s="0"),arguments.length<2?e=24:e<9&&(e=9);i=e-8;var r=(t>0?" ":"")+t.toExponential(i);return r=r.replace(/e(.)/,"E$1"+s),rtl.spaceLeft(r,e)},valEnum:function(t,e,i){for(var s in t=t.toLowerCase(),e)if("string"==typeof s&&s.toLowerCase()===t)return i(0),e[s];return i(1),0},lw:function(t){return t<0?t+4294967296:t},and:function(t,e){var i=2147483648;return(t/i&e/i)*i+(2147483647&t&e)},or:function(t,e){var i=2147483648;return(t/i|e/i)*i+(2147483647&t|2147483647&e)},xor:function(t,e){var i=2147483648;return(t/i^e/i)*i+(2147483647&t^2147483647&e)},shr:function(t,e){return t<0&&(t+=rtl.hiInt),t<2147483648?t>>e:e<=0?t:e>54?0:Math.floor(t/Math.pow(2,e))},shl:function(t,e){if(t<0&&(t+=rtl.hiInt),e<=0)return t;if(e>54)return 0;var i=t*Math.pow(2,e);return i<=rtl.hiInt?i:i%rtl.hiInt},initRTTI:function(){function t(t,e,i){i||(i=rtl.tTypeInfo),rtl.debug_rtti&&rtl.debug('initRTTI.newBaseTI "'+t+'" '+e+' ("'+i.name+'")');var s=Object.create(i);return s.name=t,s.kind=e,rtl[t]=s,s}function e(e,i,s,n){var r=t(e,1,rtl.tTypeInfoInteger);return r.minvalue=i,r.maxvalue=s,r.ordtype=n,r}function i(t,e){var i=Object.create(rtl.tTypeMember);i.name=t,i.kind=e,rtl[t]=i}rtl.debug_rtti&&rtl.debug("initRTTI"),rtl.tTypeInfo={name:"tTypeInfo",kind:0,$module:null,attr:null},t("tTypeInfoInteger",1),e("shortint",-128,127,0),e("byte",0,255,1),e("smallint",-32768,32767,2),e("word",0,65535,3),e("longint",-2147483648,2147483647,4),e("longword",0,4294967295,5),e("nativeint",-4503599627370496,0xfffffffffffff,6),e("nativeuint",0,0xfffffffffffff,7),e("char",0,65535,3).kind=2,t("string",3),t("tTypeInfoEnum",4,rtl.tTypeInfoInteger),t("tTypeInfoSet",5),t("double",6),t("boolean",7),t("tTypeInfoProcVar",8),t("tTypeInfoMethodVar",9,rtl.tTypeInfoProcVar),t("tTypeInfoArray",10),t("tTypeInfoDynArray",11),t("tTypeInfoPointer",15),t("pointer",15,rtl.tTypeInfoPointer).reftype=null,t("jsvalue",16),t("tTypeInfoRefToProcVar",17,rtl.tTypeInfoProcVar),rtl.tTypeMember={attr:null},i("tTypeMemberField",1),i("tTypeMemberMethod",2),i("tTypeMemberProperty",3),rtl.tTypeMembers={};var s=t("tTypeInfoStruct",0);s.$addMember=function(t,e,i,s){if(rtl.debug_rtti){if(!rtl.hasString(t)||"$"===t.charAt())throw'invalid member "'+t+'", this="'+this.name+'"';if(!rtl.is(e,rtl.tTypeMember))throw'invalid ancestor "'+e+":"+e.name+'", "'+this.name+"."+t+'"';if(null!=s&&"object"!=typeof s)throw'invalid options "'+s+'", "'+this.name+"."+t+'"'}var n=Object.create(e);if(n.name=t,this.members[t]=n,this.names.push(t),n.visibility=i,rtl.isObject(s))for(var r in s)s.hasOwnProperty(r)&&(n[r]=s[r]);return n},s.addField=function(t,e,i,s){var n=this.$addMember(t,rtl.tTypeMemberField,i||2,s);if(rtl.debug_rtti&&!rtl.is(e,rtl.tTypeInfo))throw'invalid type "'+e+'", "'+this.name+"."+t+'"';return n.typeinfo=e,this.fields.push(t),n},s.addFields=function(){for(var t=0;t<arguments.length;){var e=arguments[t++],i=arguments[t++];t<arguments.length&&"object"==typeof arguments[t]?this.addField(e,i,arguments[t++]):this.addField(e,i)}},s.addMethod=function(t,e,i,s,n,r,a){var o=this.$addMember(t,rtl.tTypeMemberMethod,s||2,a);return o.methodkind=e,o.procsig=rtl.newTIProcSig(i,n,r),this.methods.push(t),o},s.addProperty=function(t,e,i,s,n,r,a){var o=this.$addMember(t,rtl.tTypeMemberProperty,r||4,a);return o.flags=e,o.typeinfo=i,o.getter=s,o.setter=n,o.params=rtl.isArray(o.params)?rtl.newTIParams(o.params):null,this.properties.push(t),rtl.isString(o.stored)||(o.stored=""),o},s.getField=function(t){return this.members[this.fields[t]]},s.getMethod=function(t){return this.members[this.methods[t]]},s.getProperty=function(t){return this.members[this.properties[t]]},t("tTypeInfoRecord",12,rtl.tTypeInfoStruct),t("tTypeInfoClass",13,rtl.tTypeInfoStruct),t("tTypeInfoClassRef",14),t("tTypeInfoInterface",18,rtl.tTypeInfoStruct),t("tTypeInfoHelper",19,rtl.tTypeInfoStruct),t("tTypeInfoExtClass",20,rtl.tTypeInfoClass)},tSectionRTTI:{$module:null,$inherited:function(t,e,i){rtl.debug_rtti&&rtl.debug('tSectionRTTI.newTI "'+(this.$module?this.$module.$name:"(no module)")+'"."'+t+'" ('+e.name+") "+(i?"init":"forward"));var s=this[t];if(s){if(!s.$forward)return s;if(!e.isPrototypeOf(s))throw'typeinfo ancestor mismatch "'+t+'" ancestor="'+e.name+'" t.name="'+s.name+'"'}else(s=Object.create(e)).name=t,s.$module=this.$module,this[t]=s;if(i)for(var n in delete s.$forward,i)i.hasOwnProperty(n)&&(s[n]=i[n]);else s.$forward=!0;return s},$Scope:function(t,e,i){var s=this.$inherited(t,e,i);return s.members||(s.members={}),s.names||(s.names=[]),s.fields||(s.fields=[]),s.methods||(s.methods=[]),s.properties||(s.properties=[]),s},$TI:function(t,e,i){var s=this.$inherited(t,rtl.tTypeInfo,i);return s.kind=e,s},$Int:function(t,e){return this.$inherited(t,rtl.tTypeInfoInteger,e)},$Enum:function(t,e){return this.$inherited(t,rtl.tTypeInfoEnum,e)},$Set:function(t,e){return this.$inherited(t,rtl.tTypeInfoSet,e)},$StaticArray:function(t,e){return this.$inherited(t,rtl.tTypeInfoArray,e)},$DynArray:function(t,e){return this.$inherited(t,rtl.tTypeInfoDynArray,e)},$ProcVar:function(t,e){return this.$inherited(t,rtl.tTypeInfoProcVar,e)},$RefToProcVar:function(t,e){return this.$inherited(t,rtl.tTypeInfoRefToProcVar,e)},$MethodVar:function(t,e){return this.$inherited(t,rtl.tTypeInfoMethodVar,e)},$Record:function(t,e,i){return i&&(e.$record=i),this.$Scope(t,rtl.tTypeInfoRecord,e)},$Class:function(t,e){return this.$Scope(t,rtl.tTypeInfoClass,e)},$ClassRef:function(t,e){return this.$inherited(t,rtl.tTypeInfoClassRef,e)},$Pointer:function(t,e){return this.$inherited(t,rtl.tTypeInfoPointer,e)},$Interface:function(t,e){return this.$Scope(t,rtl.tTypeInfoInterface,e)},$Helper:function(t,e){return this.$Scope(t,rtl.tTypeInfoHelper,e)},$ExtClass:function(t,e){return this.$Scope(t,rtl.tTypeInfoExtClass,e)}},newTIParam:function(t){return{name:t[0],typeinfo:t[1],flags:rtl.isNumber(t[2])?t[2]:0}},newTIParams:function(t){var e=[];if(rtl.isArray(t))for(var i=0;i<t.length;i++)e.push(rtl.newTIParam(t[i]));return e},newTIProcSig:function(t,e,i){return{params:rtl.newTIParams(t),resulttype:e||null,flags:i||0}},addResource:function(t){rtl.$res[t.name]=t},getResource:function(t){var e=rtl.$res[t];return void 0!==e?e:null},getResourceList:function(){return Object.keys(rtl.$res)}};rtl.module("System",[],(function(){"use strict";var t=this,e=t.$impl;this.LineEnding="\n",this.sLineBreak=this.LineEnding,this.MaxLongint=2147483647,this.Maxint=2147483647,this.TTextLineBreakStyle={0:"tlbsLF",tlbsLF:0,1:"tlbsCRLF",tlbsCRLF:1,2:"tlbsCR",tlbsCR:2},rtl.recNewT(this,"TGuid",(function(){this.D1=0,this.D2=0,this.D3=0,this.$new=function(){var t=Object.create(this);return t.D4=rtl.arraySetLength(null,0,8),t},this.$eq=function(t){return this.D1===t.D1&&this.D2===t.D2&&this.D3===t.D3&&rtl.arrayEq(this.D4,t.D4)},this.$assign=function(t){return this.D1=t.D1,this.D2=t.D2,this.D3=t.D3,this.D4=t.D4.slice(0),this}})),rtl.recNewT(this,"TMethod",(function(){this.Code=null,this.Data=null,this.$eq=function(t){return this.Code===t.Code&&this.Data===t.Data},this.$assign=function(t){return this.Code=t.Code,this.Data=t.Data,this}})),rtl.createClass(this,"TObject",null,(function(){this.$init=function(){},this.$final=function(){},this.Create=function(){return this},this.Destroy=function(){},this.Free=function(){this.$destroy("Destroy")},this.ClassType=function(){return this},this.InheritsFrom=function(t){return null!=t&&(this==t||t.isPrototypeOf(this))},this.MethodAddress=function(t){var e=null;if(e=null,""===t)return e;var i,s=0,n=this.$rtti,r="";for(i=t.toLowerCase();""===r&&null!=n;){for(s=0;""===r&&s<n.methods.length;)n.getMethod(s).name.toLowerCase()===i&&(r=n.getMethod(s).name),s+=1;""===r&&(n=n.ancestor)}return""!==r&&(e=this[r]),e},this.FieldAddress=function(t){if(null,""===t)return null;for(var e=this.$class,i=null,s=t.toLowerCase(),n=null;null!==e;){for(var r=0,a=(i=e.$rtti).fields.length-1;r<=a;r++)if((n=i.getField(r)).name.toLowerCase()===s)return n;e=e.$ancestor?e.$ancestor:null}return null},this.ClassInfo=function(){return this.$rtti},this.AfterConstruction=function(){},this.BeforeDestruction=function(){},this.GetInterface=function(t,e){var i=t.$intf;return i&&(i=rtl.getIntfG(this,i.$guid,2))?(e.set(i),!0):this.GetInterfaceByStr(rtl.guidrToStr(t),e)},this.GetInterfaceByStr=function(e,i){if(!1,t.IObjectInstance.$str||(t.IObjectInstance.$str=rtl.guidrToStr(t.IObjectInstance)),e==t.IObjectInstance.$str)return i.set(this),!0;var s=rtl.getIntfG(this,e,2);return i.set(s),null!==s}})),rtl.createClass(this,"TCustomAttribute",this.TObject,(function(){})),this.S_OK=0,this.E_NOINTERFACE=-2147467262,rtl.createInterface(this,"IUnknown","{00000000-0000-0000-C000-000000000046}",["QueryInterface","_AddRef","_Release"],null,(function(){this.$kind="com"})),rtl.createClass(this,"TInterfacedObject",this.TObject,(function(){this.$init=function(){t.TObject.$init.call(this),this.fRefCount=0},this.QueryInterface=function(t,e){return this.GetInterface(t,e)?0:-2147467262},this._AddRef=function(){return this.fRefCount+=1,this.fRefCount},this._Release=function(){var t;return this.fRefCount-=1,t=this.fRefCount,0===this.fRefCount&&this.$destroy("Destroy"),t},this.BeforeDestruction=function(){0!==this.fRefCount&&rtl.raiseE("EHeapMemoryError")},rtl.addIntf(this,t.IUnknown)})),this.IObjectInstance=this.TGuid.$clone({D1:3642530548,D2:15507,D3:16911,D4:[163,3,191,91,168,43,253,35]}),this.TTypeKind={0:"tkUnknown",tkUnknown:0,1:"tkInteger",tkInteger:1,2:"tkChar",tkChar:2,3:"tkString",tkString:3,4:"tkEnumeration",tkEnumeration:4,5:"tkSet",tkSet:5,6:"tkDouble",tkDouble:6,7:"tkBool",tkBool:7,8:"tkProcVar",tkProcVar:8,9:"tkMethod",tkMethod:9,10:"tkArray",tkArray:10,11:"tkDynArray",tkDynArray:11,12:"tkRecord",tkRecord:12,13:"tkClass",tkClass:13,14:"tkClassRef",tkClassRef:14,15:"tkPointer",tkPointer:15,16:"tkJSValue",tkJSValue:16,17:"tkRefToProcVar",tkRefToProcVar:17,18:"tkInterface",tkInterface:18,19:"tkHelper",tkHelper:19,20:"tkExtClass",tkExtClass:20},this.vtInteger=0,this.vtExtended=3,this.vtWideChar=9,this.vtCurrency=12,this.vtUnicodeString=18,this.vtNativeInt=19,rtl.recNewT(this,"TVarRec",(function(){this.VType=0,this.VJSValue=void 0,this.$eq=function(t){return this.VType===t.VType&&this.VJSValue===t.VJSValue&&this.VJSValue===t.VJSValue&&this.VJSValue===t.VJSValue&&this.VJSValue===t.VJSValue&&this.VJSValue===t.VJSValue&&this.VJSValue===t.VJSValue&&this.VJSValue===t.VJSValue},this.$assign=function(t){return this.VType=t.VType,this.VJSValue=t.VJSValue,this.VJSValue=t.VJSValue,this.VJSValue=t.VJSValue,this.VJSValue=t.VJSValue,this.VJSValue=t.VJSValue,this.VJSValue=t.VJSValue,this.VJSValue=t.VJSValue,this}})),this.VarRecs=function(){var e=[],i=0,s=null;for(e=[];i<arguments.length;)(s=t.TVarRec.$new()).VType=rtl.trunc(arguments[i]),i+=1,s.VJSValue=arguments[i],i+=1,e.push(t.TVarRec.$clone(s));return e},this.Frac=function(t){return t%1},this.Odd=function(t){return!0&t},this.Sqr$1=function(t){return t*t},this.Trunc=function(e){return Math.trunc||(Math.trunc=function(t){return t=+t,isFinite(t)?t-t%1||(t<0?-0:0===t?t:0):t}),t.Trunc=Math.trunc,Math.trunc(e)},this.DefaultTextLineBreakStyle=0,this.Int=function(e){return t.Trunc(e)},this.Copy=function(t,e,i){return e<1&&(e=1),i>0?t.substring(e-1,e+i-1):""},this.Copy$1=function(t,e){return e<1&&(e=1),t.substr(e-1)},this.Delete=function(e,i,s){var n;i<1||i>e.get().length||s<=0||(n=e.get(),e.set(t.Copy(n,1,i-1)+t.Copy$1(n,i+s)))},this.Pos=function(t,e){return e.indexOf(t)+1},this.Insert=function(e,i,s){var n;""!==e&&(n=i.get(),s<1?i.set(e+n):s>n.length?i.set(n+e):i.set(t.Copy(n,1,s-1)+e+t.Copy(n,s,n.length)))},this.upcase=function(t){return t.toUpperCase()},this.val=function(t,i,s){i.set(e.valint(t,-9007199254740991,9007199254740991,s))},this.val$5=function(t,i,s){i.set(e.valint(t,0,65535,s))},this.val$6=function(t,i,s){i.set(e.valint(t,-2147483648,2147483647,s))},this.val$8=function(t,e,i){var s;""!==t?(s=Number(t),isNaN(s)?i.set(1):(i.set(0),e.set(s))):i.set(1)},this.StringOfChar=function(t,e){var i="";if(e>0&&t.repeat)return t.repeat(e);i="";for(var s=1,n=e;s<=n;s++)s,i+=t;return i},this.Writeln=function(){var t=0,i=0,s="";if(i=arguments.length-1,null!=e.WriteCallBack)for(var n=0,r=i;n<=r;n++)t=n,e.WriteCallBack(arguments[t],t===i);else{s=e.WriteBuf;for(var a=0,o=i;a<=o;a++)s=s+""+arguments[t=a];console.log(s),e.WriteBuf=""}},this.Assigned=function(t){return null!=t&&null!=t&&(!rtl.isArray(t)||t.length>0)},t.$implcode=function(){e.WriteBuf="",e.WriteCallBack=null,e.valint=function(e,i,s,n){var r=0,a=0;if(""===e)return n.set(1),r;if(a=Number(e),isNaN(a)){var o=t.Copy(e,1,1);if("$"===o)a=Number("0x"+t.Copy$1(e,2));else if("&"===o)a=Number("0o"+t.Copy$1(e,2));else{if("%"!==o)return n.set(1),r;a=Number("0b"+t.Copy$1(e,2))}}return isNaN(a)||a!==t.Int(a)?n.set(1):a<i||a>s?n.set(2):(r=t.Trunc(a),n.set(0)),r}},t.$init=function(){rtl.exitcode=0}}),[]),rtl.module("RTLConsts",["System"],(function(){"use strict";this.$resourcestrings={SArgumentMissing:{org:'Missing argument in format "%s"'},SInvalidFormat:{org:'Invalid format specifier : "%s"'},SInvalidArgIndex:{org:'Invalid argument index in format: "%s"'},SListCapacityError:{org:"List capacity (%s) exceeded."},SListCountError:{org:"List count (%s) out of bounds."},SListIndexError:{org:"List index (%s) out of bounds"},SSortedListError:{org:"Operation not allowed on sorted list"},SDuplicateString:{org:"String list does not allow duplicates"},SErrFindNeedsSortedList:{org:"Cannot use find on unsorted list"},SInvalidName:{org:'Invalid component name: "%s"'},SInvalidBoolean:{org:'"%s" is not a valid boolean.'},SDuplicateName:{org:'Duplicate component name: "%s"'},SErrInvalidDate:{org:'Invalid date: "%s"'},SErrInvalidTimeFormat:{org:'Invalid time format: "%s"'},SInvalidDateFormat:{org:'Invalid date format: "%s"'},SCantReadPropertyS:{org:'Cannot read property "%s"'},SCantWritePropertyS:{org:'Cannot write property "%s"'},SErrPropertyNotFound:{org:'Unknown property: "%s"'},SIndexedPropertyNeedsParams:{org:'Indexed property "%s" needs parameters'},SErrInvalidInteger:{org:'Invalid integer value: "%s"'},SErrInvalidFloat:{org:'Invalid floating-point value: "%s"'},SInvalidCurrency:{org:"Invalid currency value: %s"},SInvalidGUID:{org:'"%s" is not a valid GUID value'}}})),rtl.module("Types",["System"],(function(){"use strict";var t=this;this.TDirection={0:"FromBeginning",FromBeginning:0,1:"FromEnd",FromEnd:1},this.TDuplicates={0:"dupIgnore",dupIgnore:0,1:"dupAccept",dupAccept:1,2:"dupError",dupError:2},rtl.recNewT(this,"TPoint",(function(){this.x=0,this.y=0,this.$eq=function(t){return this.x===t.x&&this.y===t.y},this.$assign=function(t){return this.x=t.x,this.y=t.y,this};var e=t.$rtti.$Record("TPoint",{},this);e.addField("x",rtl.longint),e.addField("y",rtl.longint)})),rtl.recNewT(this,"TRect",(function(){this.Left=0,this.Top=0,this.Right=0,this.Bottom=0,this.$eq=function(t){return this.Left===t.Left&&this.Top===t.Top&&this.Right===t.Right&&this.Bottom===t.Bottom},this.$assign=function(t){return this.Left=t.Left,this.Top=t.Top,this.Right=t.Right,this.Bottom=t.Bottom,this};var e=t.$rtti.$Record("TRect",{},this);e.addField("Left",rtl.longint),e.addField("Top",rtl.longint),e.addField("Right",rtl.longint),e.addField("Bottom",rtl.longint)})),this.Rect=function(e,i,s,n){var r=t.TRect.$new();return r.Left=e,r.Top=i,r.Right=s,r.Bottom=n,r},this.Point=function(e,i){var s=t.TPoint.$new();return s.x=e,s.y=i,s}})),rtl.module("JS",["System","Types"],(function(){"use strict";var t=this;rtl.createClass(this,"AsyncAttribute",pas.System.TCustomAttribute,(function(){})),this.$rtti.$ExtClass("TJSArrayBuffer",{ancestor:this.$rtti.TJSObject,jsclass:"ArrayBuffer"}),this.isBoolean=function(t){return"boolean"==typeof t},this.isInteger=function(t){return Math.floor(t)===t},this.isNull=function(t){return null===t},this.isUndefined=function(t){return null==t},this.toInteger=function(e){return t.isInteger(e)?rtl.trunc(e):0},this.toObject=function(t){return rtl.isObject(t)?t:null},this.toBoolean=function(e){return!!t.isBoolean(e)&&!(0==e)},this.ToString=function(t){return rtl.isString(t)?""+t:""},this.TJSValueType={0:"jvtNull",jvtNull:0,1:"jvtBoolean",jvtBoolean:1,2:"jvtInteger",jvtInteger:2,3:"jvtFloat",jvtFloat:3,4:"jvtString",jvtString:4,5:"jvtObject",jvtObject:5,6:"jvtArray",jvtArray:6},this.GetValueType=function(e){var i=0,s="";return t.isNull(e)?i=0:"string"===(s=typeof e)?i=4:"boolean"===s?i=1:"object"===s?i=rtl.isArray(e)?6:5:"number"===s&&(i=t.isInteger(e)?2:3),i}})),rtl.module("SysUtils",["System","RTLConsts","JS"],(function(){"use strict";var t=this,e=t.$impl;this.FreeAndNil=function(t){var e=null;null!==(e=t.get())&&(t.set(null),e.$destroy("Destroy"))},this.FloatRecDigits=19,rtl.recNewT(this,"TFloatRec",(function(){this.Exponent=0,this.Negative=!1,this.$new=function(){var t=Object.create(this);return t.Digits=rtl.arraySetLength(null,"\0",19),t},this.$eq=function(t){return this.Exponent===t.Exponent&&this.Negative===t.Negative&&rtl.arrayEq(this.Digits,t.Digits)},this.$assign=function(t){return this.Exponent=t.Exponent,this.Negative=t.Negative,this.Digits=t.Digits.slice(0),this}})),rtl.recNewT(this,"TFormatSettings",(function(){this.CurrencyDecimals=0,this.CurrencyFormat=0,this.CurrencyString="",this.DateSeparator="\0",this.DecimalSeparator="",this.LongDateFormat="",this.LongTimeFormat="",this.NegCurrFormat=0,this.ShortDateFormat="",this.ShortTimeFormat="",this.ThousandSeparator="",this.TimeAMString="",this.TimePMString="",this.TimeSeparator="\0",this.TwoDigitYearCenturyWindow=0,this.InitLocaleHandler=null,this.$new=function(){var t=Object.create(this);return t.DateTimeToStrFormat=rtl.arraySetLength(null,"",2),t.LongDayNames=rtl.arraySetLength(null,"",7),t.LongMonthNames=rtl.arraySetLength(null,"",12),t.ShortDayNames=rtl.arraySetLength(null,"",7),t.ShortMonthNames=rtl.arraySetLength(null,"",12),t},this.$eq=function(t){return this.CurrencyDecimals===t.CurrencyDecimals&&this.CurrencyFormat===t.CurrencyFormat&&this.CurrencyString===t.CurrencyString&&this.DateSeparator===t.DateSeparator&&rtl.arrayEq(this.DateTimeToStrFormat,t.DateTimeToStrFormat)&&this.DecimalSeparator===t.DecimalSeparator&&this.LongDateFormat===t.LongDateFormat&&rtl.arrayEq(this.LongDayNames,t.LongDayNames)&&rtl.arrayEq(this.LongMonthNames,t.LongMonthNames)&&this.LongTimeFormat===t.LongTimeFormat&&this.NegCurrFormat===t.NegCurrFormat&&this.ShortDateFormat===t.ShortDateFormat&&rtl.arrayEq(this.ShortDayNames,t.ShortDayNames)&&rtl.arrayEq(this.ShortMonthNames,t.ShortMonthNames)&&this.ShortTimeFormat===t.ShortTimeFormat&&this.ThousandSeparator===t.ThousandSeparator&&this.TimeAMString===t.TimeAMString&&this.TimePMString===t.TimePMString&&this.TimeSeparator===t.TimeSeparator&&this.TwoDigitYearCenturyWindow===t.TwoDigitYearCenturyWindow},this.$assign=function(t){return this.CurrencyDecimals=t.CurrencyDecimals,this.CurrencyFormat=t.CurrencyFormat,this.CurrencyString=t.CurrencyString,this.DateSeparator=t.DateSeparator,this.DateTimeToStrFormat=t.DateTimeToStrFormat.slice(0),this.DecimalSeparator=t.DecimalSeparator,this.LongDateFormat=t.LongDateFormat,this.LongDayNames=t.LongDayNames.slice(0),this.LongMonthNames=t.LongMonthNames.slice(0),this.LongTimeFormat=t.LongTimeFormat,this.NegCurrFormat=t.NegCurrFormat,this.ShortDateFormat=t.ShortDateFormat,this.ShortDayNames=t.ShortDayNames.slice(0),this.ShortMonthNames=t.ShortMonthNames.slice(0),this.ShortTimeFormat=t.ShortTimeFormat,this.ThousandSeparator=t.ThousandSeparator,this.TimeAMString=t.TimeAMString,this.TimePMString=t.TimePMString,this.TimeSeparator=t.TimeSeparator,this.TwoDigitYearCenturyWindow=t.TwoDigitYearCenturyWindow,this},this.GetJSLocale=function(){return Intl.DateTimeFormat().resolvedOptions().locale},this.GetLocaleDecimalSeparator=function(t){var e=1.1;return e=e.toLocaleString(t).substring(1,2)},this.GetLocaleLongDayName=function(t,e){var i=new Date(2017,0,1);return i.setDate(i.getDate()+t-1),i.toLocaleDateString(e,{weekday:"long"})},this.GetLocaleLongMonthName=function(t,e){return new Date(2017,t-1,1).toLocaleDateString(e,{month:"long"})},this.GetLocaleLongTimeFormat=function(e){var i="";return i="hh:nn:ss","EN-US"===t.UpperCase(e)&&(i="hh:nn:ss AMPM"),i};this.GetLocaleShortDateFormat=function(e){var i;t.TStringHelper.Empty,e=t.TStringHelper.ToLower.call({get:function(){return e},set:function(t){e=t}}),(i=t.TStringHelper.IndexOf.call({get:function(){return e},set:function(t){e=t}},"-"))>=0?e=t.TStringHelper.Substring$1.call({get:function(){return e},set:function(t){e=t}},0,i)+t.TStringHelper.ToUpper.call({a:t.TStringHelper.Substring.call({get:function(){return e},set:function(t){e=t}},i),get:function(){return this.a},set:function(t){this.a=t}}):2===t.TStringHelper.GetLength.call({get:function(){return e},set:function(t){e=t}})&&(e=e+"-"+t.TStringHelper.ToUpper.call({get:function(){return e},set:function(t){e=t}}));return{"ar-SA":"dd/MM/yy","bg-BG":"dd.M.yyyy","ca-ES":"dd/MM/yyyy","zh-TW":"yyyy/M/d","cs-CZ":"d.M.yyyy","da-DK":"dd-MM-yyyy","de-DE":"dd.MM.yyyy","el-GR":"d/M/yyyy","en-US":"M/d/yyyy","fi-FI":"d.M.yyyy","fr-FR":"dd/MM/yyyy","he-IL":"dd/MM/yyyy","hu-HU":"yyyy. MM. dd.","is-IS":"d.M.yyyy","it-IT":"dd/MM/yyyy","ja-JP":"yyyy/MM/dd","ko-KR":"yyyy-MM-dd","nl-NL":"d-M-yyyy","nb-NO":"dd.MM.yyyy","pl-PL":"yyyy-MM-dd","pt-BR":"d/M/yyyy","ro-RO":"dd.MM.yyyy","ru-RU":"dd.MM.yyyy","hr-HR":"d.M.yyyy","sk-SK":"d. M. yyyy","sq-AL":"yyyy-MM-dd","sv-SE":"yyyy-MM-dd","th-TH":"d/M/yyyy","tr-TR":"dd.MM.yyyy","ur-PK":"dd/MM/yyyy","id-ID":"dd/MM/yyyy","uk-UA":"dd.MM.yyyy","be-BY":"dd.MM.yyyy","sl-SI":"d.M.yyyy","et-EE":"d.MM.yyyy","lv-LV":"yyyy.MM.dd.","lt-LT":"yyyy.MM.dd","fa-IR":"MM/dd/yyyy","vi-VN":"dd/MM/yyyy","hy-AM":"dd.MM.yyyy","az-Latn-AZ":"dd.MM.yyyy","eu-ES":"yyyy/MM/dd","mk-MK":"dd.MM.yyyy","af-ZA":"yyyy/MM/dd","ka-GE":"dd.MM.yyyy","fo-FO":"dd-MM-yyyy","hi-IN":"dd-MM-yyyy","ms-MY":"dd/MM/yyyy","kk-KZ":"dd.MM.yyyy","ky-KG":"dd.MM.yy","sw-KE":"M/d/yyyy","uz-Latn-UZ":"dd/MM yyyy","tt-RU":"dd.MM.yyyy","pa-IN":"dd-MM-yy","gu-IN":"dd-MM-yy","ta-IN":"dd-MM-yyyy","te-IN":"dd-MM-yy","kn-IN":"dd-MM-yy","mr-IN":"dd-MM-yyyy","sa-IN":"dd-MM-yyyy","mn-MN":"yy.MM.dd","gl-ES":"dd/MM/yy","kok-IN":"dd-MM-yyyy","syr-SY":"dd/MM/yyyy","dv-MV":"dd/MM/yy","ar-IQ":"dd/MM/yyyy","zh-CN":"yyyy/M/d","de-CH":"dd.MM.yyyy","en-GB":"dd/MM/yyyy","es-MX":"dd/MM/yyyy","fr-BE":"d/MM/yyyy","it-CH":"dd.MM.yyyy","nl-BE":"d/MM/yyyy","nn-NO":"dd.MM.yyyy","pt-PT":"dd-MM-yyyy","sr-Latn-CS":"d.M.yyyy","sv-FI":"d.M.yyyy","az-Cyrl-AZ":"dd.MM.yyyy","ms-BN":"dd/MM/yyyy","uz-Cyrl-UZ":"dd.MM.yyyy","ar-EG":"dd/MM/yyyy","zh-HK":"d/M/yyyy","de-AT":"dd.MM.yyyy","en-AU":"d/MM/yyyy","es-ES":"dd/MM/yyyy","fr-CA":"yyyy-MM-dd","sr-Cyrl-CS":"d.M.yyyy","ar-LY":"dd/MM/yyyy","zh-SG":"d/M/yyyy","de-LU":"dd.MM.yyyy","en-CA":"dd/MM/yyyy","es-GT":"dd/MM/yyyy","fr-CH":"dd.MM.yyyy","ar-DZ":"dd-MM-yyyy","zh-MO":"d/M/yyyy","de-LI":"dd.MM.yyyy","en-NZ":"d/MM/yyyy","es-CR":"dd/MM/yyyy","fr-LU":"dd/MM/yyyy","ar-MA":"dd-MM-yyyy","en-IE":"dd/MM/yyyy","es-PA":"MM/dd/yyyy","fr-MC":"dd/MM/yyyy","ar-TN":"dd-MM-yyyy","en-ZA":"yyyy/MM/dd","es-DO":"dd/MM/yyyy","ar-OM":"dd/MM/yyyy","en-JM":"dd/MM/yyyy","es-VE":"dd/MM/yyyy","ar-YE":"dd/MM/yyyy","en-029":"MM/dd/yyyy","es-CO":"dd/MM/yyyy","ar-SY":"dd/MM/yyyy","en-BZ":"dd/MM/yyyy","es-PE":"dd/MM/yyyy","ar-JO":"dd/MM/yyyy","en-TT":"dd/MM/yyyy","es-AR":"dd/MM/yyyy","ar-LB":"dd/MM/yyyy","en-ZW":"M/d/yyyy","es-EC":"dd/MM/yyyy","ar-KW":"dd/MM/yyyy","en-PH":"M/d/yyyy","es-CL":"dd-MM-yyyy","ar-AE":"dd/MM/yyyy","es-UY":"dd/MM/yyyy","ar-BH":"dd/MM/yyyy","es-PY":"dd/MM/yyyy","ar-QA":"dd/MM/yyyy","es-BO":"dd/MM/yyyy","es-SV":"dd/MM/yyyy","es-HN":"dd/MM/yyyy","es-NI":"dd/MM/yyyy","es-PR":"dd/MM/yyyy","am-ET":"d/M/yyyy","tzm-Latn-DZ":"dd-MM-yyyy","iu-Latn-CA":"d/MM/yyyy","sma-NO":"dd.MM.yyyy","mn-Mong-CN":"yyyy/M/d","gd-GB":"dd/MM/yyyy","en-MY":"d/M/yyyy","prs-AF":"dd/MM/yy","bn-BD":"dd-MM-yy","wo-SN":"dd/MM/yyyy","rw-RW":"M/d/yyyy","qut-GT":"dd/MM/yyyy","sah-RU":"MM.dd.yyyy","gsw-FR":"dd/MM/yyyy","co-FR":"dd/MM/yyyy","oc-FR":"dd/MM/yyyy","mi-NZ":"dd/MM/yyyy","ga-IE":"dd/MM/yyyy","se-SE":"yyyy-MM-dd","br-FR":"dd/MM/yyyy","smn-FI":"d.M.yyyy","moh-CA":"M/d/yyyy","arn-CL":"dd-MM-yyyy","ii-CN":"yyyy/M/d","dsb-DE":"d. M. yyyy","ig-NG":"d/M/yyyy","kl-GL":"dd-MM-yyyy","lb-LU":"dd/MM/yyyy","ba-RU":"dd.MM.yy","nso-ZA":"yyyy/MM/dd","quz-BO":"dd/MM/yyyy","yo-NG":"d/M/yyyy","ha-Latn-NG":"d/M/yyyy","fil-PH":"M/d/yyyy","ps-AF":"dd/MM/yy","fy-NL":"d-M-yyyy","ne-NP":"M/d/yyyy","se-NO":"dd.MM.yyyy","iu-Cans-CA":"d/M/yyyy","sr-Latn-RS":"d.M.yyyy","si-LK":"yyyy-MM-dd","sr-Cyrl-RS":"d.M.yyyy","lo-LA":"dd/MM/yyyy","km-KH":"yyyy-MM-dd","cy-GB":"dd/MM/yyyy","bo-CN":"yyyy/M/d","sms-FI":"d.M.yyyy","as-IN":"dd-MM-yyyy","ml-IN":"dd-MM-yy","en-IN":"dd-MM-yyyy","or-IN":"dd-MM-yy","bn-IN":"dd-MM-yy","tk-TM":"dd.MM.yy","bs-Latn-BA":"d.M.yyyy","mt-MT":"dd/MM/yyyy","sr-Cyrl-ME":"d.M.yyyy","se-FI":"d.M.yyyy","zu-ZA":"yyyy/MM/dd","xh-ZA":"yyyy/MM/dd","tn-ZA":"yyyy/MM/dd","hsb-DE":"d. M. yyyy","bs-Cyrl-BA":"d.M.yyyy","tg-Cyrl-TJ":"dd.MM.yy","sr-Latn-BA":"d.M.yyyy","smj-NO":"dd.MM.yyyy","rm-CH":"dd/MM/yyyy","smj-SE":"yyyy-MM-dd","quz-EC":"dd/MM/yyyy","quz-PE":"dd/MM/yyyy","hr-BA":"d.M.yyyy.","sr-Latn-ME":"d.M.yyyy","sma-SE":"yyyy-MM-dd","en-SG":"d/M/yyyy","ug-CN":"yyyy-M-d","sr-Cyrl-BA":"d.M.yyyy","es-US":"M/d/yyyy"}[e]||"dd/MM/yyyy"},this.GetLocaleShortDayName=function(t,e){var i=new Date(2017,0,1);i.setDate(i.getDate()+t-1);var s="";return s=""==e?navigator.language:e,i.toLocaleDateString(s,{weekday:"short"})},this.GetLocaleShortMonthName=function(t,e){var i=new Date(2017,t-1,1),s="";return s=""==e?navigator.language:e,i.toLocaleDateString(s,{month:"short"})},this.GetLocaleShortTimeFormat=function(e){var i="";return i="hh:nn","EN-US"===t.UpperCase(e)&&(i="h:nn AMPM"),i},this.Create=function(){var e=t.TFormatSettings.$new();return e.$assign(t.TFormatSettings.Create$1(t.TFormatSettings.GetJSLocale())),e};var i=["/",".","-"],s=[":",".","-"],n=[",","."],r=[".",","];this.Create$1=function(e){var a,o=t.TFormatSettings.$new(),l="",h=0;a=t.UpperCase(e),1===pas.System.Pos("DE",a)?(o.LongDayNames[0]="Sonntag",o.LongDayNames[1]="Montag",o.LongDayNames[2]="Dienstag",o.LongDayNames[3]="Mittwoch",o.LongDayNames[4]="Donnerstag",o.LongDayNames[5]="Freitag",o.LongDayNames[6]="Samstag",o.ShortDayNames[0]="Son",o.ShortDayNames[1]="Mon",o.ShortDayNames[2]="Die",o.ShortDayNames[3]="Mit",o.ShortDayNames[4]="Don",o.ShortDayNames[5]="Fre",o.ShortDayNames[6]="Sam",o.ShortMonthNames[0]="Jan",o.ShortMonthNames[1]="Feb",o.ShortMonthNames[2]="Mär",o.ShortMonthNames[3]="Apr",o.ShortMonthNames[4]="Mai",o.ShortMonthNames[5]="Jun",o.ShortMonthNames[6]="Jul",o.ShortMonthNames[7]="Aug",o.ShortMonthNames[8]="Sep",o.ShortMonthNames[9]="Okt",o.ShortMonthNames[10]="Nov",o.ShortMonthNames[11]="Dez",o.LongMonthNames[0]="Januar",o.LongMonthNames[1]="Februar",o.LongMonthNames[2]="März",o.LongMonthNames[3]="April",o.LongMonthNames[4]="Mai",o.LongMonthNames[5]="Juni",o.LongMonthNames[6]="Juli",o.LongMonthNames[7]="August",o.LongMonthNames[8]="September",o.LongMonthNames[9]="Oktober",o.LongMonthNames[10]="November",o.LongMonthNames[11]="Dezember"):1===pas.System.Pos("FR",t.UpperCase(e))?(o.LongDayNames[0]="Dimanche",o.LongDayNames[1]="Lundi",o.LongDayNames[2]="Mardi",o.LongDayNames[3]="Mecredi",o.LongDayNames[4]="Jeudi",o.LongDayNames[5]="Vendredi",o.LongDayNames[6]="Samedi",o.ShortDayNames[0]="Dim",o.ShortDayNames[1]="Lun",o.ShortDayNames[2]="Mar",o.ShortDayNames[3]="Mer",o.ShortDayNames[4]="Jeu",o.ShortDayNames[5]="Ven",o.ShortDayNames[6]="Sam",o.ShortMonthNames[0]="Jan",o.ShortMonthNames[1]="Fév",o.ShortMonthNames[2]="Mar",o.ShortMonthNames[3]="Avr",o.ShortMonthNames[4]="Mai",o.ShortMonthNames[5]="Jun",o.ShortMonthNames[6]="Jul",o.ShortMonthNames[7]="Aoû",o.ShortMonthNames[8]="Sep",o.ShortMonthNames[9]="Oct",o.ShortMonthNames[10]="Nov",o.ShortMonthNames[11]="Déc",o.LongMonthNames[0]="Janvier",o.LongMonthNames[1]="Février",o.LongMonthNames[2]="Mars",o.LongMonthNames[3]="Avril",o.LongMonthNames[4]="Mai",o.LongMonthNames[5]="Juin",o.LongMonthNames[6]="Juillet",o.LongMonthNames[7]="Août",o.LongMonthNames[8]="Septembre",o.LongMonthNames[9]="Octobre",o.LongMonthNames[10]="Novembre",o.LongMonthNames[11]="Décembre"):1===pas.System.Pos("ES",t.UpperCase(e))?(o.LongDayNames[0]="Domingo",o.LongDayNames[1]="Lunes",o.LongDayNames[2]="Martes",o.LongDayNames[3]="Miércoles",o.LongDayNames[4]="Jueves",o.LongDayNames[5]="Viernes",o.LongDayNames[6]="Sábado",o.ShortDayNames[0]="Dom",o.ShortDayNames[1]="Lun",o.ShortDayNames[2]="Mar",o.ShortDayNames[3]="Mié",o.ShortDayNames[4]="Jue",o.ShortDayNames[5]="Vie",o.ShortDayNames[6]="Sáb",o.ShortMonthNames[0]="Ene",o.ShortMonthNames[1]="Feb",o.ShortMonthNames[2]="Mar",o.ShortMonthNames[3]="Abr",o.ShortMonthNames[4]="May",o.ShortMonthNames[5]="Jun",o.ShortMonthNames[6]="Jul",o.ShortMonthNames[7]="Ago",o.ShortMonthNames[8]="Sep",o.ShortMonthNames[9]="Oct",o.ShortMonthNames[10]="Nov",o.ShortMonthNames[11]="Dic",o.LongMonthNames[0]="January",o.LongMonthNames[1]="Febrero",o.LongMonthNames[2]="Marzi",o.LongMonthNames[3]="Abril",o.LongMonthNames[4]="Mayo",o.LongMonthNames[5]="Junio",o.LongMonthNames[6]="Julio",o.LongMonthNames[7]="Agusto",o.LongMonthNames[8]="Septiembre",o.LongMonthNames[9]="Octubre",o.LongMonthNames[10]="Noviembre",o.LongMonthNames[11]="Diciembre"):(o.LongDayNames[0]="Sunday",o.LongDayNames[1]="Monday",o.LongDayNames[2]="Tuesday",o.LongDayNames[3]="Wednesday",o.LongDayNames[4]="Thursday",o.LongDayNames[5]="Friday",o.LongDayNames[6]="Saturday",o.ShortDayNames[0]="Sun",o.ShortDayNames[1]="Mon",o.ShortDayNames[2]="Tue",o.ShortDayNames[3]="Wed",o.ShortDayNames[4]="Thu",o.ShortDayNames[5]="Fri",o.ShortDayNames[6]="Sat",o.ShortMonthNames[0]="Jan",o.ShortMonthNames[1]="Feb",o.ShortMonthNames[2]="Mar",o.ShortMonthNames[3]="Apr",o.ShortMonthNames[4]="May",o.ShortMonthNames[5]="Jun",o.ShortMonthNames[6]="Jul",o.ShortMonthNames[7]="Aug",o.ShortMonthNames[8]="Sep",o.ShortMonthNames[9]="Oct",o.ShortMonthNames[10]="Nov",o.ShortMonthNames[11]="Dec",o.LongMonthNames[0]="January",o.LongMonthNames[1]="February",o.LongMonthNames[2]="March",o.LongMonthNames[3]="April",o.LongMonthNames[4]="May",o.LongMonthNames[5]="June",o.LongMonthNames[6]="July",o.LongMonthNames[7]="August",o.LongMonthNames[8]="September",o.LongMonthNames[9]="October",o.LongMonthNames[10]="November",o.LongMonthNames[11]="December"),o.DateTimeToStrFormat[0]="c",o.DateTimeToStrFormat[1]="f",o.DateSeparator="-",o.TimeSeparator=":",o.ShortDateFormat="yyyy-mm-dd",o.LongDateFormat="ddd, yyyy-mm-dd",o.DecimalSeparator=".",o.ThousandSeparator=",",o.TimeAMString="AM",o.TimePMString="PM",o.TwoDigitYearCenturyWindow=50,o.ShortTimeFormat=t.TFormatSettings.GetLocaleShortTimeFormat(e),o.LongTimeFormat=t.TFormatSettings.GetLocaleLongTimeFormat(e),o.ShortDateFormat=t.TFormatSettings.GetLocaleShortDateFormat(e);for(var d=0,u=rtl.length(i)-1;d<=u;d++)h=d,t.TStringHelper.IndexOf.call({p:o,get:function(){return this.p.ShortDateFormat},set:function(t){this.p.ShortDateFormat=t}},i[h])>=0&&(o.DateSeparator=i[h]);var c=new Date("Jan 1, 1980 06:07:08 GMT+00:00"),F="";F=""==e?navigator.language:e,l=c.toLocaleTimeString(F);for(var p=0,S=rtl.length(s)-1;p<=S;p++)h=p,t.TStringHelper.IndexOf.call({get:function(){return l},set:function(t){l=t}},s[h])>=0&&(o.TimeSeparator=s[h]);for(h=1;h<=7;h++)o.ShortDayNames[h-1]=t.TFormatSettings.GetLocaleShortDayName(h,e);for(h=1;h<=7;h++)o.LongDayNames[h-1]=t.TFormatSettings.GetLocaleLongDayName(h,e);for(h=1;h<=12;h++)o.ShortMonthNames[h-1]=t.TFormatSettings.GetLocaleShortMonthName(h,e);for(h=1;h<=12;h++)o.LongMonthNames[h-1]=t.TFormatSettings.GetLocaleLongMonthName(h,e);o.DecimalSeparator=t.TFormatSettings.GetLocaleDecimalSeparator(e);for(var m=0,C=rtl.length(n)-1;m<=C;m++)if(h=m,o.DecimalSeparator===n[h]){o.ThousandSeparator=r[h];break}return null!=t.TFormatSettings.InitLocaleHandler&&t.TFormatSettings.InitLocaleHandler(t.UpperCase(e),t.TFormatSettings.$clone(o)),o},this.Invariant=function(){var i=t.TFormatSettings.$new();return e.FInvariantCreated||(e.FInvariant.$assign(t.TFormatSettings.Create$1("EN-US")),e.FInvariant.CurrencyString="¤",e.FInvariant.CurrencyFormat=0,e.FInvariant.CurrencyDecimals=2,e.FInvariant.DateSeparator="/",e.FInvariant.TimeSeparator=":",e.FInvariant.ShortDateFormat="MM/dd/yyyy",e.FInvariant.LongDateFormat="dddd, dd MMMMM yyyy HH:mm:ss",e.FInvariant.TimeAMString="AM",e.FInvariant.TimePMString="PM",e.FInvariant.ShortTimeFormat="HH:mm",e.FInvariant.LongTimeFormat="HH:mm:ss",e.FInvariant.ShortMonthNames=e.DefaultShortMonthNames.slice(0),e.FInvariant.LongMonthNames=e.DefaultLongMonthNames.slice(0),e.FInvariant.ShortDayNames=e.DefaultShortDayNames.slice(0),e.FInvariant.LongDayNames=e.DefaultLongDayNames.slice(0),e.FInvariant.ThousandSeparator=",",e.FInvariant.DecimalSeparator=".",e.FInvariant.TwoDigitYearCenturyWindow=50,e.FInvariant.NegCurrFormat=0,e.FInvariantCreated=!0),i.$assign(e.FInvariant),i}}),!0),rtl.createClass(this,"Exception",pas.System.TObject,(function(){this.LogMessageOnCreate=!1,this.$init=function(){pas.System.TObject.$init.call(this),this.FMessage="",this.FHelpContext=0,this.FJSError=null,this.FStack=void 0},this.$final=function(){this.FJSError=void 0,pas.System.TObject.$final.call(this)},this.Create$1=function(t){return this.FMessage=t,this.FJSError=new Error(t),this.FStack=this.FJSError.stack,this.FHelpContext=0,this.LogMessageOnCreate&&pas.System.Writeln("Created exception ",this.$classname," with message: ",t),this},this.CreateFmt=function(e,i){return this.Create$1(t.Format(e,i)),this}})),rtl.createClass(this,"EConvertError",this.Exception,(function(){})),rtl.createClass(this,"EVariantError",this.Exception,(function(){})),rtl.createClass(this,"EArgumentException",this.Exception,(function(){})),rtl.createClass(this,"EArgumentOutOfRangeException",this.EArgumentException,(function(){})),this.Trim=function(t){return t.replace(/^[\s\uFEFF\xA0\x00-\x1f]+/,"").replace(/[\s\uFEFF\xA0\x00-\x1f]+$/,"")},this.TrimLeft=function(t){return t.replace(/^[\s\uFEFF\xA0\x00-\x1f]+/,"")},this.UpperCase=function(t){return t.toUpperCase()},this.LowerCase=function(t){return t.toLowerCase()},this.CompareStr=function(t,e){var i,s=t.length,n=e.length;return s<=n?t<(i=e.substr(0,s))?-1:t>i?1:s<n?-1:0:(i=t.substr(0,n))<e?-1:1},this.CompareText=function(t,e){var i=t.toLowerCase(),s=e.toLowerCase();return i>s?1:i<s?-1:0},this.SameText=function(t,e){return t.toLowerCase()==e.toLowerCase()},this.AnsiSameText=function(t,e){return t.toLowerCase()==e.toLowerCase()},this.Format=function(e,i){return t.Format$1(e,i,t.FormatSettings)},this.Format$1=function(i,s,n){var r="",a=0,o=0,l=0,h=0,d=0,u="",c="",F=0,p=0,S=0,m=!1,C=0;function g(){var t=0;function n(){var n=0,r=0;if(-1===t){for(o=a;a<=d&&i.charAt(a-1)<="9"&&i.charAt(a-1)>="0";)a+=1;if(a>d&&e.DoFormatError(1,i),"*"===i.charAt(a-1)){255===F?r=l:(r=F,F+=1),(a>o||r>rtl.length(s)-1)&&e.DoFormatError(1,i),l=r+1;var h=s[r].VType;0===h||19===h?t=s[r].VJSValue:e.DoFormatError(1,i),a+=1}else o<a?(pas.System.val(pas.System.Copy(i,o,a-o),{get:function(){return t},set:function(e){t=e}},{get:function(){return n},set:function(t){n=t}}),n>0&&e.DoFormatError(1,i)):t=-1}}return F=255,p=-1,S=-1,t=-1,a+=1,"%"===i.charAt(a-1)?"%":(":"!==i.charAt(a-1)?n():t=0,":"===i.charAt(a-1)&&(-1===t&&e.DoFormatError(2,i),F=t,t=-1,a+=1),"-"===i.charAt(a-1)?(m=!0,a+=1):m=!1,n(),-1!==t&&(p=t,t=-1),"."===i.charAt(a-1)&&(a+=1,n(),-1===t&&(t=0),S=t),pas.System.upcase(i.charAt(a-1)))}function b(t,n){var r=!1;return r=!1,l=(h=255===F?l:F)+1,h>rtl.length(s)-1||s[h].VType!==t?(n&&e.DoFormatError(3,i),l-=1,r):r=!0}for(r="",d=i.length,a=1,o=1,l=0;a<=d;){for(;a<=d&&"%"!==i.charAt(a-1);)a+=1;if(a>o&&(r+=pas.System.Copy(i,o,a-o)),a<d){var f=g();if("D"===f)(b(0,!1)||b(19,!0))&&(c=t.IntToStr(s[h].VJSValue)),p=Math.abs(p),F=S-c.length,"-"!==c.charAt(0)?c=pas.System.StringOfChar("0",F)+c:pas.System.Insert(pas.System.StringOfChar("0",F+1),{get:function(){return c},set:function(t){c=t}},2);else if("U"===f)b(0,!1)?c=t.IntToStr(s[h].VJSValue>>>0):b(19,!0)&&(c=t.IntToStr(s[h].VJSValue)),p=Math.abs(p),F=S-c.length,c=pas.System.StringOfChar("0",F)+c;else if("E"===f)b(12,!1)?c=t.FloatToStrF$1(s[h].VJSValue/1e4,2,3,S,n):b(3,!0)&&(c=t.FloatToStrF$1(s[h].VJSValue,2,3,S,n));else if("F"===f)b(12,!1)?c=t.FloatToStrF$1(s[h].VJSValue/1e4,0,9999,S,n):(b(0,!1)||b(3,!0))&&(c=t.FloatToStrF$1(s[h].VJSValue,0,9999,S,n));else if("G"===f)b(12,!1)?c=t.FloatToStrF$1(s[h].VJSValue/1e4,1,S,3,n):b(3,!0)&&(c=t.FloatToStrF$1(s[h].VJSValue,1,S,3,n));else if("N"===f)b(12,!1)?c=t.FloatToStrF$1(s[h].VJSValue/1e4,3,9999,S,n):b(3,!0)&&(c=t.FloatToStrF$1(s[h].VJSValue,3,9999,S,n));else if("M"===f)b(12,!1)?c=t.FloatToStrF$1(s[h].VJSValue/1e4,4,9999,S,n):b(3,!0)&&(c=t.FloatToStrF$1(s[h].VJSValue,4,9999,S,n));else if("S"===f)(b(18,!1)||b(9,!0))&&(u=s[h].VJSValue),F=u.length,-1!==S&&F>S&&(F=S),c=pas.System.Copy(u,1,F);else if("P"===f)b(0,!1)?c=t.IntToHex(s[h].VJSValue,8):b(0,!0)&&(c=t.IntToHex(s[h].VJSValue,16));else if("X"===f)if(b(0,!1)?(C=s[h].VJSValue,F=16):b(19,!0)&&(C=s[h].VJSValue,F=31),S>F)c=t.IntToHex(C,F);else{for(F=1;rtl.shl(1,4*F)<=C&&F<16;)F+=1;F>S&&(S=F),c=t.IntToHex(C,S)}else"%"===f&&(c="%");-1!==p&&c.length<p&&(m?c+=pas.System.StringOfChar(" ",p-c.length):c=pas.System.StringOfChar(" ",p-c.length)+c),r+=c}o=a+=1}return r};var i=rtl.createSet(null,65,90,null,97,122,95),s=rtl.unionSet(i,rtl.createSet(null,48,57));this.IsValidIdent=function(t,e,n){var r,a=!1,o=!1,l=0;if((r=t.length)<1)return!1;for(o=!0,a=!1,l=1;l<=r;){if(o){if(!(t.charCodeAt(l-1)in i))return a;o=!1}else if(e&&"."===t.charAt(l-1)){if(n){if(l>=r)return a;o=!0}}else if(!(t.charCodeAt(l-1)in s))return a;l+=1}return a=!0},this.TStringReplaceFlag={0:"rfReplaceAll",rfReplaceAll:0,1:"rfIgnoreCase",rfIgnoreCase:1},this.StringReplace=function(t,i,s,n){var r,a="";return a="",0 in n&&(a="g"),1 in n&&(a+="i"),r=i.replace(new RegExp(e.RESpecials,"g"),"\\$1"),t.replace(new RegExp(r,a),s)},this.QuoteString=function(e,i){return i+t.StringReplace(e,i,i+i,rtl.createSet(0))+i},this.QuotedStr=function(e,i){return t.QuoteString(e,i)},this.IntToStr=function(t){return""+t},this.TryStrToInt=function(e,i){return t.TryStrToInt$1(e,i,t.FormatSettings)},this.TryStrToInt$1=function(e,i,s){var n=!1,r=0;return(n=(n=t.TryStrToInt$3(e,{get:function(){return r},set:function(t){r=t}},s))&&-2147483648<=r&&r<=2147483647)&&i.set(r),n},this.TryStrToInt$2=function(i,s){return e.IntTryStrToInt(i,s,t.FormatSettings.DecimalSeparator)},this.TryStrToInt$3=function(t,i,s){return e.IntTryStrToInt(t,i,s.DecimalSeparator)},this.StrToIntDef$1=function(e,i){var s=0;return t.TryStrToInt$2(e,{get:function(){return s},set:function(t){s=t}})?s:i},this.StrToInt=function(e){var i=0;if(!t.TryStrToInt$2(e,{get:function(){return i},set:function(t){i=t}}))throw t.EConvertError.$create("CreateFmt",[rtl.getResStr(pas.RTLConsts,"SErrInvalidInteger"),pas.System.VarRecs(18,e)]);return i},this.TryStrToInt64=function(e,i){return t.TryStrToInt64$1(e,i,t.FormatSettings)},this.TryStrToInt64$1=function(e,i,s){var n,r=0;return(n=t.TryStrToInt$3(e,{get:function(){return r},set:function(t){r=t}},s))&&i.set(r),n},this.IntToHex=function(e,i){var s="";for(s="",e<0&&e<0&&(e=4294967295+e+1),s=e.toString(16),s=t.UpperCase(s);s.length<i;)s="0"+s;return s},this.TFloatFormat={0:"ffFixed",ffFixed:0,1:"ffGeneral",ffGeneral:1,2:"ffExponent",ffExponent:2,3:"ffNumber",ffNumber:3,4:"ffCurrency",ffCurrency:4};this.FloatToDecimal=function(e,i,s){var n=t.TFloatRec.$new(),r="",a="",o=0,l=0,h=0,d=0,u=0,c=!1,F=!1;for(n.Negative=!1,n.Exponent=0,u=0;u<=19;u++)n.Digits[u]="0";if(0===e)return n;for(h=1,d=(r=rtl.floatToStr(e,24)).length;" "===r.charAt(h-1);)h+=1;if(n.Negative="-"===r.charAt(h-1),(n.Negative||"+"===r.charAt(h-1))&&(h+=1),d>=h+2){if("Inf"===(a=pas.System.Copy(r,h,3)))return n.Digits[0]="\0",n.Exponent=32767,n;if("Nan"===a)return n.Digits[0]="\0",n.Exponent=-32768,n}for(o=0,n.Exponent=0,F=!0,c=!1;d>=h&&"E"!==r.charAt(h-1);)"."===r.charAt(h-1)?F=!1:(F?(n.Exponent+=1,n.Digits[o]=r.charAt(h-1),"0"!==r.charAt(h-1)&&(c=!0)):n.Digits[o]=r.charAt(h-1),o+=1),h+=1;for((h+=1)<=d&&(pas.System.val$6(pas.System.Copy(r,h,d-h+1),{get:function(){return u},set:function(t){u=t}},{get:function(){return l},set:function(t){l=t}}),n.Exponent+=u),h=o,d=19;h<d;)n.Digits[h]="0",h+=1;if((h=s+n.Exponent<i?s+n.Exponent:i)>=d&&(h=d-1),0===h)n.Digits[0]>="5"?(n.Digits[0]="1",n.Digits[1]="\0",n.Exponent+=1):n.Digits[0]="\0";else if(h>0)if(n.Digits[h]>="5"){do{n.Digits[h]="\0",h-=1,n.Digits[h]="123456789:".charAt(t.StrToInt(n.Digits[h])+1-1)}while(!(0===h||n.Digits[h]<":"));":"===n.Digits[0]&&(n.Digits[0]="1",n.Exponent+=1)}else for(n.Digits[h]="0";h>-1&&"0"===n.Digits[h];)n.Digits[h]="\0",h-=1;else n.Digits[0]="\0";return"\0"!==n.Digits[0]||c||(n.Exponent=0,n.Negative=!1),n},this.FloatToStr=function(e){return t.FloatToStr$1(e,t.FormatSettings)},this.FloatToStr$1=function(e,i){return t.FloatToStrF$1(e,1,15,0,i)},this.FloatToStrF$1=function(t,i,s,n,r){var a,o,l="";o=r.DecimalSeparator,a=r.ThousandSeparator;var h=i;return 1===h?l=e.FormatGeneralFloat(t,s,o):2===h?l=e.FormatExponentFloat(t,s,n,o):0===h?l=e.FormatFixedFloat(t,n,o):3===h?l=e.FormatNumberFloat(t,n,o,a):4===h&&(l=e.FormatNumberCurrency(1e4*t,n,r)),4!==i&&l.length>1&&"-"===l.charAt(0)&&e.RemoveLeadingNegativeSign({get:function(){return l},set:function(t){l=t}},o,a),l};this.TryStrToFloat$3=function(e,i,s){var n,r,a=!1,o=0,l=0,h="",d=0;for(a=!1,h=e,""!==s.ThousandSeparator&&(h=t.StringReplace(h,s.ThousandSeparator,"",rtl.createSet(0))),"."!==s.DecimalSeparator&&(h=t.StringReplace(h,s.DecimalSeparator,".",{})),d=0,o=1,l=1,r=h.length;o<=r;){var u=h.charAt(o-1);if("+"===u||"-"===u){if(1===d)return a;if(0===d){if(o>l)return a}else if(2===d&&o>l+1)return a}else if(u>="0"&&u<="9");else if("."===u){if(0!==d)return a;d=1,l=o}else{if("E"!==u&&"e"!==u)return a;if(2===d)return a;d=2,l=o}o+=1}return n=parseFloat(h),(a=!isNaN(n))&&i.set(rtl.getNumber(n)),a},this.StrToFloatDef=function(e,i){var s=0;return t.TryStrToFloat$3(e,{get:function(){return s},set:function(t){s=t}},t.FormatSettings)||(s=i),s},this.StrToFloat=function(e){return t.StrToFloat$1(e,t.FormatSettings)},this.StrToFloat$1=function(e,i){var s=0;if(!t.TryStrToFloat$3(e,{get:function(){return s},set:function(t){s=t}},i))throw t.EConvertError.$create("CreateFmt",[rtl.getResStr(pas.RTLConsts,"SErrInvalidFloat"),pas.System.VarRecs(18,e)]);return s},this.FormatFloat=function(e,i){return t.FormatFloat$1(e,i,t.TFormatSettings.$clone(t.FormatSettings))};this.FormatFloat$1=function(e,i,s){var n="",r=0,a=t.TFloatRec.$new(),o="",l=0,h=!1,d=!1,u=0,c=0,F=0,p=0,S=0,m=0,C=0,g=0,b=0;function f(t){n+=t}function T(t){n+=t}function y(t){"\0"!==t&&(-1===(b-=1)?(T(s.DecimalSeparator),f(t)):(f(t),h&&b%3==0&&b>1&&T(s.ThousandSeparator)))}function E(){var t="\0";return t="\0",C<=m?(t=a.Digits[C],C+=1):b<=F?b-=1:t="0",t}function L(){if(0===g)y(E());else if(g<0)g+=1,b<=c?y("0"):b-=1;else{for(;g>0;)y(E()),g-=1;y(E())}}function B(e,i){var s="";return s=t.IntToStr(i),s=pas.System.StringOfChar("0",S-s.length)+s,i<0?s="-"+s:i>0&&"+"===e&&(s=e+s),s}var D=0,W=0,P="\0",v="\0",M=[],$=!1;for(M=rtl.arraySetLength(M,0,4),n="",o="",l=0,h=!1,d=!1,u=0,c=2147483647,F=0,p=0,S=0,m=-1,W=(r=i)>0?1:r<0?2:3,M[0]=0,((D=function(i){var s,n=0,r=0,a="\0",o="\0",l=!1;for(n=1,i.get()[1]=-1,i.get()[2]=-1,i.get()[3]=-1,l=!1,o="\0",r=1,s=e.length;r<=s;){var h=a=e.charAt(r-1);if(";"===h){if(!l){if(n>3)throw t.Exception.$create("Create$1",["Invalid float format"]);i.get()[n]=r,n+=1}}else'"'!==h&&"'"!==h||(l?l=a!==o:(l=!0,o=a));r+=1}return-1===i.get()[n]&&(i.get()[n]=s+1),n}({get:function(){return M},set:function(t){M=t}}))<W||M[W]-M[W-1]==0)&&(W=1),l=M[W]-M[W-1]-1,o=pas.System.Copy(e,M[W-1]+1,l),o=rtl.strSetLength(o,l),function(){var t,e=0,i="\0",n="\0",r=!1;for(t=o.length,e=1,r=!1,i="\0";e<=t;){if((n=o.charAt(e-1)).charCodeAt()in rtl.createSet(34,39))r?r=n!==i:(r=!0,i=n);else if(!r){var a=n;if("."===a)0===u&&(u=p+1);else if(","===a)h="\0"!==s.ThousandSeparator;else if("e"===a||"E"===a){if((e+=1)<t){if(n=o.charAt(e-1),d=n.charCodeAt()in rtl.createSet(45,43))for(;e<t&&"0"===o.charAt(e+1-1);)S+=1,e+=1;S>4&&(S=4)}}else"#"===a?p+=1:"0"===a&&(p<c&&(c=p+1),F=(p+=1)+1)}e+=1}0===u&&(u=p+1),(F=u-F)>0&&(F=0),(c=u-c)<0&&(c=0)}(),function(){var e=0,s=0;for(d?(s=p,e=9999):(s=18,e=p-u+1),a.$assign(t.FloatToDecimal(i,s,e)),b=u-1,d?g=0:(g=a.Exponent-(u-1))>=0&&(b=a.Exponent),m=-1;m<18&&"\0"!==a.Digits[m+1];)m+=1}(),(0===l||a.Exponent>=18&&!d||2047===a.Exponent||2048===a.Exponent)&&(o=r.toPrecision(15),n=o),D=1,C=0,v=" ",$=!1,a.Negative&&1===W&&f("-");D<=l;){if((P=o.charAt(D-1)).charCodeAt()in rtl.createSet(34,39))$?$=P!==v:($=!0,v=P);else if($)f(P);else{var A=P;if("0"===A||"#"===A)L();else if("."===A||","===A);else if("e"===A||"E"===A){if(f(P),(D+=1)<=o.length&&(P=o.charAt(D-1)).charCodeAt()in rtl.createSet(43,45))for(T(B(P,a.Exponent-u+1));D<l&&"0"===o.charAt(D+1-1);)D+=1}else f(P)}D+=1}return n},this.TrueBoolStrs=[],this.FalseBoolStrs=[],this.StrToBool=function(e){var i=!1;if(!t.TryStrToBool(e,{get:function(){return i},set:function(t){i=t}}))throw t.EConvertError.$create("CreateFmt",[rtl.getResStr(pas.RTLConsts,"SInvalidBoolean"),pas.System.VarRecs(18,e)]);return i},this.BoolToStr=function(i,s){var n="";return s?(e.CheckBoolStrs(),n=i?t.TrueBoolStrs[0]:t.FalseBoolStrs[0]):n=i?"-1":"0",n},this.StrToBoolDef=function(e,i){var s=!1;return t.TryStrToBool(e,{get:function(){return s},set:function(t){s=t}})||(s=i),s},this.TryStrToBool=function(i,s){var n,r=!1,a=0,o=0,l=0;if(n=t.UpperCase(i),pas.System.val$8(n,{get:function(){return o},set:function(t){o=t}},{get:function(){return l},set:function(t){l=t}}),r=!0,0===l)s.set(0!==o);else{e.CheckBoolStrs();for(var h=0,d=rtl.length(t.TrueBoolStrs)-1;h<=d;h++)if(a=h,n===t.UpperCase(t.TrueBoolStrs[a]))return s.set(!0),r;for(var u=0,c=rtl.length(t.FalseBoolStrs)-1;u<=c;u++)if(a=u,n===t.UpperCase(t.FalseBoolStrs[a]))return s.set(!1),r;r=!1}return r},this.OnShowException=null,this.ShowException=function(i,s){var n="";n=rtl.getResStr(t,"SApplicationException")+i.$classname,t.Exception.isPrototypeOf(i)&&(n=n+" : "+i.FMessage),e.DoShowException(n)},rtl.recNewT(this,"TTimeStamp",(function(){this.Time=0,this.Date=0,this.$eq=function(t){return this.Time===t.Time&&this.Date===t.Date},this.$assign=function(t){return this.Time=t.Time,this.Date=t.Date,this}})),this.TimeSeparator="\0",this.DateSeparator="\0",this.ShortDateFormat="",this.LongDateFormat="",this.ShortTimeFormat="",this.LongTimeFormat="",this.DecimalSeparator="",this.ThousandSeparator="",this.TimeAMString="",this.TimePMString="",this.HoursPerDay=24,this.MinsPerHour=60,this.SecsPerMin=60,this.MSecsPerSec=1e3,this.MinsPerDay=1440,this.SecsPerDay=86400,this.MSecsPerDay=864e5,this.MaxDateTime=2958465.99999999,this.DateDelta=693594,this.MonthDays$a$clone=function(t){var e=[];e.length=2;for(var i=0;i<2;i++)e[i]=t[i].slice(0);return e},this.MonthDays=[[31,28,31,30,31,30,31,31,30,31,30,31],[31,29,31,30,31,30,31,31,30,31,30,31]],this.ShortMonthNames=rtl.arraySetLength(null,"",12),this.LongMonthNames=rtl.arraySetLength(null,"",12),this.ShortDayNames=rtl.arraySetLength(null,"",7),this.LongDayNames=rtl.arraySetLength(null,"",7),this.FormatSettings=this.TFormatSettings.$new(),this.TwoDigitYearCenturyWindow=50,this.JSDateToDateTime=function(e){return t.EncodeDate(e.getFullYear(),e.getMonth()+1,e.getDate())+t.EncodeTime(e.getHours(),e.getMinutes(),e.getSeconds(),e.getMilliseconds())},this.DateTimeToTimeStamp=function(e){var i=t.TTimeStamp.$new(),s=0;return(s=864e5*e)<0?s-=.5:s+=.5,i.Time=pas.System.Trunc(Math.abs(pas.System.Trunc(s))%864e5),i.Date=693594+rtl.trunc(pas.System.Trunc(s)/864e5),i},this.TryEncodeDate=function(e,i,s,n){var r,a=0,o=0;return(r=e>0&&e<1e4&&i>=1&&i<=12&&s>0&&s<=t.MonthDays[+t.IsLeapYear(e)][i-1])&&(i>2?i-=3:(i+=9,e-=1),o=e-100*(a=rtl.trunc(e/100)),n.set((146097*a>>>2)+(1461*o>>>2)+rtl.trunc((153*i+2)/5)+s),n.set(n.get()-693900)),r},this.TryEncodeTime=function(t,e,i,s,n){var r;return(r=t<24&&e<60&&i<60&&s<1e3)&&n.set((36e5*t+6e4*e+1e3*i+s)/864e5),r},this.EncodeDate=function(e,i,s){var n=0;if(!t.TryEncodeDate(e,i,s,{get:function(){return n},set:function(t){n=t}}))throw t.EConvertError.$create("CreateFmt",["%s-%s-%s is not a valid date specification",pas.System.VarRecs(18,t.IntToStr(e),18,t.IntToStr(i),18,t.IntToStr(s))]);return n},this.EncodeTime=function(e,i,s,n){var r=0;if(!t.TryEncodeTime(e,i,s,n,{get:function(){return r},set:function(t){r=t}}))throw t.EConvertError.$create("CreateFmt",["%s:%s:%s.%s is not a valid time specification",pas.System.VarRecs(18,t.IntToStr(e),18,t.IntToStr(i),18,t.IntToStr(s),18,t.IntToStr(n))]);return r},this.DecodeDate=function(e,i,s,n){var r=0,a=0,o=0,l=0;e<=-693594?(i.set(0),s.set(0),n.set(0)):(e>0?e+=1/1728e5:e-=1/1728e5,e>t.MaxDateTime&&(e=t.MaxDateTime),l=rtl.shl(pas.System.Trunc(e)+693900,2)-1,l-=146097*(r=rtl.trunc(l/146097)),a=rtl.lw(l>>>2),l=rtl.trunc((rtl.lw(a<<2)+3)/1461),a=rtl.lw(rtl.lw(a<<2)+7-1461*l>>>2),o=rtl.trunc((5*a-3)/153),a=rtl.trunc((5*a+2-153*o)/5),r=100*r+l,o<10?o+=3:(o-=9,r+=1),i.set(r),s.set(o),n.set(a))},this.DecodeTime=function(e,i,s,n,r){var a=0;a=t.DateTimeToTimeStamp(e).Time,i.set(rtl.trunc(a/36e5)),a%=36e5,s.set(rtl.trunc(a/6e4)),a%=6e4,n.set(rtl.trunc(a/1e3)),a%=1e3,r.set(a)},this.DecodeDateFully=function(e,i,s,n,r){return t.DecodeDate(e,i,s,n),r.set(t.DayOfWeek(e)),t.IsLeapYear(i.get())},this.ComposeDateTime=function(t,e){return t<0?pas.System.Trunc(t)-Math.abs(pas.System.Frac(e)):pas.System.Trunc(t)+Math.abs(pas.System.Frac(e))},this.Date=function(){return pas.System.Trunc(t.Now())},this.Time=function(){return t.Now()-t.Date()},this.Now=function(){return t.JSDateToDateTime(new Date)},this.DayOfWeek=function(t){var e=0;return(e=1+(pas.System.Trunc(t)-1)%7)<=0&&(e+=7),e},this.IsLeapYear=function(t){return t%4==0&&(t%100!=0||t%400==0)},this.DateToStr=function(e){return t.DateToStr$1(e,t.FormatSettings)},this.DateToStr$1=function(e,i){return t.FormatDateTime$1("ddddd",e,i)},this.StrToDate=function(e){return t.StrToDate$3(e,t.FormatSettings)},this.StrToDate$2=function(i,s,n){var r,a="";if(r=e.IntStrToDate({get:function(){return a},set:function(t){a=t}},i,s,n),""!==a)throw t.EConvertError.$create("Create$1",[a]);return r},this.StrToDate$3=function(e,i){return t.StrToDate$2(e,i.ShortDateFormat,i.DateSeparator)},this.TryStrToDate=function(e,i){return t.TryStrToDate$1(e,i,t.FormatSettings)},this.TryStrToDate$1=function(e,i,s){return t.TryStrToDate$3(e,i,s.ShortDateFormat,s.DateSeparator)},this.TryStrToDate$2=function(e,i,s){return t.TryStrToDate$3(e,i,t.FormatSettings.ShortDateFormat,s)},this.TryStrToDate$3=function(t,i,s,n){var r=!1,a="";return(r=0!==t.length)&&(i.set(e.IntStrToDate({get:function(){return a},set:function(t){a=t}},t,s,n)),r=""===a),r},this.StrToDateDef=function(e,i){return t.StrToDateDef$1(e,i,"\0")},this.StrToDateDef$1=function(e,i,s){var n=0;return t.TryStrToDate$2(e,{get:function(){return n},set:function(t){n=t}},s)||(n=i),n},this.TimeToStr=function(e){return t.TimeToStr$1(e,t.FormatSettings)},this.TimeToStr$1=function(e,i){return t.FormatDateTime$1("tt",e,i)},this.StrToTime=function(e){return t.StrToTime$2(e,t.FormatSettings)},this.StrToTime$2=function(i,s){var n,r="";if(n=e.IntStrToTime({get:function(){return r},set:function(t){r=t}},i,i.length,s),""!==r)throw t.EConvertError.$create("Create$1",[r]);return n},this.TryStrToTime$1=function(t,i,s){var n=!1,r="";return(n=0!==t.length)&&(i.set(e.IntStrToTime({get:function(){return r},set:function(t){r=t}},t,t.length,s)),n=""===r),n},this.TryStrToTime$2=function(e,i,s){var n=t.TFormatSettings.$new();return n.$assign(t.TFormatSettings.Create()),n.TimeSeparator=s,t.TryStrToTime$1(e,i,t.TFormatSettings.$clone(n))},this.StrToTimeDef=function(e,i){return t.StrToTimeDef$1(e,i,"\0")},this.StrToTimeDef$1=function(e,i,s){var n=0;return t.TryStrToTime$2(e,{get:function(){return n},set:function(t){n=t}},s)||(n=i),n},this.StrToDateTime=function(e){return t.StrToDateTime$1(e,t.FormatSettings)},this.StrToDateTime$1=function(i,s){var n=0,r="",a="",o=e.SplitDateTimeStr(i,{get:function(){return a},set:function(t){a=t}},{get:function(){return r},set:function(t){r=t}},s);return 0===o?n=t.StrToDate(""):1===o?n=a.length>0?t.StrToDate$2(a,s.ShortDateFormat,s.DateSeparator):t.StrToTime(r):2===o&&(n=t.ComposeDateTime(t.StrToDate$2(a,s.ShortDateFormat,s.DateSeparator),t.StrToTime(r))),n},this.TryStrToDateTime$1=function(e,i,s){var n=!1,r=0,a=0,o=0;if(n=!1,(r=pas.System.Pos(s.TimeSeparator,e))>0){for(;r>0&&" "!==e.charAt(r-1);)r-=1;if(r>0){if(!t.TryStrToDate$1(pas.System.Copy(e,1,r-1),{get:function(){return a},set:function(t){a=t}},s))return n;if(!t.TryStrToTime$1(pas.System.Copy(e,r+1,e.length-r),{get:function(){return o},set:function(t){o=t}},t.TFormatSettings.$clone(s)))return n;i.set(t.ComposeDateTime(a,o)),n=!0}else n=t.TryStrToTime$1(e,i,t.TFormatSettings.$clone(s))}else n=t.TryStrToDate$1(e,i,s);return n},this.StrToDateTimeDef=function(e,i){return t.StrToDateTimeDef$1(e,i,t.TFormatSettings.$clone(t.FormatSettings))},this.StrToDateTimeDef$1=function(e,i,s){var n=0;return t.TryStrToDateTime$1(e,{get:function(){return n},set:function(t){n=t}},s)||(n=i),n},this.FormatDateTime=function(e,i){return t.FormatDateTime$1(e,i,t.FormatSettings)},this.FormatDateTime$1=function(e,i,s){var n="";function r(t,e,i){n+=pas.System.Copy(t,e,i)}function a(t){n+=t}function o(e,i){var s="";for(s=t.IntToStr(e);s.length<i;)s="0"+s;a(s)}var l=0,h=0,d=0,u=0,c=0,F=0,p=0,S=0;function m(e,i,n){var C,g="\0",b="\0",f=0,T=!1,y=0,E=0,L=0;if(!(i>1)){for(L=1,C=e.length,T=!1,!1,E=1;E<=C;){var B=g=e.charAt(E-1);if("'"===B||'"'===B)for(E+=1;E<C&&e.charAt(E-1)!==g;)E+=1;else if(!("A"!==B&&"a"!==B||0!==t.CompareText(pas.System.Copy(e,E,3),"A/P")&&0!==t.CompareText(pas.System.Copy(e,E,4),"AMPM")&&0!==t.CompareText(pas.System.Copy(e,E,5),"AM/PM"))){T=!0;break}E+=1}for(g="ÿ",b=" ","H";L<=C;){f=1,E=L+1;var D=g=t.UpperCase(e.charAt(L-1)).charAt(0);if("'"===D||'"'===D){for(;E<C&&e.charAt(E-1)!==g;)E+=1;r(e,L+1,(f=(E+=1)-L)-2)}else if("A"===D)if(0===t.CompareText(pas.System.Copy(e,L,4),"AMPM"))f=4,a(c<12?s.TimeAMString:s.TimePMString);else if(0===t.CompareText(pas.System.Copy(e,L,5),"AM/PM"))f=5,r(e,c<12?L:L+3,2);else{if(0!==t.CompareText(pas.System.Copy(e,L,3),"A/P"))throw t.EConvertError.$create("Create$1",["Illegal character in format string"]);f=3,r(e,c<12?L:L+2,1)}else if("/"===D)a(s.DateSeparator);else if(":"===D)a(s.TimeSeparator);else if(" "===D||"C"===D||"D"===D||"H"===D||"M"===D||"N"===D||"S"===D||"T"===D||"Y"===D||"Z"===D||"F"===D){for(;E<=C&&t.UpperCase(e.charAt(E-1))===g;)E+=1;f=E-L;var W=g;if(" "===W)r(e,L,f);else if("Y"===W)f>2?o(l,4):o(l%100,2);else if("M"===W)if("H"===b||n)o(F,1===f?0:2);else{var P=f;1===P?o(h,0):2===P?o(h,2):a(3===P?s.ShortMonthNames[h-1]:s.LongMonthNames[h-1])}else if("D"===W){var v=f;1===v?o(d,0):2===v?o(d,2):3===v?a(s.ShortDayNames[u-1]):4===v?a(s.LongDayNames[u-1]):m(5===v?s.ShortDateFormat:s.LongDateFormat,i+1,!1)}else"H"===W?T?(0===(y=c%12)&&(y=12),o(y,1===f?0:2)):o(c,1===f?0:2):"N"===W?o(F,1===f?0:2):"S"===W?o(p,1===f?0:2):"Z"===W?o(S,1===f?0:3):"T"===W?m(1===f?s.ShortTimeFormat:s.LongTimeFormat,i+1,!0):"C"===W?(m(s.ShortDateFormat,i+1,!1),0===c&&0===F&&0===p||(a(" "),m(s.LongTimeFormat,i+1,!0))):"F"===W&&(m(s.ShortDateFormat,i+1,!1),a(" "),m(s.LongTimeFormat,i+1,!0));b,b=g}else a(g);L+=f}}}return t.DecodeDateFully(i,{get:function(){return l},set:function(t){l=t}},{get:function(){return h},set:function(t){h=t}},{get:function(){return d},set:function(t){d=t}},{get:function(){return u},set:function(t){u=t}}),t.DecodeTime(i,{get:function(){return c},set:function(t){c=t}},{get:function(){return F},set:function(t){F=t}},{get:function(){return p},set:function(t){p=t}},{get:function(){return S},set:function(t){S=t}}),m(""!==e?e:"C",0,!1),n},this.CurrencyFormat=0,this.NegCurrFormat=0,this.CurrencyDecimals=0,this.CurrencyString="",this.CurrToStr=function(e){return t.FloatToStrF$1(e/1e4,1,-1,0,t.FormatSettings)},this.StrToCurr=function(e){var i=0;if(!t.TryStrToCurr(e,{get:function(){return i},set:function(t){i=t}}))throw t.EConvertError.$create("CreateFmt",[rtl.getResStr(pas.RTLConsts,"SInvalidCurrency"),pas.System.VarRecs(18,e)]);return i},this.TryStrToCurr=function(e,i){var s,n=0;return(s=t.TryStrToFloat$3(e,{get:function(){return n},set:function(t){n=t}},t.FormatSettings))&&i.set(rtl.trunc(1e4*n)),s},this.Supports$1=function(t,e,i){return null!==t&&0===t.QueryInterface(e,i)},this.TryStringToGUID=function(t,e){var i=!1;return 38===t.length&&((i=new RegExp("^\\{[0-9a-fA-F]{8}-[0-9a-fA-F]{4}-[0-9a-fA-F]{4}-[0-9a-fA-F]{4}-[0-9a-fA-F]{12}\\}$").test(t))?(rtl.strToGUIDR(t,e),i=!0):(e.D1=0,i))},this.StringToGUID=function(e){var i=pas.System.TGuid.$new();if(!t.TryStringToGUID(e,i))throw t.EConvertError.$create("CreateFmt",[rtl.getResStr(pas.RTLConsts,"SInvalidGUID"),pas.System.VarRecs(18,e)]);return i},rtl.createHelper(this,"TStringHelper",null,(function(){this.Empty="",this.GetLength=function(){return this.get().length},this.LowerCase=function(e){return t.LowerCase(e)},this.UpperCase=function(e){return t.UpperCase(e)},this.Contains=function(t){return""!==t&&pas.System.Pos(t,this.get())>0},this.IndexOf=function(e){return t.TStringHelper.IndexOf$4.call(this,e,0,t.TStringHelper.GetLength.call(this))},this.IndexOf$4=function(t,e,i){var s,n=0;return s=pas.System.Copy(this.get(),e+1,i),-1!==(n=pas.System.Pos(t,s)-1)&&(n+=e),n},this.Substring=function(e){return t.TStringHelper.Substring$1.call(this,e,t.TStringHelper.GetLength.call(this)-e)},this.Substring$1=function(t,e){return pas.System.Copy(this.get(),t+1,e)},this.ToInteger$1=function(){return t.StrToInt(this.get())},this.ToLower=function(){return t.TStringHelper.LowerCase(this.get())},this.ToUpper=function(){return t.TStringHelper.UpperCase(this.get())}})),rtl.createHelper(this,"TIntegerHelper",null,(function(){this.ToString$1=function(){return t.IntToStr(this.get())}})),t.$implcode=function(){e.DefaultShortMonthNames=["Jan","Feb","Mar","Apr","May","Jun","Jul","Aug","Sep","Oct","Nov","Dec"],e.DefaultLongMonthNames=["January","February","March","April","May","June","July","August","September","October","November","December"],e.DefaultShortDayNames=["Sun","Mon","Tue","Wed","Thu","Fri","Sat"],e.DefaultLongDayNames=["Sunday","Monday","Tuesday","Wednesday","Thursday","Friday","Saturday"],e.FInvariant=t.TFormatSettings.$new(),e.FInvariantCreated=!1,e.DoShowException=function(e){null!=t.OnShowException?t.OnShowException(e):window.alert(e)},e.CheckBoolStrs=function(){0===rtl.length(t.TrueBoolStrs)&&(t.TrueBoolStrs=rtl.arraySetLength(t.TrueBoolStrs,"",1),t.TrueBoolStrs[0]="True"),0===rtl.length(t.FalseBoolStrs)&&(t.FalseBoolStrs=rtl.arraySetLength(t.FalseBoolStrs,"",1),t.FalseBoolStrs[0]="False")},e.feInvalidFormat=1,e.feMissingArgument=2,e.feInvalidArgIndex=3,e.DoFormatError=function(e,i){var s=e;if(1===s)throw t.EConvertError.$create("CreateFmt",[rtl.getResStr(pas.RTLConsts,"SInvalidFormat"),pas.System.VarRecs(18,i)]);if(2===s)throw t.EConvertError.$create("CreateFmt",[rtl.getResStr(pas.RTLConsts,"SArgumentMissing"),pas.System.VarRecs(18,i)]);if(3===s)throw t.EConvertError.$create("CreateFmt",[rtl.getResStr(pas.RTLConsts,"SInvalidArgIndex"),pas.System.VarRecs(18,i)])},e.maxdigits=15,e.ReplaceDecimalSep=function(t,e){var i;return(i=pas.System.Pos(".",t))>0?pas.System.Copy(t,1,i-1)+e+pas.System.Copy(t,i+1,t.length-i):t},e.FormatGeneralFloat=function(i,s,n){var r="",a=0,o=0,l=0,h=0;if((-1===s||s>15)&&(s=15),r=rtl.floatToStr(i,s+7),r=t.TrimLeft(r),0===(a=pas.System.Pos(".",r)))return r;if(0===(o=pas.System.Pos("E",r)))return r=e.ReplaceDecimalSep(r,n);for(l=o+2,h=0;l<=r.length;)h=10*h+r.charCodeAt(l-1)-48,l+=1;if("-"===r.charAt(o+1-1)&&(h=-h),a+h<o&&h>-6){if(r=rtl.strSetLength(r,o-1),h>=0){for(var d=0,u=h-1;d<=u;d++)l=d,r=rtl.setCharAt(r,a-1,r.charAt(a+1-1)),a+=1;for(r=rtl.setCharAt(r,a-1,"."),a=1,"-"===r.charAt(a-1)&&(a+=1);"0"===r.charAt(a-1)&&a<r.length&&pas.System.Copy(r,a+1,n.length)!==n;)pas.System.Delete({get:function(){return r},set:function(t){r=t}},a,1)}else pas.System.Insert(pas.System.Copy("00000",1,-h),{get:function(){return r},set:function(t){r=t}},a-1),r=rtl.setCharAt(r,a-h-1,r.charAt(a-h-1-1)),r=rtl.setCharAt(r,a-1,"."),-1!==h&&(r=rtl.setCharAt(r,a-h-1-1,"0"));for(l=r.length;l>0&&"0"===r.charAt(l-1);)l-=1;"."===r.charAt(l-1)&&(l-=1),r=0===l||1===l&&"-"===r.charAt(0)?"0":rtl.strSetLength(r,l)}else{for(;"0"===r.charAt(o-1-1);)pas.System.Delete({get:function(){return r},set:function(t){r=t}},o-1,1),o-=1;for(r.charAt(o-1-1)===n&&(pas.System.Delete({get:function(){return r},set:function(t){r=t}},o-1,1),o-=1),"+"===r.charAt(o+1-1)?pas.System.Delete({get:function(){return r},set:function(t){r=t}},o+1,1):o+=1;"0"===r.charAt(o+1-1);)pas.System.Delete({get:function(){return r},set:function(t){r=t}},o+1,1)}return r=e.ReplaceDecimalSep(r,n)},e.FormatExponentFloat=function(i,s,n,r){var a="",o=0;for(r=t.FormatSettings.DecimalSeparator,(-1===s||s>15)&&(s=15),a=rtl.floatToStr(i,s+7);" "===a.charAt(0);)pas.System.Delete({get:function(){return a},set:function(t){a=t}},1,1);if(0===(o=pas.System.Pos("E",a)))return a=e.ReplaceDecimalSep(a,r);if(o+=2,n>4&&(n=4),(n=a.length-o-n+1)<0)pas.System.Insert(pas.System.Copy("0000",1,-n),{get:function(){return a},set:function(t){a=t}},o);else for(;n>0&&"0"===a.charAt(o-1);){if(pas.System.Delete({get:function(){return a},set:function(t){a=t}},o,1),o>a.length){pas.System.Delete({get:function(){return a},set:function(t){a=t}},o-2,2);break}n-=1}return a=e.ReplaceDecimalSep(a,r)},e.FormatFixedFloat=function(t,i,s){var n="";return-1===i?i=2:i>18&&(i=18),""!==(n=rtl.floatToStr(t,0,i))&&" "===n.charAt(0)&&pas.System.Delete({get:function(){return n},set:function(t){n=t}},1,1),n=e.ReplaceDecimalSep(n,s)},e.FormatNumberFloat=function(t,i,s,n){var r="",a=0;if(-1===i?i=2:i>15&&(i=15),""!==(r=rtl.floatToStr(t,0,i))&&" "===r.charAt(0)&&pas.System.Delete({get:function(){return r},set:function(t){r=t}},1,1),(a=pas.System.Pos(".",r))<=0&&(a=r.length+1),r=e.ReplaceDecimalSep(r,s),a-=3,""!==n&&"\0"!==n)for(;a>1;)"-"!==r.charAt(a-1-1)&&pas.System.Insert(n,{get:function(){return r},set:function(t){r=t}},a),a-=3;return r},e.RemoveLeadingNegativeSign=function(t,e,i){var s,n=!1,r=0;n=!1,s=i;for(var a=2,o=t.get().length;a<=o&&(r=a,n=t.get().charCodeAt(r-1)in rtl.createSet(48,e.charCodeAt(),69,43)||t.get().charAt(r-1)===s);a++);return n&&"-"===t.get().charAt(0)&&pas.System.Delete(t,1,1),n},e.FormatNumberCurrency=function(t,i,s){var n,r,a,o,l="",h=0;if(a=s.DecimalSeparator,o=s.ThousandSeparator,r=s.CurrencyString,-1===i?i=s.CurrencyDecimals:i>18&&(i=18),(n="-"===(l=rtl.floatToStr(t/1e4,0,i)).charAt(0))&&pas.System.Delete({get:function(){return l},set:function(t){l=t}},1,1),h=pas.System.Pos(".",l),""!==o)for(0!==h?l=e.ReplaceDecimalSep(l,a):h=l.length+1,h-=3;h>1;)pas.System.Insert(o,{get:function(){return l},set:function(t){l=t}},h),h-=3;if(n&&e.RemoveLeadingNegativeSign({get:function(){return l},set:function(t){l=t}},a,o),n){var d=s.NegCurrFormat;0===d?l="("+r+l+")":1===d?l="-"+r+l:2===d?l=r+"-"+l:3===d?l=r+l+"-":4===d?l="("+l+r+")":5===d?l="-"+l+r:6===d?l=l+"-"+r:7===d?l=l+r+"-":8===d?l="-"+l+" "+r:9===d?l="-"+r+" "+l:10===d?l=l+" "+r+"-":11===d?l=r+" "+l+"-":12===d?l=r+" -"+l:13===d?l=l+"- "+r:14===d?l="("+r+" "+l+")":15===d&&(l="("+l+" "+r+")")}else{var u=s.CurrencyFormat;0===u?l=r+l:1===u?l+=r:2===u?l=r+" "+l:3===u&&(l=l+" "+r)}return l},e.RESpecials="([\\$\\+\\[\\]\\(\\)\\\\\\.\\*\\^\\?\\|])";e.IntStrToDate=function(e,i,s,n){var r=0;function a(i){e.set(t.Format(rtl.getResStr(pas.RTLConsts,"SInvalidDateFormat"),pas.System.VarRecs(18,i)))}var o="",l=0,h=0,d=0,u=0,c=0,F=0,p=0,S=0,m=0,C=0,g=0,b=0,f=0,T=0,y="",E=[],L=!1;for(E=rtl.arraySetLength(E,0,4),r=0,m=i.length,e.set("");m>0&&pas.System.Pos(i.charAt(m-1)," \b\t\n\f\r")>0;)m-=1;if(0===m)return a(i),r;for(L=!1,"\0"===n&&(n="\0"!==t.FormatSettings.DateSeparator?t.FormatSettings.DateSeparator:"-"),o=t.UpperCase(s),f=0,b=0,g=0,T=0,S=0;S<o.length&&T<3;){S+=1;var B=o.charAt(S-1);"Y"===B?0===f&&(f=T+=1):"M"===B?0===b&&(b=T+=1):"D"===B&&0===g&&(g=T+=1)}for(S=1;S<=3;S++)E[S]=0;y="",p=0;for(var D=1,W=m;D<=W;D++)if(S=D,pas.System.Pos(i.charAt(S-1),"0123456789")>0&&(y+=i.charAt(S-1))," "===n||" "!==i.charAt(S-1))if(i.charAt(S-1)===n||S===m&&pas.System.Pos(i.charAt(S-1),"0123456789")>0){if((p+=1)>3)return a(i),r;if(p===f&&y.length>2&&(L=!0),pas.System.val$6(y,{a:p,p:E,get:function(){return this.p[this.a]},set:function(t){this.p[this.a]=t}},{get:function(){return C},set:function(t){C=t}}),0!==C)return a(i),r;y=""}else if(0===pas.System.Pos(i.charAt(S-1),"0123456789"))return a(i),r;return T<3&&p>T?(a(i),r):(t.DecodeDate(t.Date(),{get:function(){return u},set:function(t){u=t}},{get:function(){return F},set:function(t){F=t}},{get:function(){return c},set:function(t){c=t}}),3===p?(d=E[f],h=E[b],l=E[g]):(d=u,p<2?(l=E[1],h=F):g<b?(l=E[1],h=E[2]):(l=E[2],h=E[1])),d>=0&&d<100&&!L&&(u-=t.TwoDigitYearCenturyWindow,d+=100*rtl.trunc(u/100),t.TwoDigitYearCenturyWindow>0&&d<u&&(d+=100)),t.TryEncodeDate(d,h,l,{get:function(){return r},set:function(t){r=t}})||e.set(rtl.getResStr(pas.RTLConsts,"SErrInvalidDate")),r)};e.IntStrToTime=function(e,i,s,n){var r=0,a=0,o=[];return o=rtl.arraySetLength(o,0,4),a=0,function(e,r){var a=!1,o=0,l=0,h=0,d=0,u=0,c=0,F=0,p=!1,S=!1,m="",C="\0",g=0,b="";for(a=!1,r.set(0),S=!1,u=0,g=0;g<=3;g++)e.get()[g]=0;for(o=1;o<s&&" "===i.charAt(o-1);)o+=1;if(l=o,o>s-1||i.charAt(o-1)===n.TimeSeparator||i.charAt(o-1)===n.DecimalSeparator)return a;for(p=pas.System.Pos(i.charAt(o-1),"0123456789")>0;o<=s;){if(C=i.charAt(o-1),pas.System.Pos(C,"0123456789")>0){if(!p||u>3)return a;for(l=o,c="0"!==C?l:-1;o<s&&pas.System.Pos(i.charAt(o+1-1),"0123456789")>0;)-1===c&&"0"!==i.charAt(o-1)&&(c=o),o+=1;if(-1===c&&(c=o),!((h=1+o-c)<=2||h<=3&&3===u))return a;pas.System.val$6(pas.System.Copy(i,c,h),{get:function(){return F},set:function(t){F=t}},{get:function(){return d},set:function(t){d=t}}),e.get()[u]=F,u+=1,p=!1}else if(" "===C);else if(C===n.TimeSeparator){if(p||u>2)return a;p=!0,S=!1}else if(C===n.DecimalSeparator){if(p||S||3!==u)return a;p=!0,S=!0}else{if(0!==r.get()||p)return a;for(l=o,b=n.DecimalSeparator+" ","\0"!==n.TimeSeparator&&(b+=n.TimeSeparator);o<s&&0===pas.System.Pos(i.charAt(o+1-1),b)&&0===pas.System.Pos(i.charAt(o+1-1),"0123456789");)o+=1;if(h=1+o-l,m=pas.System.Copy(i,l,h),0===t.CompareText(m,n.TimeAMString))r.set(1);else if(0===t.CompareText(m,n.TimePMString))r.set(2);else if(0===t.CompareText(m,"AM"))r.set(1);else{if(0!==t.CompareText(m,"PM"))return a;r.set(2)}0===u?p=!0:(u=4,p=!1)}o+=1}return 0===u||0!==r.get()&&(e.get()[0]>12||0===e.get()[0])||p?a:a=!0}({get:function(){return o},set:function(t){o=t}},{get:function(){return a},set:function(t){a=t}})?(2===a&&12!==o[0]?o[0]+=12:1===a&&12===o[0]&&(o[0]=0),t.TryEncodeTime(o[0],o[1],o[2],o[3],{get:function(){return r},set:function(t){r=t}})||e.set(t.Format(rtl.getResStr(pas.RTLConsts,"SErrInvalidTimeFormat"),pas.System.VarRecs(18,i))),r):(e.set(t.Format(rtl.getResStr(pas.RTLConsts,"SErrInvalidTimeFormat"),pas.System.VarRecs(18,i))),r)};e.SplitDateTimeStr=function(e,i,s,n){var r=0,a=0,o=0;if(r=0,i.set(""),s.set(""),0===(e=t.Trim(e)).length)return r;if(" "===n.DateSeparator&&" "===n.TimeSeparator&&pas.System.Pos(" ",e)>0)return i.set(e),1;if(a=1," "!==n.DateSeparator)for(;a<e.length&&!(pas.System.Pos(e.charAt(a+1-1),"\t\n\r ")>0);)a+=1;else if(0!==(a=pas.System.Pos(n.TimeSeparator,e)))do{a-=1}while(!(0===a||pas.System.Pos(e.charAt(a-1),"\t\n\r ")>0));return 0===a&&(a=e.length),i.set(pas.System.Copy(e,1,a)),s.set(t.Trim(pas.System.Copy(e,a+1,100))),0!==s.get().length?r=2:(r=1,(n.DateSeparator!==n.TimeSeparator&&pas.System.Pos(n.TimeSeparator,i.get())>0||n.DateSeparator===n.TimeSeparator&&!t.TryStrToDate(i.get(),{get:function(){return o},set:function(t){o=t}}))&&(s.set(i.get()),i.set(""))),r},e.IntTryStrToInt=function(e,i,s){var n,r,a=10,o="";if(o=e,0!==pas.System.Pos(s,o)||0!==pas.System.Pos(".",o)||0!==pas.System.Pos(":",o)||pas.System.Pos("-",o)>1)return!1;var l=pas.System.Copy(o,1,1);return"$"===l?a=16:"&"===l?a=8:"%"===l&&(a=2),(16===a||0===pas.System.Pos("e",t.LowerCase(o)))&&(10!==a&&pas.System.Delete({get:function(){return o},set:function(t){o=t}},1,1),r=parseInt(o,a),(n=!isNaN(r))&&i.set(rtl.trunc(r)),n)},e.InitGlobalFormatSettings=function(){t.FormatSettings.$assign(t.TFormatSettings.Create()),t.TimeSeparator=t.FormatSettings.TimeSeparator,t.DateSeparator=t.FormatSettings.DateSeparator,t.ShortDateFormat=t.FormatSettings.ShortDateFormat,t.LongDateFormat=t.FormatSettings.LongDateFormat,t.ShortTimeFormat=t.FormatSettings.ShortTimeFormat,t.LongTimeFormat=t.FormatSettings.LongTimeFormat,t.DecimalSeparator=t.FormatSettings.DecimalSeparator,t.ThousandSeparator=t.FormatSettings.ThousandSeparator,t.TimeAMString=t.FormatSettings.TimeAMString,t.TimePMString=t.FormatSettings.TimePMString,t.CurrencyFormat=t.FormatSettings.CurrencyFormat,t.NegCurrFormat=t.FormatSettings.NegCurrFormat,t.CurrencyDecimals=t.FormatSettings.CurrencyDecimals,t.CurrencyString=t.FormatSettings.CurrencyString},t.$resourcestrings={SApplicationException:{org:"Application raised an exception: "}}},t.$init=function(){e.InitGlobalFormatSettings(),t.ShortMonthNames=e.DefaultShortMonthNames.slice(0),t.LongMonthNames=e.DefaultLongMonthNames.slice(0),t.ShortDayNames=e.DefaultShortDayNames.slice(0),t.LongDayNames=e.DefaultLongDayNames.slice(0)}}),[]),rtl.module("TypInfo",["System","SysUtils","Types","RTLConsts","JS"],(function(){"use strict";var t=this,e=t.$impl;this.pfGetFunction=1,this.pfSetProcedure=2,this.pfHasIndex=16,rtl.createClass(this,"EPropertyError",pas.SysUtils.Exception,(function(){})),this.GetPropInfo=function(t,e){var i=null,s=null,n=0,r=null;for(r=t;null!==r;){if(s=r.members[e],rtl.isExt(s,rtl.tTypeMemberProperty))return s;if(!rtl.isExt(r,rtl.tTypeInfoClass))break;r=r.ancestor}i=null;do{for(var a=0,o=t.properties.length-1;a<=o;a++)if(n=a,0===pas.SysUtils.CompareText(e,t.properties[n]))return s=t.members[t.properties[n]],rtl.isExt(s,rtl.tTypeMemberProperty)&&(i=s),i;if(!rtl.isExt(t,rtl.tTypeInfoClass))break;t=t.ancestor}while(null!==t);return i},this.FindPropInfo=function(e,i){var s;if(null===(s=t.GetPropInfo(e.$rtti,i)))throw t.EPropertyError.$create("CreateFmt",[rtl.getResStr(pas.RTLConsts,"SErrPropertyNotFound"),pas.System.VarRecs(18,i)]);return s},this.GetJSValueProp$1=function(i,s){var n=void 0,r=e.GetPropGetterKind(s);if(0===r)throw t.EPropertyError.$create("CreateFmt",[rtl.getResStr(pas.RTLConsts,"SCantReadPropertyS"),pas.System.VarRecs(18,s.name)]);if(1===r)n=i[s.getter];else if(2===r)n=(16&s.flags)>0?i[s.getter](s.index):i[s.getter]();else if(3===r)throw t.EPropertyError.$create("CreateFmt",[rtl.getResStr(pas.RTLConsts,"SIndexedPropertyNeedsParams"),pas.System.VarRecs(18,s.name)]);return n},this.GetJSValueProp$3=function(e,i){return t.GetJSValueProp$1(e,i)},this.SetJSValueProp$1=function(i,s,n){var r=e.GetPropSetterKind(s);if(0===r)throw t.EPropertyError.$create("CreateFmt",[rtl.getResStr(pas.RTLConsts,"SCantWritePropertyS"),pas.System.VarRecs(18,s.name)]);if(1===r)i[s.setter]=n;else if(2===r)(16&s.flags)>0?i[s.setter](s.index,n):i[s.setter](n);else if(3===r)throw t.EPropertyError.$create("CreateFmt",[rtl.getResStr(pas.RTLConsts,"SIndexedPropertyNeedsParams"),pas.System.VarRecs(18,s.name)])},this.SetJSValueProp$3=function(e,i,s){t.SetJSValueProp$1(e,i,s)},this.GetOrdProp$1=function(e,i){var s=0,n="",r=0,a=void 0;if(5===i.typeinfo.kind)for(n in s=0,t.GetJSValueProp$3(e,i))(r=parseInt(n,10))<32&&(s+=1<<r);else 2===i.typeinfo.kind?(a=t.GetJSValueProp$3(e,i),s=rtl.isNumber(a)?rtl.trunc(a):""===(n=""+a)?0:n.charCodeAt(0)):s=rtl.trunc(t.GetJSValueProp$3(e,i));return s},this.GetEnumName=function(t,e){return t.enumtype[e]},this.SetMethodProp=function(e,i,s){var n,r=null;r=null===(n=s.Code)?null:rtl.isFunction(n)?n.scope===s.Data&&(rtl.isFunction(n.fn)||rtl.isString(n.fn))?n:rtl.isString(n.fn)?rtl.createCallback(s.Data,""+n.fn):rtl.createCallback(s.Data,n):rtl.createCallback(s.Data,n),t.SetJSValueProp$3(e,i,r)},this.SetMethodProp$1=function(e,i,s){t.SetMethodProp(e,t.FindPropInfo(e,i),s)},t.$implcode=function(){e.TGetterKind={0:"gkNone",gkNone:0,1:"gkField",gkField:1,2:"gkFunction",gkFunction:2,3:"gkFunctionWithParams",gkFunctionWithParams:3},e.GetPropGetterKind=function(t){return""===t.getter?0:(1&t.flags)>0?rtl.length(t.params)>0?3:2:1},e.TSetterKind={0:"skNone",skNone:0,1:"skField",skField:1,2:"skProcedure",skProcedure:2,3:"skProcedureWithParams",skProcedureWithParams:3},e.GetPropSetterKind=function(t){return""===t.setter?0:(2&t.flags)>0?rtl.length(t.params)>0?3:2:1}}}),[]),rtl.module("Web",["System","Types","JS"],(function(){"use strict";rtl.createClassExt(this,"TJSFocusEvent",Event,"",(function(){this.$init=function(){},this.$final=function(){}})),this.$rtti.$ExtClass("TJSProgressEvent",{ancestor:this.$rtti.TJSEvent,jsclass:"ProgressEvent"}),this.$rtti.$ExtClass("TJSHTMLElement",{ancestor:this.$rtti.TJSElement,jsclass:"HTMLElement"}),this.$rtti.$ExtClass("TJSXMLHttpRequest",{ancestor:this.$rtti.TJSXMLHttpRequestEventTarget,jsclass:"XMLHttpRequest"}),rtl.createClass(this,"TJSKeyNames",pas.System.TObject,(function(){this.Alt="Alt",this.CapsLock="CapsLock",this.Control="Control",this.Shift="Shift",this.Enter="Enter",this.Tab="Tab",this.ArrowDown="ArrowDown",this.ArrowLeft="ArrowLeft",this.ArrowRight="ArrowRight",this.ArrowUp="ArrowUp",this._End="End",this.Home="Home",this.PageDown="PageDown",this.PageUp="PageUp",this.BackSpace="Backspace",this.Delete="Delete",this.Insert="Insert",this.Escape="Escape",this.Pause="Pause",this.F1="F1",this.F2="F2",this.F3="F3",this.F4="F4",this.F5="F5",this.F6="F6",this.F7="F7",this.F8="F8",this.F9="F9",this.F10="F10",this.F11="F11",this.F12="F12",this.F13="F13",this.F14="F14",this.F15="F15",this.F16="F16",this.F17="F17",this.F18="F18",this.F19="F19",this.F20="F20"}))})),rtl.module("Classes",["System","RTLConsts","Types","SysUtils","JS","TypInfo"],(function(){"use strict";var t=this,e=t.$impl;this.$rtti.$MethodVar("TNotifyEvent",{procsig:rtl.newTIProcSig([["Sender",pas.System.$rtti.TObject]]),methodkind:0}),rtl.createClass(this,"EListError",pas.SysUtils.Exception,(function(){})),rtl.createClass(this,"EStringListError",this.EListError,(function(){})),rtl.createClass(this,"EComponentError",pas.SysUtils.Exception,(function(){})),this.TAlignment={0:"taLeftJustify",taLeftJustify:0,1:"taRightJustify",taRightJustify:1,2:"taCenter",taCenter:2},this.$rtti.$Enum("TAlignment",{minvalue:0,maxvalue:2,ordtype:1,enumtype:this.TAlignment}),rtl.createClass(this,"TFPList",pas.System.TObject,(function(){this.$init=function(){pas.System.TObject.$init.call(this),this.FList=[],this.FCount=0,this.FCapacity=0},this.$final=function(){this.FList=void 0,pas.System.TObject.$final.call(this)},this.Get=function(t){return(t<0||t>=this.FCount)&&this.RaiseIndexError(t),this.FList[t]},this.Put=function(t,e){(t<0||t>=this.FCount)&&this.RaiseIndexError(t),this.FList[t]=e},this.SetCapacity=function(t){t<this.FCount&&this.$class.Error(rtl.getResStr(pas.RTLConsts,"SListCapacityError"),""+t),t!==this.FCapacity&&(this.FList=rtl.arraySetLength(this.FList,void 0,t),this.FCapacity=t)},this.SetCount=function(t){t<0&&this.$class.Error(rtl.getResStr(pas.RTLConsts,"SListCountError"),""+t),t>this.FCount&&t>this.FCapacity&&this.SetCapacity(t),this.FCount=t},this.RaiseIndexError=function(t){this.$class.Error(rtl.getResStr(pas.RTLConsts,"SListIndexError"),""+t)},this.Destroy=function(){this.Clear(),pas.System.TObject.Destroy.call(this)},this.Add=function(t){var e;return this.FCount===this.FCapacity&&this.Expand(),this.FList[this.FCount]=t,e=this.FCount,this.FCount+=1,e},this.Clear=function(){rtl.length(this.FList)>0&&(this.SetCount(0),this.SetCapacity(0))},this.Delete=function(t){(t<0||t>=this.FCount)&&this.$class.Error(rtl.getResStr(pas.RTLConsts,"SListIndexError"),""+t),this.FCount=this.FCount-1,this.FList.splice(t,1),this.FCapacity-=1},this.Error=function(e,i){throw t.EListError.$create("CreateFmt",[e,pas.System.VarRecs(18,i)])},this.Expand=function(){var t=0;return this.FCount<this.FCapacity||(t=4,this.FCapacity>3&&(t+=4),this.FCapacity>8&&(t+=8),this.FCapacity>127&&(t+=this.FCapacity>>>2),this.SetCapacity(this.FCapacity+t),this),this},this.IndexOf=function(t){var e,i=0;for(i=0,e=this.FCount;i<e&&this.FList[i]!=t;)i+=1;return i>=e&&(i=-1),i},this.IndexOfItem=function(t,e){var i=0;if(0===e)i=this.IndexOf(t);else for(i=this.FCount-1;i>=0&&this.FList[i]!=t;)i-=1;return i},this.Insert=function(t,e){(t<0||t>this.FCount)&&this.$class.Error(rtl.getResStr(pas.RTLConsts,"SListIndexError"),""+t),this.FList.splice(t,0,e),this.FCapacity+=1,this.FCount+=1},this.Last=function(){return 0===this.FCount?null:this.Get(this.FCount-1)},this.Remove=function(t){var e;return-1!==(e=this.IndexOf(t))&&this.Delete(e),e}})),this.TListNotification={0:"lnAdded",lnAdded:0,1:"lnExtracted",lnExtracted:1,2:"lnDeleted",lnDeleted:2},rtl.createClass(this,"TList",pas.System.TObject,(function(){this.$init=function(){pas.System.TObject.$init.call(this),this.FList=null},this.$final=function(){this.FList=void 0,pas.System.TObject.$final.call(this)},this.Get=function(t){return this.FList.Get(t)},this.Notify=function(t,e){pas.System.Assigned(t)},this.GetCount=function(){return this.FList.FCount},this.Create$1=function(){return pas.System.TObject.Create.call(this),this.FList=t.TFPList.$create("Create"),this},this.Destroy=function(){null!=this.FList&&this.Clear(),pas.SysUtils.FreeAndNil({p:this,get:function(){return this.p.FList},set:function(t){this.p.FList=t}})},this.Add=function(t){var e;return e=this.FList.Add(t),pas.System.Assigned(t)&&this.Notify(t,0),e},this.Clear=function(){for(;this.FList.FCount>0;)this.Delete(this.GetCount()-1)},this.Delete=function(t){var e;e=this.FList.Get(t),this.FList.Delete(t),pas.System.Assigned(e)&&this.Notify(e,2)},this.IndexOf=function(t){return this.FList.IndexOf(t)},this.Insert=function(t,e){this.FList.Insert(t,e),pas.System.Assigned(e)&&this.Notify(e,0)},this.Remove=function(t){var e;return-1!==(e=this.IndexOf(t))&&this.Delete(e),e}})),rtl.createClass(this,"TPersistent",pas.System.TObject,(function(){this.AssignError=function(t){var e="";throw e=null!==t?t.$classname:"Nil",pas.SysUtils.EConvertError.$create("Create$1",["Cannot assign a "+e+" to a "+this.$classname+"."])},this.AssignTo=function(t){t.AssignError(this)},this.GetOwner=function(){return null,null},this.Assign=function(t){null!==t?t.AssignTo(this):this.AssignError(null)},this.SetEvent=function(t,e,i){this.SetEvent$1(this,t,e,i)},this.SetEvent$1=function(t,e,i,s){var n=pas.System.TMethod.$new();n.Code=e.$class.MethodAddress(s),null!=n.Code&&(n.Data=e,pas.TypInfo.SetMethodProp$1(t,i,n))}})),rtl.createClass(this,"TStrings",this.TPersistent,(function(){this.$init=function(){t.TPersistent.$init.call(this),this.FSpecialCharsInited=!1,this.FAlwaysQuote=!1,this.FQuoteChar="\0",this.FDelimiter="\0",this.FNameValueSeparator="\0",this.FUpdateCount=0,this.FLBS=0,this.FSkipLastLineBreak=!1,this.FStrictDelimiter=!1,this.FLineBreak=""},this.GetName=function(t){var e="",i="";return this.GetNameValue(t,{get:function(){return e},set:function(t){e=t}},{get:function(){return i},set:function(t){i=t}}),e},this.GetValue=function(t){var e,i="",s="";return i="",-1!==(e=this.IndexOfName(t))&&this.GetNameValue(e,{get:function(){return s},set:function(t){s=t}},{get:function(){return i},set:function(t){i=t}}),i},this.SetDelimiter=function(t){this.CheckSpecialChars(),this.FDelimiter=t},this.DoSetTextStr=function(t,e){var i="",s=0;try{for(this.BeginUpdate(),e&&this.Clear(),s=1;this.GetNextLinebreak(t,{get:function(){return i},set:function(t){i=t}},{get:function(){return s},set:function(t){s=t}});)this.Add(i)}finally{this.EndUpdate()}},this.GetSkipLastLineBreak=function(){return this.CheckSpecialChars(),this.FSkipLastLineBreak},this.SetSkipLastLineBreak=function(t){this.CheckSpecialChars(),this.FSkipLastLineBreak=t},this.Error=function(e,i){throw t.EStringListError.$create("CreateFmt",[e,pas.System.VarRecs(18,pas.SysUtils.IntToStr(i))])},this.GetCapacity=function(){return this.GetCount()},this.GetObject=function(t){return null,null},this.GetTextStr=function(){var t="",e=0,i="";if(this.CheckSpecialChars(),this.FLineBreak!==pas.System.sLineBreak)i=this.FLineBreak;else{var s=this.FLBS;0===s?i="\n":1===s?i="\r\n":2===s&&(i="\r")}t="";for(var n=0,r=this.GetCount()-1;n<=r;n++)e=n,t+=this.Get(e),(e<this.GetCount()-1||!this.GetSkipLastLineBreak())&&(t+=i);return t},this.PutObject=function(t,e){},this.SetTextStr=function(t){this.CheckSpecialChars(),this.DoSetTextStr(t,!0)},this.SetUpdateState=function(t){},this.DoCompareText=function(t,e){return pas.SysUtils.CompareText(t,e)},this.SetDelimitedText=function(t){var e=0,i=0,s=!1;this.CheckSpecialChars(),this.BeginUpdate(),e=1,i=1,s=!1;try{if(this.Clear(),this.FStrictDelimiter)for(;e<=t.length;){if(s&&e<=t.length&&t.charAt(e-1)===this.FDelimiter&&(e+=1),e<=t.length)if(t.charAt(e-1)===this.FQuoteChar){for(i=e+1;i<=t.length&&(t.charAt(i-1)!==this.FQuoteChar||i+1<=t.length&&t.charAt(i+1-1)===this.FQuoteChar);)i<=t.length&&t.charAt(i-1)===this.FQuoteChar?i+=2:i+=1;this.Add(pas.SysUtils.StringReplace(pas.System.Copy(t,e+1,i-e-1),this.FQuoteChar+this.FQuoteChar,this.FQuoteChar,rtl.createSet(0))),e=i+1}else{for(i=e;i<=t.length&&t.charAt(i-1)!==this.FDelimiter;)i+=1;this.Add(pas.System.Copy(t,e,i-e)),e=i}else s&&this.Add("");s=!0}else for(;e<=t.length;){for(s&&e<=t.length&&t.charAt(e-1)===this.FDelimiter&&(e+=1);e<=t.length&&t.charCodeAt(e-1)<=32;)e+=1;if(e<=t.length)if(t.charAt(e-1)===this.FQuoteChar){for(i=e+1;i<=t.length&&(t.charAt(i-1)!==this.FQuoteChar||i+1<=t.length&&t.charAt(i+1-1)===this.FQuoteChar);)i<=t.length&&t.charAt(i-1)===this.FQuoteChar?i+=2:i+=1;this.Add(pas.SysUtils.StringReplace(pas.System.Copy(t,e+1,i-e-1),this.FQuoteChar+this.FQuoteChar,this.FQuoteChar,rtl.createSet(0))),e=i+1}else{for(i=e;i<=t.length&&t.charCodeAt(i-1)>32&&t.charAt(i-1)!==this.FDelimiter;)i+=1;this.Add(pas.System.Copy(t,e,i-e)),e=i}else s&&this.Add("");for(;e<=t.length&&t.charCodeAt(e-1)<=32;)e+=1;s=!0}}finally{this.EndUpdate()}},this.GetValueFromIndex=function(t){var e="",i="";return this.GetNameValue(t,{get:function(){return i},set:function(t){i=t}},{get:function(){return e},set:function(t){e=t}}),e},this.CheckSpecialChars=function(){this.FSpecialCharsInited||(this.FQuoteChar='"',this.FDelimiter=",",this.FNameValueSeparator="=",this.FLBS=pas.System.DefaultTextLineBreakStyle,this.FSpecialCharsInited=!0,this.FLineBreak=pas.System.sLineBreak)},this.GetNextLinebreak=function(t,e,i){var s,n,r=!1,a=0,o=0;return e.set(""),r=!1,t.length-i.get()<0?r:(s=t.indexOf("\n",i.get()-1)+1,n=t.indexOf("\r",i.get()-1)+1,o=1,s>0&&n>0?(s-n==1&&(o=2),a=s<n?s:n):a=s>0&&n<1?s:n>0&&s<1?n:t.length+1,e.set(pas.System.Copy(t,i.get(),a-i.get())),i.set(a+o),r=!0)},this.Create$1=function(){return pas.System.TObject.Create.call(this),this.FAlwaysQuote=!1,this},this.Destroy=function(){pas.System.TObject.Destroy.call(this)},this.Add=function(t){var e;return e=this.GetCount(),this.Insert(this.GetCount(),t),e},this.AddObject=function(t,e){var i;return i=this.Add(t),this.PutObject(i,e),i},this.AddStrings=function(t){for(var e=0,i=0,s=t.GetCount()-1;i<=s;i++)e=i,this.AddObject(t.Get(e),t.GetObject(e))},this.Assign=function(e){var i=null;if(t.TStrings.isPrototypeOf(e)){i=e,this.BeginUpdate();try{this.Clear(),this.FSpecialCharsInited=i.FSpecialCharsInited,this.FQuoteChar=i.FQuoteChar,this.FDelimiter=i.FDelimiter,this.FNameValueSeparator=i.FNameValueSeparator,this.FLBS=i.FLBS,this.FLineBreak=i.FLineBreak,this.AddStrings(i)}finally{this.EndUpdate()}}else t.TPersistent.Assign.call(this,e)},this.BeginUpdate=function(){0===this.FUpdateCount&&this.SetUpdateState(!0),this.FUpdateCount+=1},this.EndUpdate=function(){this.FUpdateCount>0&&(this.FUpdateCount-=1),0===this.FUpdateCount&&this.SetUpdateState(!1)},this.IndexOf=function(t){var e=0;for(e=0;e<this.GetCount()&&0!==this.DoCompareText(this.Get(e),t);)e+=1;return e===this.GetCount()&&(e=-1),e},this.IndexOfName=function(t){var e=0,i=0,s="";for(this.CheckSpecialChars(),e=0;e<this.GetCount();){if(s=this.Get(e),(i=pas.System.Pos(this.FNameValueSeparator,s)-1)>=0&&0===this.DoCompareText(t,pas.System.Copy(s,1,i)))return e;e+=1}return e=-1},this.GetNameValue=function(t,e,i){var s;this.CheckSpecialChars(),i.set(this.Get(t)),0!==(s=pas.System.Pos(this.FNameValueSeparator,i.get()))?(e.set(pas.System.Copy(i.get(),1,s-1)),i.set(pas.System.Copy(i.get(),s+1,i.get().length-s))):e.set("")}})),rtl.recNewT(this,"TStringItem",(function(){this.FString="",this.FObject=null,this.$eq=function(t){return this.FString===t.FString&&this.FObject===t.FObject},this.$assign=function(t){return this.FString=t.FString,this.FObject=t.FObject,this}})),this.TStringsSortStyle={0:"sslNone",sslNone:0,1:"sslUser",sslUser:1,2:"sslAuto",sslAuto:2},rtl.createClass(this,"TStringList",this.TStrings,(function(){this.$init=function(){t.TStrings.$init.call(this),this.FList=[],this.FCount=0,this.FOnChange=null,this.FOnChanging=null,this.FDuplicates=0,this.FCaseSensitive=!1,this.FOwnsObjects=!1,this.FSortStyle=0},this.$final=function(){this.FList=void 0,this.FOnChange=void 0,this.FOnChanging=void 0,t.TStrings.$final.call(this)},this.GetSorted=function(){return this.FSortStyle in rtl.createSet(1,2)},this.Grow=function(){var t=0;(t=this.GetCapacity())>=256?t+=rtl.trunc(t/4):0===t?t=4:t*=4,this.SetCapacity(t)},this.InternalClear=function(t,e){var i=0;if(t<this.FCount){if(this.FOwnsObjects)for(var s=t,n=this.FCount-1;s<=n;s++)i=s,this.FList[i].FString="",pas.SysUtils.FreeAndNil({p:this.FList[i],get:function(){return this.p.FObject},set:function(t){this.p.FObject=t}});else for(var r=t,a=this.FCount-1;r<=a;r++)i=r,this.FList[i].FString="";this.FCount=t}e||this.SetCapacity(0)},this.CheckIndex=function(t){(t<0||t>=this.FCount)&&this.Error(rtl.getResStr(pas.RTLConsts,"SListIndexError"),t)},this.Changed=function(){0===this.FUpdateCount&&null!=this.FOnChange&&this.FOnChange(this)},this.Changing=function(){0===this.FUpdateCount&&null!=this.FOnChanging&&this.FOnChanging(this)},this.Get=function(t){return this.CheckIndex(t),this.FList[t].FString},this.GetCapacity=function(){return rtl.length(this.FList)},this.GetCount=function(){return this.FCount},this.GetObject=function(t){return this.CheckIndex(t),this.FList[t].FObject},this.PutObject=function(t,e){this.CheckIndex(t),this.Changing(),this.FList[t].FObject=e,this.Changed()},this.SetCapacity=function(e){e<0&&this.Error(rtl.getResStr(pas.RTLConsts,"SListCapacityError"),e),e!==this.GetCapacity()&&(this.FList=rtl.arraySetLength(this.FList,t.TStringItem,e))},this.SetUpdateState=function(t){t?this.Changing():this.Changed()},this.InsertItem=function(t,e){this.InsertItem$1(t,e,null)},this.InsertItem$1=function(e,i,s){var n=t.TStringItem.$new();this.Changing(),this.FCount===this.GetCapacity()&&this.Grow(),n.FString=i,n.FObject=s,this.FList.splice(e,0,n),this.FCount+=1,this.Changed()},this.DoCompareText=function(t,e){return this.CompareStrings(t,e)},this.CompareStrings=function(t,e){return this.FCaseSensitive?pas.SysUtils.CompareStr(t,e):pas.SysUtils.CompareText(t,e)},this.Destroy=function(){this.InternalClear(0,!1),t.TStrings.Destroy.call(this)},this.Add=function(t){var e=0;if(2!==this.FSortStyle)e=this.FCount;else if(this.Find(t,{get:function(){return e},set:function(t){e=t}})){var i=this.FDuplicates;if(0===i)return e;2===i&&this.Error(rtl.getResStr(pas.RTLConsts,"SDuplicateString"),0)}return this.InsertItem(e,t),e},this.Clear=function(){0!==this.FCount&&(this.Changing(),this.InternalClear(0,!1),this.Changed())},this.Find=function(e,i){var s=!1,n=0,r=0,a=0,o=0;if(s=!1,i.set(-1),!this.GetSorted())throw t.EListError.$create("Create$1",[rtl.getResStr(pas.RTLConsts,"SErrFindNeedsSortedList")]);for(n=0,r=this.GetCount()-1;n<=r;)a=n+rtl.trunc((r-n)/2),(o=this.DoCompareText(e,this.FList[a].FString))>0?n=a+1:(r=a-1,0===o&&(s=!0,1!==this.FDuplicates&&(n=a)));return i.set(n),s},this.IndexOf=function(e){var i=0;return this.GetSorted()?this.Find(e,{get:function(){return i},set:function(t){i=t}})||(i=-1):i=t.TStrings.IndexOf.call(this,e),i},this.Insert=function(t,e){2===this.FSortStyle?this.Error(rtl.getResStr(pas.RTLConsts,"SSortedListError"),0):((t<0||t>this.FCount)&&this.Error(rtl.getResStr(pas.RTLConsts,"SListIndexError"),t),this.InsertItem(t,e))}})),rtl.createClass(this,"TCollectionItem",this.TPersistent,(function(){this.$init=function(){t.TPersistent.$init.call(this),this.FCollection=null,this.FID=0},this.$final=function(){this.FCollection=void 0,t.TPersistent.$final.call(this)},this.GetIndex=function(){return null!=this.FCollection?this.FCollection.FItems.IndexOf(this):-1},this.SetCollection=function(t){t!==this.FCollection&&(null!=this.FCollection&&this.FCollection.RemoveItem(this),null!=t&&t.InsertItem(this))},this.Changed=function(t){null!==this.FCollection&&0===this.FCollection.FUpdateCount&&(t?this.FCollection.Update(null):this.FCollection.Update(this))},this.GetOwner=function(){return this.FCollection},this.SetDisplayName=function(t){this.Changed(!1)},this.Create$1=function(t){return pas.System.TObject.Create.call(this),this.SetCollection(t),this},this.Destroy=function(){this.SetCollection(null),pas.System.TObject.Destroy.call(this)}})),this.TCollectionNotification={0:"cnAdded",cnAdded:0,1:"cnExtracting",cnExtracting:1,2:"cnDeleting",cnDeleting:2},rtl.createClass(this,"TCollection",this.TPersistent,(function(){this.$init=function(){t.TPersistent.$init.call(this),this.FItemClass=null,this.FItems=null,this.FUpdateCount=0,this.FNextID=0,this.FPropName=""},this.$final=function(){this.FItemClass=void 0,this.FItems=void 0,t.TPersistent.$final.call(this)},this.GetCount=function(){return this.FItems.FCount},this.InsertItem=function(t){this.FItemClass.isPrototypeOf(t)&&(this.FItems.Add(t),t.FCollection=this,t.FID=this.FNextID,this.FNextID+=1,this.SetItemName(t),this.Notify(t,0),this.Changed())},this.RemoveItem=function(t){var e;this.Notify(t,1),-1!==(e=this.FItems.IndexOfItem(t,1))&&this.FItems.Delete(e),t.FCollection=null,this.Changed()},this.DoClear=function(){for(var t=null;this.FItems.FCount>0;)null!=(t=rtl.getObject(this.FItems.Last()))&&t.$destroy("Destroy")},this.Changed=function(){0===this.FUpdateCount&&this.Update(null)},this.GetItem=function(t){return rtl.getObject(this.FItems.Get(t))},this.SetItemName=function(t){},this.Update=function(t){},this.Notify=function(t,e){},this.Create$1=function(e){return pas.System.TObject.Create.call(this),this.FItemClass=e,this.FItems=t.TFPList.$create("Create"),this},this.Destroy=function(){this.FUpdateCount=1;try{this.DoClear()}finally{this.FUpdateCount=0}null!=this.FItems&&this.FItems.$destroy("Destroy"),pas.System.TObject.Destroy.call(this)},this.Owner=function(){return this.GetOwner()},this.Add=function(){return this.FItemClass.$create("Create$1",[this])},this.Assign=function(e){var i=0;if(t.TCollection.isPrototypeOf(e)){this.Clear();for(var s=0,n=e.GetCount()-1;s<=n;s++)i=s,this.Add().Assign(e.GetItem(i))}else t.TPersistent.Assign.call(this,e)},this.BeginUpdate=function(){this.FUpdateCount+=1},this.Clear=function(){if(0!==this.FItems.FCount){this.BeginUpdate();try{this.DoClear()}finally{this.EndUpdate()}}},this.EndUpdate=function(){this.FUpdateCount>0&&(this.FUpdateCount-=1),0===this.FUpdateCount&&this.Changed()},this.Delete=function(t){var e=null;e=rtl.getObject(this.FItems.Get(t)),this.Notify(e,2),null!=e&&e.$destroy("Destroy")}})),rtl.createClass(this,"TOwnedCollection",this.TCollection,(function(){this.$init=function(){t.TCollection.$init.call(this),this.FOwner=null},this.$final=function(){this.FOwner=void 0,t.TCollection.$final.call(this)},this.GetOwner=function(){return this.FOwner},this.Create$2=function(e,i){return this.FOwner=e,t.TCollection.Create$1.call(this,i),this}})),this.TOperation={0:"opInsert",opInsert:0,1:"opRemove",opRemove:1},this.TComponentStateItem={0:"csLoading",csLoading:0,1:"csReading",csReading:1,2:"csWriting",csWriting:2,3:"csDestroying",csDestroying:3,4:"csDesigning",csDesigning:4,5:"csAncestor",csAncestor:5,6:"csUpdating",csUpdating:6,7:"csFixups",csFixups:7,8:"csFreeNotification",csFreeNotification:8,9:"csInline",csInline:9,10:"csDesignInstance",csDesignInstance:10},this.TComponentStyleItem={0:"csInheritable",csInheritable:0,1:"csCheckPropAvail",csCheckPropAvail:1,2:"csSubComponent",csSubComponent:2,3:"csTransient",csTransient:3},this.$rtti.$inherited("TComponentName",rtl.string,{}),rtl.createClass(this,"TComponent",this.TPersistent,(function(){this.$init=function(){t.TPersistent.$init.call(this),this.FOwner=null,this.FName="",this.FTag=0,this.FComponents=null,this.FFreeNotifies=null,this.FComponentState={},this.FComponentStyle={},this.FLeft=0,this.FTop=0},this.$final=function(){this.FOwner=void 0,this.FComponents=void 0,this.FFreeNotifies=void 0,this.FComponentState=void 0,this.FComponentStyle=void 0,t.TPersistent.$final.call(this)},this.GetComponent=function(t){return null==this.FComponents?null:rtl.getObject(this.FComponents.Get(t))},this.GetComponentCount=function(){return null==this.FComponents?0:this.FComponents.FCount},this.Insert=function(e){null==this.FComponents&&(this.FComponents=t.TFPList.$create("Create")),this.FComponents.Add(e),e.FOwner=this},this.Remove=function(t){t.FOwner=null,null!=this.FComponents&&(this.FComponents.Remove(t),0===this.FComponents.FCount&&(this.FComponents.$destroy("Destroy"),this.FComponents=null))},this.RemoveNotification=function(t){null!==this.FFreeNotifies&&(this.FFreeNotifies.Remove(t),0===this.FFreeNotifies.FCount&&(this.FFreeNotifies.$destroy("Destroy"),this.FFreeNotifies=null,this.FComponentState=rtl.excludeSet(this.FComponentState,8)))},this.SetReference=function(t){var e=null,i=null,s=null;""!==this.FName&&null!=this.FOwner&&(s=this.FOwner,null!=(e=this.FOwner.$class.FieldAddress(this.FName))&&(i=t?this:null,s[""+e.name]=i))},this.ChangeName=function(t){this.FName=t},this.GetOwner=function(){return this.FOwner},this.Loaded=function(){this.FComponentState=rtl.excludeSet(this.FComponentState,0)},this.Loading=function(){this.FComponentState=rtl.includeSet(this.FComponentState,0)},this.Notification=function(t,e){var i=0;if(1===e&&this.RemoveFreeNotification(t),null!=this.FComponents)for(i=this.FComponents.FCount-1;i>=0;)rtl.getObject(this.FComponents.Get(i)).Notification(t,e),(i-=1)>=this.FComponents.FCount&&(i=this.FComponents.FCount-1)},this.SetDesigning=function(t,e){var i=0;if(this.FComponentState=t?rtl.includeSet(this.FComponentState,4):rtl.excludeSet(this.FComponentState,4),null!=this.FComponents&&e)for(var s=0,n=this.FComponents.FCount-1;s<=n;s++)i=s,rtl.getObject(this.FComponents.Get(i)).SetDesigning(t,!0)},this.SetName=function(e){if(this.FName!==e){if(""!==e&&!pas.SysUtils.IsValidIdent(e,!1,!1))throw t.EComponentError.$create("CreateFmt",[rtl.getResStr(pas.RTLConsts,"SInvalidName"),pas.System.VarRecs(18,e)]);null!=this.FOwner?this.FOwner.ValidateRename(this,this.FName,e):this.ValidateRename(null,this.FName,e),this.SetReference(!1),this.ChangeName(e),this.SetReference(!0)}},this.SetParentComponent=function(t){},this.ValidateRename=function(e,i,s){if(null!==e&&0!==pas.SysUtils.CompareText(i,s)&&e.FOwner===this&&null!==this.FindComponent(s))throw t.EComponentError.$create("CreateFmt",[rtl.getResStr(pas.RTLConsts,"SDuplicateName"),pas.System.VarRecs(18,s)]);4 in this.FComponentState&&null!==this.FOwner&&this.FOwner.ValidateRename(e,i,s)},this.ValidateContainer=function(t){t.ValidateInsert(this)},this.ValidateInsert=function(t){},this._AddRef=function(){return-1,-1},this.GetLeft=function(){return this.FLeft},this.GetTop=function(){return this.FTop},this.SetLeft=function(t){this.FLeft=t},this.SetTop=function(t){this.FTop=t},this._Release=function(){return-1,-1},this.Create$1=function(t){return this.FComponentStyle=rtl.createSet(0),null!=t&&t.InsertComponent(this),this},this.Destroy=function(){var t=0,e=null;if(this.Destroying(),null!=this.FFreeNotifies){for(t=this.FFreeNotifies.FCount-1;t>=0;)e=rtl.getObject(this.FFreeNotifies.Get(t)),this.FFreeNotifies.Delete(t),e.Notification(this,1),null===this.FFreeNotifies?t=0:t>this.FFreeNotifies.FCount&&(t=this.FFreeNotifies.FCount),t-=1;pas.SysUtils.FreeAndNil({p:this,get:function(){return this.p.FFreeNotifies},set:function(t){this.p.FFreeNotifies=t}})}this.DestroyComponents(),null!==this.FOwner&&this.FOwner.RemoveComponent(this),pas.System.TObject.Destroy.call(this)},this.BeforeDestruction=function(){3 in this.FComponentState||this.Destroying()},this.DestroyComponents=function(){for(var t=null;null!=this.FComponents;)t=rtl.getObject(this.FComponents.Last()),this.Remove(t),t.$destroy("Destroy")},this.Destroying=function(){var t=0;if(!(3 in this.FComponentState)&&(this.FComponentState=rtl.includeSet(this.FComponentState,3),null!=this.FComponents))for(var e=0,i=this.FComponents.FCount-1;e<=i;e++)t=e,rtl.getObject(this.FComponents.Get(t)).Destroying()},this.QueryInterface=function(t,e){return this.GetInterface(t,e)?0:-2147467262},this.AfterLoadDFMValues=function(){this.EndUpdate(),this.Loaded()},this.BeforeLoadDFMValues=function(){4 in this.FComponentState||this.Loading(),this.BeginUpdate()},this.BeginUpdate=function(){},this.EndUpdate=function(){},this.FindComponent=function(t){var e=null,i=0;if(e=null,""===t||null==this.FComponents)return e;for(var s=0,n=this.FComponents.FCount-1;s<=n;s++)if(i=s,0===pas.SysUtils.CompareText(rtl.getObject(this.FComponents.Get(i)).FName,t))return e=rtl.getObject(this.FComponents.Get(i));return e},this.FreeNotification=function(e){null!==this.FOwner&&e===this.FOwner||(null==this.FFreeNotifies&&(this.FFreeNotifies=t.TFPList.$create("Create")),-1===this.FFreeNotifies.IndexOf(e)&&(this.FFreeNotifies.Add(e),e.FreeNotification(this)))},this.RemoveFreeNotification=function(t){this.RemoveNotification(t),t.RemoveNotification(this)},this.InsertComponent=function(t){t.ValidateContainer(this),this.ValidateRename(t,"",t.FName),null!==t.FOwner&&t.FOwner.RemoveComponent(t),this.Insert(t),4 in this.FComponentState&&t.SetDesigning(!0,!0),this.Notification(t,0)},this.RemoveComponent=function(t){this.Notification(t,1),this.Remove(t),t.SetDesigning(!1,!0),this.ValidateRename(t,t.FName,"")},rtl.addIntf(this,pas.System.IUnknown);var e=this.$rtti;e.addProperty("Name",6,t.$rtti.TComponentName,"FName","SetName"),e.addProperty("Tag",0,rtl.nativeint,"FTag","FTag",4,{Default:0})})),rtl.createClass(this,"TStream",pas.System.TObject,(function(){})),rtl.createClass(this,"TLoadHelper",pas.System.TObject,(function(){})),this.TShiftState$a={0:"ssShift",ssShift:0,1:"ssAlt",ssAlt:1,2:"ssCtrl",ssCtrl:2,3:"ssLeft",ssLeft:3,4:"ssRight",ssRight:4,5:"ssMIDdle",ssMIDdle:5,6:"ssDouble",ssDouble:6,7:"ssTouch",ssTouch:7,8:"ssPen",ssPen:8,9:"ssCommand",ssCommand:9},this.$rtti.$Enum("TShiftState$a",{minvalue:0,maxvalue:9,ordtype:1,enumtype:this.TShiftState$a}),this.$rtti.$Set("TShiftState",{comptype:this.$rtti.TShiftState$a}),this.GetClass=function(t){var i=null;return i=null,""===t?i:e.ClassList.hasOwnProperty(t)?i=rtl.getObject(e.ClassList[t]):i},this.SetLoadHelperClass=function(t){var i;return i=e.GlobalLoadHelper,e.GlobalLoadHelper=t,i},t.$implcode=function(){e.GlobalLoadHelper=null,e.ClassList=null},t.$init=function(){e.ClassList=new Object}}),["Web"]),rtl.module("UITypes",["System"],(function(){"use strict";this.$rtti.$inherited("TFontName",rtl.string,{})})),rtl.module("WEBLib.Consts",["System"],(function(){"use strict";this.$resourcestrings={SWarning:{org:"Warning"},SError:{org:"Error"},SInformation:{org:"Information"},SConfirm:{org:"Confirm"},SOK:{org:"OK"},SCancel:{org:"Cancel"},SYes:{org:"Yes"},SNo:{org:"No"},SAbort:{org:"Abort"},SRetry:{org:"Retry"},SIgnore:{org:"Ignore"},SHelp:{org:"Help"},SClose:{org:"Close"},SAll:{org:"All"},SYesToAll:{org:"Yes to all"},SNoToAll:{org:"No to all"},SWarningFR:{org:"Avertissement"},SErrorFR:{org:"Erreur"},SInformationFR:{org:"Information"},SConfirmFR:{org:"Confirmer"},SOKFR:{org:"OK"},SCancelFR:{org:"Annuler"},SYesFR:{org:"Oui"},SNoFR:{org:"Non"},SAbortFR:{org:"Interrompre"},SRetryFR:{org:"Réessayer"},SIgnoreFR:{org:"Ignorer"},SHelpFR:{org:"Aide"},SCloseFR:{org:"Fermer"},SAllFR:{org:"Tout"},SYesToAllFR:{org:"Oui à tout"},SNoToAllFR:{org:"Non à tout"},SWarningDE:{org:"Warnung"},SErrorDE:{org:"Fehler"},SInformationDE:{org:"Information"},SConfirmDE:{org:"Bestätigen"},SOKDE:{org:"OK"},SCancelDE:{org:"Abbrechen"},SYesDE:{org:"Ja"},SNoDE:{org:"Nein"},SAbortDE:{org:"Abbrechen"},SRetryDE:{org:"Wiederholen"},SIgnoreDE:{org:"Ignorieren"},SHelpDE:{org:"Hilfe"},SCloseDE:{org:"Schließen"},SAllDE:{org:"Alles"},SYesToAllDE:{org:"Ja auf Alles"},SNoToAllDE:{org:"Nein auf Alles"},SWarningES:{org:"Advertencia"},SErrorES:{org:"Error"},SInformationES:{org:"Información"},SConfirmES:{org:"Confirmado"},SOKES:{org:"OK"},SCancelES:{org:"Cancelar"},SYesES:{org:"Sí"},SNoES:{org:"No"},SAbortES:{org:"Abortar"},SRetryES:{org:"Rever"},SIgnoreES:{org:"Ignorar"},SHelpES:{org:"Ayudar"},SCloseES:{org:"Cerrar"},SAllES:{org:"Todos"},SYesToAllES:{org:"Sí a todo"},SNoToAllES:{org:"No a todo"},SWarningNL:{org:"Waarschuwing"},SErrorNL:{org:"Fout"},SInformationNL:{org:"Informatie"},SConfirmNL:{org:"Bevestiging"},SOKNL:{org:"OK"},SCancelNL:{org:"Afbreken"},SYesNL:{org:"Ja"},SNoNL:{org:"Nee"},SAbortNL:{org:"Afbreken"},SRetryNL:{org:"Opnieuw"},SIgnoreNL:{org:"Negeren"},SHelpNL:{org:"Hulp"},SCloseNL:{org:"Sluiten"},SAllNL:{org:"Alles"},SYesToAllNL:{org:"Ja op alles"},SNoToAllNL:{org:"Nee op alles"}}})),rtl.module("WEBLib.Dialogs",["System","Classes","WEBLib.Controls","Web","JS","SysUtils","WEBLib.Graphics"],(function(){"use strict";var t=this,e=t.$impl;this.TMsgDlgType={0:"mtWarning",mtWarning:0,1:"mtError",mtError:1,2:"mtInformation",mtInformation:2,3:"mtConfirmation",mtConfirmation:3,4:"mtCustom",mtCustom:4},this.$rtti.$Enum("TMsgDlgType",{minvalue:0,maxvalue:4,ordtype:1,enumtype:this.TMsgDlgType}),this.TMsgDlgBtn={0:"mbYes",mbYes:0,1:"mbNo",mbNo:1,2:"mbOK",mbOK:2,3:"mbCancel",mbCancel:3,4:"mbAbort",mbAbort:4,5:"mbRetry",mbRetry:5,6:"mbIgnore",mbIgnore:6,7:"mbAll",mbAll:7,8:"mbNoToAll",mbNoToAll:8,9:"mbYesToAll",mbYesToAll:9,10:"mbHelp",mbHelp:10,11:"mbClose",mbClose:11},this.$rtti.$Enum("TMsgDlgBtn",{minvalue:0,maxvalue:11,ordtype:1,enumtype:this.TMsgDlgBtn}),this.$rtti.$Set("TMsgDlgButtons",{comptype:this.$rtti.TMsgDlgBtn}),rtl.createClass(this,"TCustomDialogButton",pas.Classes.TCollectionItem,(function(){this.$init=function(){pas.Classes.TCollectionItem.$init.call(this),this.FCaption="",this.FTag=0,this.FElementClassName=""};var t=this.$rtti;t.addProperty("Caption",0,rtl.string,"FCaption","FCaption"),t.addProperty("ElementClassName",0,pas["WEBLib.Controls"].$rtti.TElementClassName,"FElementClassName","FElementClassName"),t.addProperty("Tag",0,rtl.longint,"FTag","FTag",4,{Default:0})})),rtl.createClass(this,"TCustomDialogButtons",pas.Classes.TOwnedCollection,(function(){this.GetItem$1=function(t){return this.GetItem(t)}})),rtl.createClass(this,"TMessageDlg",pas["WEBLib.Controls"].TCustomControl,(function(){this.$init=function(){pas["WEBLib.Controls"].TCustomControl.$init.call(this),this.FOpacity=0,this.FLayer$1=null,this.FDlg=null,this.FCancel=null,this.FMessage="",this.FTitle="",this.FMsgDlgType=0,this.FOnButtonClick=null,this.FOnClose=null,this.FButtons={},this.FDialogProc=null,this.FDialogResult=0,this.FMdx=0,this.FMdy=0,this.FDlgX=0,this.FDlgY=0,this.FCaptured$1=!1,this.FDown=!1,this.FElementTitleClassName="",this.FElementButtonClassName="",this.FElementContentClassName="",this.FDialogText=null,this.FCustomButtons=null,this.FElementDialogClassName="",this.FAutoLanguage=!1,this.FUseMaterial=!1},this.$final=function(){this.FLayer$1=void 0,this.FDlg=void 0,this.FCancel=void 0,this.FOnButtonClick=void 0,this.FOnClose=void 0,this.FButtons=void 0,this.FDialogProc=void 0,this.FDialogText=void 0,this.FCustomButtons=void 0,pas["WEBLib.Controls"].TCustomControl.$final.call(this)},this.SetDialogText=function(t){this.FDialogText.Assign(t)},this.SetCustomButtons=function(t){this.FCustomButtons.Assign(t)},this.CreateElement=function(){var t=null;return 4 in this.FComponentState?t=null:pas["WEBLib.Controls"].TCustomControl.CreateElement.call(this),t};this.GetDialogText=function(t){var e="",i="",s=0;if(e="Undefined",t<this.FDialogText.GetCount()&&(e=this.FDialogText.Get(t)),this.FAutoLanguage){i=pas["WEBLib.WebTools"].GetBrowserLocale(),s=0,1===pas.System.Pos("es",i)&&(s=3),1===pas.System.Pos("fr",i)&&(s=1),1===pas.System.Pos("de",i)&&(s=2),1===pas.System.Pos("nl",i)&&(s=4);var n=s;if(3===n){var r=t;0===r?e=rtl.getResStr(pas["WEBLib.Consts"],"SWarningES"):1===r?e=rtl.getResStr(pas["WEBLib.Consts"],"SErrorES"):2===r?e=rtl.getResStr(pas["WEBLib.Consts"],"SInformationES"):3===r?e=rtl.getResStr(pas["WEBLib.Consts"],"SConfirmES"):5===r?e=rtl.getResStr(pas["WEBLib.Consts"],"SOKES"):6===r?e=rtl.getResStr(pas["WEBLib.Consts"],"SCancelES"):7===r?e=rtl.getResStr(pas["WEBLib.Consts"],"SYesES"):8===r?e=rtl.getResStr(pas["WEBLib.Consts"],"SNoES"):9===r?e=rtl.getResStr(pas["WEBLib.Consts"],"SAbortES"):10===r?e=rtl.getResStr(pas["WEBLib.Consts"],"SRetryES"):11===r?e=rtl.getResStr(pas["WEBLib.Consts"],"SIgnoreES"):12===r?e=rtl.getResStr(pas["WEBLib.Consts"],"SAllES"):13===r?e=rtl.getResStr(pas["WEBLib.Consts"],"SYesToAllES"):14===r?e=rtl.getResStr(pas["WEBLib.Consts"],"SNoToAllES"):15===r?e=rtl.getResStr(pas["WEBLib.Consts"],"SHelpES"):16===r&&(e=rtl.getResStr(pas["WEBLib.Consts"],"SCloseES"))}else if(1===n){var a=t;0===a?e=rtl.getResStr(pas["WEBLib.Consts"],"SWarningFR"):1===a?e=rtl.getResStr(pas["WEBLib.Consts"],"SErrorFR"):2===a?e=rtl.getResStr(pas["WEBLib.Consts"],"SInformationFR"):3===a?e=rtl.getResStr(pas["WEBLib.Consts"],"SConfirmFR"):5===a?e=rtl.getResStr(pas["WEBLib.Consts"],"SOKFR"):6===a?e=rtl.getResStr(pas["WEBLib.Consts"],"SCancelFR"):7===a?e=rtl.getResStr(pas["WEBLib.Consts"],"SYesFR"):8===a?e=rtl.getResStr(pas["WEBLib.Consts"],"SNoFR"):9===a?e=rtl.getResStr(pas["WEBLib.Consts"],"SAbortFR"):10===a?e=rtl.getResStr(pas["WEBLib.Consts"],"SRetryFR"):11===a?e=rtl.getResStr(pas["WEBLib.Consts"],"SIgnoreFR"):12===a?e=rtl.getResStr(pas["WEBLib.Consts"],"SAllFR"):13===a?e=rtl.getResStr(pas["WEBLib.Consts"],"SYesToAllFR"):14===a?e=rtl.getResStr(pas["WEBLib.Consts"],"SNoToAllFR"):15===a?e=rtl.getResStr(pas["WEBLib.Consts"],"SHelpFR"):16===a&&(e=rtl.getResStr(pas["WEBLib.Consts"],"SCloseFR"))}else if(2===n){var o=t;0===o?e=rtl.getResStr(pas["WEBLib.Consts"],"SWarningDE"):1===o?e=rtl.getResStr(pas["WEBLib.Consts"],"SErrorDE"):2===o?e=rtl.getResStr(pas["WEBLib.Consts"],"SInformationDE"):3===o?e=rtl.getResStr(pas["WEBLib.Consts"],"SConfirmDE"):5===o?e=rtl.getResStr(pas["WEBLib.Consts"],"SOKDE"):6===o?e=rtl.getResStr(pas["WEBLib.Consts"],"SCancelDE"):7===o?e=rtl.getResStr(pas["WEBLib.Consts"],"SYesDE"):8===o?e=rtl.getResStr(pas["WEBLib.Consts"],"SNoDE"):9===o?e=rtl.getResStr(pas["WEBLib.Consts"],"SAbortDE"):10===o?e=rtl.getResStr(pas["WEBLib.Consts"],"SRetryDE"):11===o?e=rtl.getResStr(pas["WEBLib.Consts"],"SIgnoreDE"):12===o?e=rtl.getResStr(pas["WEBLib.Consts"],"SAllDE"):13===o?e=rtl.getResStr(pas["WEBLib.Consts"],"SYesToAllDE"):14===o?e=rtl.getResStr(pas["WEBLib.Consts"],"SNoToAllDE"):15===o?e=rtl.getResStr(pas["WEBLib.Consts"],"SHelpDE"):16===o&&(e=rtl.getResStr(pas["WEBLib.Consts"],"SCloseDE"))}else if(4===n){var l=t;0===l?e=rtl.getResStr(pas["WEBLib.Consts"],"SWarningNL"):1===l?e=rtl.getResStr(pas["WEBLib.Consts"],"SErrorNL"):2===l?e=rtl.getResStr(pas["WEBLib.Consts"],"SInformationNL"):3===l?e=rtl.getResStr(pas["WEBLib.Consts"],"SConfirmNL"):5===l?e=rtl.getResStr(pas["WEBLib.Consts"],"SOKNL"):6===l?e=rtl.getResStr(pas["WEBLib.Consts"],"SCancelNL"):7===l?e=rtl.getResStr(pas["WEBLib.Consts"],"SYesNL"):8===l?e=rtl.getResStr(pas["WEBLib.Consts"],"SNoNL"):9===l?e=rtl.getResStr(pas["WEBLib.Consts"],"SAbortNL"):10===l?e=rtl.getResStr(pas["WEBLib.Consts"],"SRetryNL"):11===l?e=rtl.getResStr(pas["WEBLib.Consts"],"SIgnoreNL"):12===l?e=rtl.getResStr(pas["WEBLib.Consts"],"SAllNL"):13===l?e=rtl.getResStr(pas["WEBLib.Consts"],"SYesToAllNL"):14===l?e=rtl.getResStr(pas["WEBLib.Consts"],"SNoToAllNL"):15===l?e=rtl.getResStr(pas["WEBLib.Consts"],"SHelpNL"):16===l&&(e=rtl.getResStr(pas["WEBLib.Consts"],"SCloseNL"))}}return e},this.BindEvents=function(){},this.SetDialogResult=function(t){this.FDialogResult=t,0!==this.FDialogResult&&this.Close()},this.CreateButton=function(t,e,i){var s=null;return(s=document.createElement("BUTTON")).innerHTML=t,1===pas["WEBLib.Forms"].Application.FMainForm.FCSSLibrary?(s.setAttribute("type","BUTTON"),s.setAttribute("class","btn "+i),s.setAttribute("data-dismiss","modal-dialog")):(s.style.setProperty("width","100px"),s.style.setProperty("margin-left","5px"),""!==this.FElementButtonClassName?s.setAttribute("class",this.FElementButtonClassName+" "+i):""!==pas["WEBLib.Forms"].Application.FThemeButtonClassName&&s.setAttribute("class",pas["WEBLib.Forms"].Application.FThemeButtonClassName+" "+i)),s.id=t,s.addEventListener("click",rtl.createSafeCallback(this,"HandleButtonClick")),s.addEventListener("keydown",rtl.createSafeCallback(this,"HandleKeyDown")),e.get()&&(setTimeout((function(){s.focus()}),1),e.set(!1)),s},this.HandleDocMouseMove=function(t){var e,i=0,s=0,n=null;return e=t,this.FDown&&(i=e.screenX-this.FMdx,s=e.screenY-this.FMdy,(n=this.FDlg).style.setProperty("transform",""),n.style.setProperty("position","absolute"),n.style.setProperty("left",pas.SysUtils.IntToStr(Math.round(this.FDlgX+i))+"px"),n.style.setProperty("top",pas.SysUtils.IntToStr(Math.round(this.FDlgY+s))+"px"),(n=this.FCancel).style.setProperty("position","absolute"),n.style.setProperty("top","0"),n.style.setProperty("right","0")),!0,!0},this.HandleDocMouseUp=function(t){return this.FDown=!1,document.body.removeEventListener("mousemove",rtl.createSafeCallback(this,"HandleDocMouseMove")),document.body.removeEventListener("mouseup",rtl.createSafeCallback(this,"HandleDocMouseUp")),!0,!0},this.HandleMouseDown=function(t){var e,i;return i=t,this.FMdx=Math.round(i.screenX),this.FMdy=Math.round(i.screenY),e=this.FDlg.getBoundingClientRect(),this.FDlgX=Math.round(pas.System.Int(e.left)),this.FDlgY=Math.round(pas.System.Int(e.top)),this.FDown=!0,this.FCaptured$1||(this.FCaptured$1=!0,document.body.addEventListener("mousemove",rtl.createSafeCallback(this,"HandleDocMouseMove")),document.body.addEventListener("mouseup",rtl.createSafeCallback(this,"HandleDocMouseUp"))),!0,!0},this.HandleButtonClick=function(t){var e,i=0;if(this.SetDialogResult(0),(e=t.target.getAttribute("id"))===this.GetDialogText(7)?this.SetDialogResult(6):e===this.GetDialogText(8)?this.SetDialogResult(7):e===this.GetDialogText(5)?this.SetDialogResult(1):e===this.GetDialogText(6)?this.SetDialogResult(2):e===this.GetDialogText(9)?this.SetDialogResult(3):e===this.GetDialogText(10)?this.SetDialogResult(4):e===this.GetDialogText(11)?this.SetDialogResult(5):e===this.GetDialogText(12)?this.SetDialogResult(12):e===this.GetDialogText(13)?this.SetDialogResult(13):e===this.GetDialogText(14)?this.SetDialogResult(14):e===this.GetDialogText(15)?this.SetDialogResult(9):e===this.GetDialogText(16)&&this.SetDialogResult(8),0===this.FDialogResult&&this.FCustomButtons.GetCount()>0)for(var s=0,n=this.FCustomButtons.GetCount()-1;s<=n;s++)if(i=s,e===this.FCustomButtons.GetItem$1(i).FCaption){this.SetDialogResult(100+i);break}return null!=this.FOnButtonClick&&this.FOnButtonClick(this),!0,!0},this.HandleKeyDown=function(t){var e,i,s=!1;return i=t,e=this.GetKeyCode(i.key,!0),pas.System.Assigned(e)?(27===e&&this.SetDialogResult(2),s=!0):s},this.InitBootstrapStyle=function(){this.FElementButtonClassName="btn",this.FElementContentClassName="text-body",this.FElementTitleClassName="text-body",this.FElementDialogClassName="shadow-lg p-3 mb-5 bg-white rounded"},this.InsertInputElement=function(t,e){},this.CreateInitialize=function(){pas["WEBLib.Controls"].TCustomControl.CreateInitialize.call(this),this.FOpacity=.2,this.FMessage="",this.FAutoLanguage=!0,this.FMsgDlgType=2,this.FDialogText=pas.Classes.TStringList.$create("Create$1"),this.FDialogText.SetSkipLastLineBreak(!0),this.FDialogText.Add(rtl.getResStr(pas["WEBLib.Consts"],"SWarning")),this.FDialogText.Add(rtl.getResStr(pas["WEBLib.Consts"],"SError")),this.FDialogText.Add(rtl.getResStr(pas["WEBLib.Consts"],"SInformation")),this.FDialogText.Add(rtl.getResStr(pas["WEBLib.Consts"],"SConfirm")),this.FDialogText.Add("Custom"),this.FDialogText.Add(rtl.getResStr(pas["WEBLib.Consts"],"SOK")),this.FDialogText.Add(rtl.getResStr(pas["WEBLib.Consts"],"SCancel")),this.FDialogText.Add(rtl.getResStr(pas["WEBLib.Consts"],"SYes")),this.FDialogText.Add(rtl.getResStr(pas["WEBLib.Consts"],"SNo")),this.FDialogText.Add(rtl.getResStr(pas["WEBLib.Consts"],"SAbort")),this.FDialogText.Add(rtl.getResStr(pas["WEBLib.Consts"],"SRetry")),this.FDialogText.Add(rtl.getResStr(pas["WEBLib.Consts"],"SIgnore")),this.FDialogText.Add(rtl.getResStr(pas["WEBLib.Consts"],"SAll")),this.FDialogText.Add(rtl.getResStr(pas["WEBLib.Consts"],"SYesToAll")),this.FDialogText.Add(rtl.getResStr(pas["WEBLib.Consts"],"SNoToAll")),this.FDialogText.Add(rtl.getResStr(pas["WEBLib.Consts"],"SHelp")),this.FDialogText.Add(rtl.getResStr(pas["WEBLib.Consts"],"SClose")),this.FMsgDlgType=4,this.FUseMaterial=!0,this.FCustomButtons=t.TCustomDialogButtons.$create("Create$2",[this,t.TCustomDialogButton]),this.FCustomButtons.FPropName="CustomButtons"},this.Destroy=function(){rtl.free(this,"FDialogText"),rtl.free(this,"FCustomButtons"),pas["WEBLib.Controls"].TCustomControl.Destroy.call(this)},this.Close=function(){pas["WEBLib.Forms"].Application.UnLockForm(pas["WEBLib.Forms"].Application.FMainForm),document.body.removeChild(this.FLayer$1),document.body.removeChild(this.FDlg),this.FDown=!1,this.FCaptured$1=!1,null!=this.FOnClose&&this.FOnClose(this),null!=this.FDialogProc&&this.FDialogProc(this.FDialogResult)},this.Show$1=function(){var t=null,i=null,s=null,n=null,r=null,a=null,o=null,l=null,h=null,d=null,u=null,c=null,F="",p="",S="",m="",C="",g="",b="",f=!1,T=0;if(null!==pas["WEBLib.Forms"].Application&&null!==pas["WEBLib.Forms"].Application.FMainForm){this.FUseMaterial&&!pas["WEBLib.Forms"].Application.HasCSS(e.lMaterial)&&this.AddControlLink("material",e.lMaterial),pas["WEBLib.Forms"].Application.LockForm(pas["WEBLib.Forms"].Application.FMainForm),this.FLayer$1=document.createElement("SPAN"),document.body.appendChild(this.FLayer$1),this.FLayer$1.setAttribute("tabindex","0"),this.FLayer$1.addEventListener("keydown",rtl.createSafeCallback(this,"HandleKeyDown")),f=!0,this.FMessage=e.StringToHTML(this.FMessage);var y=this.FMsgDlgType;0===y?(F="warning",p="orange",S=this.GetDialogText(0)):1===y?(F="cancel",p="red",S=this.GetDialogText(1)):2===y?(F="info",p="blue",S=this.GetDialogText(2)):3===y?(F="help",p="blue",S=this.GetDialogText(3)):4===y&&(F="",p="",S=this.GetDialogText(4)),""!==this.FTitle&&(S=this.FTitle),1===pas["WEBLib.Forms"].Application.FMainForm.FCSSLibrary?(this.FDlg=document.createElement("DIV"),this.FDlg.setAttribute("class","modal-dialog"),this.FDlg.setAttribute("role","document"),this.FDlg.style.setProperty("z-index","1999998"),(l=document.createElement("DIV")).style.setProperty("top","0"),l.style.setProperty("left","0"),l.style.setProperty("right","0"),l.style.setProperty("bottom","0"),l.style.setProperty("z-index","1999997"),l.style.setProperty("display","block"),l.setAttribute("class","modal show fade"),document.body.appendChild(l),l.appendChild(this.FDlg),u=this.FDlg,(d=document.createElement("DIV")).setAttribute("class","modal-content "+this.FElementDialogClassName),u.appendChild(d),c=d,u=d,(d=document.createElement("DIV")).setAttribute("class","modal-header"),c.appendChild(d),u=d,(d=document.createElement("H5")).setAttribute("class","modal-title"),d.innerHTML=S,u.appendChild(d),3 in this.FButtons&&((d=document.createElement("BUTTON")).setAttribute("type","button"),d.setAttribute("class","close btn btn-danger"),d.setAttribute("data-dismiss","modal-dialog"),d.setAttribute("aria-label","Close"),d.setAttribute("id",this.GetDialogText(6)),d.addEventListener("click",rtl.createSafeCallback(this,"HandleButtonClick")),u.appendChild(d),u=d,(d=document.createElement("SPAN")).setAttribute("aria-hidden","true"),d.setAttribute("id",this.GetDialogText(6)),d.innerHTML="&times;",u.appendChild(d)),(d=document.createElement("DIV")).setAttribute("class","modal-body"),c.appendChild(d),u=d,4!==this.FMsgDlgType&&((s=document.createElement("SPAN")).innerHTML='<i class="material-icons" style="color:'+p+'!important;font-size:48px!important">'+F+"</i>",s.style.setProperty("display","inline-block"),s.style.setProperty("float","left"),s.style.setProperty("padding-right","15px"),u.appendChild(s)),(d=document.createElement("H6")).innerHTML=this.FMessage,u.appendChild(d),this.InsertInputElement(u,{get:function(){return f},set:function(t){f=t}}),(d=document.createElement("DIV")).setAttribute("class","modal-footer"),c.appendChild(d),a=u=d,this.FDlg=l):(b="5",g="26",C="#f1f1f1",m="#ababab",this.FDlg=document.createElement("DIV"),document.body.appendChild(this.FDlg),o=this.FDlg,""!==this.FElementDialogClassName?o.setAttribute("class",this.FElementDialogClassName):(o.style.setProperty("background-color","white"),o.style.setProperty("border","1px solid "+m),o.style.setProperty("font-family","Arial"),o.style.setProperty("font-size","10pt")),o.style.setProperty("cursor","default"),o.style.setProperty("position","fixed"),o.style.setProperty("min-width","300px"),o.style.setProperty("min-height","125px"),o.style.setProperty("max-width","100%"),o.style.setProperty("max-height","100%"),o.style.setProperty("top","50%"),o.style.setProperty("left","50%"),o.style.setProperty("transform","translate(-50%, -50%)"),o.style.setProperty("z-index","1999998"),o.style.setProperty("box-shadow","5px 5px 5px gray"),h=document.createElement("DIV"),this.FCancel=h,h.innerHTML='<i id="Cancel" class="material-icons" style="font-size:16px!important">clear</i>',h.id="Cancel",h.style.setProperty("color",pas["WEBLib.Graphics"].ColorToHTML(pas["WEBLib.Forms"].Application.FThemeTextColor)),h.style.setProperty("position","fixed"),h.style.setProperty("top","0"),h.style.setProperty("right","0"),h.style.setProperty("padding",b+"px"),h.style.setProperty("height",g+"px"),h.style.setProperty("line-height",g+"px"),h.addEventListener("click",rtl.createSafeCallback(this,"HandleButtonClick")),o.appendChild(h),(t=document.createElement("DIV")).innerHTML=S,""!==this.FElementTitleClassName?t.setAttribute("class",this.FElementTitleClassName):(t.style.setProperty("background-color",pas["WEBLib.Graphics"].ColorToHTML(pas["WEBLib.Forms"].Application.FThemeColor)),t.style.setProperty("color",pas["WEBLib.Graphics"].ColorToHTML(pas["WEBLib.Forms"].Application.FThemeTextColor))),t.style.setProperty("cursor","move"),t.style.setProperty("padding-left",b+"px"),t.style.setProperty("height",g+"px"),t.style.setProperty("vertical-align","middle"),t.style.setProperty("line-height",g+"px"),t.style.setProperty("border-bottom","1px solid "+m),t.style.setProperty("-moz-user-select","none"),t.style.setProperty("-webkit-user-select","none"),t.style.setProperty("-ms-user-select","none"),t.style.setProperty("user-select","none"),t.style.setProperty("-o-user-select","none"),t.addEventListener("mousedown",rtl.createSafeCallback(this,"HandleMouseDown")),o.appendChild(t),(i=document.createElement("DIV")).style.setProperty("padding",b+"px"),i.style.setProperty("height","auto"),i.style.setProperty("min-height","50px"),i.style.setProperty("border-bottom","1px solid "+m),4!==this.FMsgDlgType&&((s=document.createElement("DIV")).innerHTML='<i class="material-icons" style="color:'+p+'!important;font-size:48px!important">'+F+"</i>",s.style.setProperty("display","inline-block"),s.style.setProperty("float","left"),s.style.setProperty("padding-right","15px"),i.appendChild(s)),this.FMessage=pas.SysUtils.StringReplace(this.FMessage,pas.System.sLineBreak,"<BR>",rtl.createSet(0)),(r=document.createElement("DIV")).innerHTML=this.FMessage,r.style.setProperty("height","auto"),r.style.setProperty("min-height","50px"),r.style.setProperty("white-space","pre-wrap"),(n=document.createElement("LABEL")).innerHTML=this.FMessage,""!==this.FElementTitleClassName&&n.setAttribute("class",this.FElementContentClassName),r.appendChild(n),i.appendChild(n),this.InsertInputElement(i,{get:function(){return f},set:function(t){f=t}}),o.appendChild(i),(a=document.createElement("DIV")).style.setProperty("background-color",C),a.style.setProperty("padding",b+"px"),a.style.setProperty("min-height",g+"px"),a.style.setProperty("height","auto"),a.style.setProperty("line-height",g+"px"),a.style.setProperty("text-align","right"),o.appendChild(a)),rtl.eqSet(this.FButtons,{})&&0===this.FCustomButtons.GetCount()?a.appendChild(this.CreateButton(this.GetDialogText(5),{get:function(){return f},set:function(t){f=t}},"")):(0 in this.FButtons&&a.appendChild(this.CreateButton(this.GetDialogText(7),{get:function(){return f},set:function(t){f=t}},"")),1 in this.FButtons&&a.appendChild(this.CreateButton(this.GetDialogText(8),{get:function(){return f},set:function(t){f=t}},"")),2 in this.FButtons&&a.appendChild(this.CreateButton(this.GetDialogText(5),{get:function(){return f},set:function(t){f=t}},"")),3 in this.FButtons&&a.appendChild(this.CreateButton(this.GetDialogText(6),{get:function(){return f},set:function(t){f=t}},"")),4 in this.FButtons&&a.appendChild(this.CreateButton(this.GetDialogText(9),{get:function(){return f},set:function(t){f=t}},"")),5 in this.FButtons&&a.appendChild(this.CreateButton(this.GetDialogText(10),{get:function(){return f},set:function(t){f=t}},"")),6 in this.FButtons&&a.appendChild(this.CreateButton(this.GetDialogText(11),{get:function(){return f},set:function(t){f=t}},"")),7 in this.FButtons&&a.appendChild(this.CreateButton(this.GetDialogText(12),{get:function(){return f},set:function(t){f=t}},"")),9 in this.FButtons&&a.appendChild(this.CreateButton(this.GetDialogText(13),{get:function(){return f},set:function(t){f=t}},"")),8 in this.FButtons&&a.appendChild(this.CreateButton(this.GetDialogText(14),{get:function(){return f},set:function(t){f=t}},"")),10 in this.FButtons&&a.appendChild(this.CreateButton(this.GetDialogText(15),{get:function(){return f},set:function(t){f=t}},"")),11 in this.FButtons&&a.appendChild(this.CreateButton(this.GetDialogText(16),{get:function(){return f},set:function(t){f=t}},"")));for(var E=0,L=this.FCustomButtons.GetCount()-1;E<=L;E++)T=E,a.appendChild(this.CreateButton(this.FCustomButtons.GetItem$1(T).FCaption,{get:function(){return f},set:function(t){f=t}},this.FCustomButtons.GetItem$1(T).FElementClassName));(l=this.FLayer$1).style.setProperty("background-color","black"),l.style.setProperty("opacity",pas["WEBLib.WebTools"].DoubleToHTML(this.FOpacity)),l.style.setProperty("top","0"),l.style.setProperty("left","0"),l.style.setProperty("right","0"),l.style.setProperty("bottom","0"),l.style.setProperty("z-index",pas["WEBLib.Forms"].Application.MaxZIndexStr()),l.style.setProperty("webkit-user-select","none"),l.style.setProperty("moz-user-select","none"),l.style.setProperty("khtml-user-select","none"),l.style.setProperty("ms-user-select","none"),l.style.setProperty("user-select","none"),l.style.setProperty("position","fixed")}},this.ShowDialog$1=function(t,e,i,s){return 0,this.FButtons=rtl.refSet(i),this.FMessage=t,this.FMsgDlgType=e,this.FDialogProc=s,this.SetDialogResult(0),this.Show$1(),0},this.ShowDialog$2=function(t,e,i){var s=this;return new Promise((function(n,r){s.ShowDialog$1(t,e,rtl.refSet(i),(function(t){n(t)}))}))},rtl.addIntf(this,pas["WEBLib.Controls"].IControl),rtl.addIntf(this,pas.System.IUnknown);var i=this.$rtti;i.addProperty("AutoLanguage",0,rtl.boolean,"FAutoLanguage","FAutoLanguage",4,{Default:!0}),i.addProperty("Buttons",0,t.$rtti.TMsgDlgButtons,"FButtons","FButtons",4,{Default:{}}),i.addProperty("CustomButtons",2,t.$rtti.TCustomDialogButtons,"FCustomButtons","SetCustomButtons"),i.addProperty("DialogText",2,pas.Classes.$rtti.TStringList,"FDialogText","SetDialogText"),i.addProperty("DialogType",0,t.$rtti.TMsgDlgType,"FMsgDlgType","FMsgDlgType",4,{Default:t.TMsgDlgType.mtCustom}),i.addProperty("Message",0,rtl.string,"FMessage","FMessage"),i.addProperty("Opacity",0,rtl.double,"FOpacity","FOpacity"),i.addProperty("ElementButtonClassName",0,pas["WEBLib.Controls"].$rtti.TElementClassName,"FElementButtonClassName","FElementButtonClassName"),i.addProperty("ElementDialogClassName",0,pas["WEBLib.Controls"].$rtti.TElementClassName,"FElementDialogClassName","FElementDialogClassName"),i.addProperty("ElementTitleClassName",0,pas["WEBLib.Controls"].$rtti.TElementClassName,"FElementTitleClassName","FElementTitleClassName"),i.addProperty("ElementContentClassName",0,pas["WEBLib.Controls"].$rtti.TElementClassName,"FElementContentClassName","FElementContentClassName"),i.addProperty("Title",0,rtl.string,"FTitle","FTitle"),i.addProperty("UseMaterial",0,rtl.boolean,"FUseMaterial","FUseMaterial",4,{Default:!0}),i.addProperty("OnButtonClick",0,pas["WEBLib.Controls"].$rtti.TNotifyEvent,"FOnButtonClick","FOnButtonClick"),i.addProperty("OnClose",0,pas["WEBLib.Controls"].$rtti.TNotifyEvent,"FOnClose","FOnClose")})),rtl.createClass(this,"TWaitMessage",pas["WEBLib.Controls"].TCustomControl,(function(){this.$init=function(){pas["WEBLib.Controls"].TCustomControl.$init.call(this),this.FLayer$1=null,this.FPicture=null,this.FOpacity=0,this.FOnShow=null,this.FOnHide=null,this.FIsWaiting=!1,this.FPictureURL="",this.FTimeOut=0,this.FShowID=0,this.FHideID=0},this.$final=function(){this.FLayer$1=void 0,this.FPicture=void 0,this.FOnShow=void 0,this.FOnHide=void 0,pas["WEBLib.Controls"].TCustomControl.$final.call(this)},this.SetPicture=function(t){this.FPicture.Assign(t)},this.SetPictureURL=function(t){this.FPictureURL=t},this.WaitDisplayed=function(){null!=this.FOnShow&&this.FOnShow(this)},this.WaitHide=function(){null!=this.FOnHide&&this.FOnHide(this),this.Hide$1()},this.CreateElement=function(){var t=null;return 4 in this.FComponentState?t=null:pas["WEBLib.Controls"].TCustomControl.CreateElement.call(this),t},this.CreateInitialize=function(){pas["WEBLib.Controls"].TCustomControl.CreateInitialize.call(this),this.FOpacity=.2,this.FPicture=pas["WEBLib.Graphics"].TURLPicture.$create("Create"),this.FIsWaiting=!1,this.FPicture.SetData(e.lWaitCursor),this.FShowID=0,this.FHideID=0},this.Destroy=function(){rtl.free(this,"FPicture"),pas["WEBLib.Controls"].TCustomControl.Destroy.call(this)},this.Show$1=function(){var t=null,e=null,i=null,s=null;this.FLayer$1=document.createElement("SPAN"),(t=this.FLayer$1).style.setProperty("background-color","black"),t.style.setProperty("opacity",pas["WEBLib.WebTools"].DoubleToHTML(this.FOpacity)),t.style.setProperty("top","0"),t.style.setProperty("left","0"),t.style.setProperty("right","0"),t.style.setProperty("bottom","0"),t.style.setProperty("z-index","9999999"),t.style.setProperty("webkit-user-select","none"),t.style.setProperty("moz-user-select","none"),t.style.setProperty("khtml-user-select","none"),t.style.setProperty("ms-user-select","none"),t.style.setProperty("user-select","none"),t.style.setProperty("position","fixed"),document.body.appendChild(this.FLayer$1),this.FLayer$1.setAttribute("tabindex","0"),s=document.createElement("DIV"),this.FContainer=s,this.FControlCreated=!0,i=s,this.FLayer$1.appendChild(s),i.style.setProperty("position","relative"),i.style.setProperty("width","100%"),i.style.setProperty("height","100%"),e=s=document.createElement("IMG"),i.appendChild(e),""!==this.FPictureURL?e.setAttribute("src",this.FPictureURL):e.setAttribute("src",this.FPicture.FFilename),e.style.setProperty("position","absolute"),e.style.setProperty("top","0"),e.style.setProperty("left","0"),e.style.setProperty("right","0"),e.style.setProperty("bottom","0"),e.style.setProperty("margin","auto"),this.FIsWaiting=!0,null!=this.FOnShow&&(this.FShowID=window.setTimeout(rtl.createSafeCallback(this,"WaitDisplayed"),100)),this.FTimeOut>0&&(this.FHideID=window.setTimeout(rtl.createSafeCallback(this,"WaitHide"),this.FTimeOut))},this.Hide$1=function(){this.FIsWaiting&&document.body.removeChild(this.FLayer$1),this.FIsWaiting=!1,this.FShowID>0&&window.clearTimeout(this.FShowID),this.FHideID>0&&window.clearTimeout(this.FHideID),this.FControlCreated=!1,this.FContainer=null,this.FShowID=0,this.FHideID=0},rtl.addIntf(this,pas["WEBLib.Controls"].IControl),rtl.addIntf(this,pas.System.IUnknown);var t=this.$rtti;t.addProperty("Opacity",0,rtl.double,"FOpacity","FOpacity"),t.addProperty("Picture",2,pas["WEBLib.Graphics"].$rtti.TURLPicture,"FPicture","SetPicture"),t.addProperty("PictureURL",2,rtl.string,"FPictureURL","SetPictureURL"),t.addProperty("TimeOut",0,rtl.longint,"FTimeOut","FTimeOut"),t.addProperty("OnHide",0,pas["WEBLib.Controls"].$rtti.TNotifyEvent,"FOnHide","FOnHide"),t.addProperty("OnShow",0,pas["WEBLib.Controls"].$rtti.TNotifyEvent,"FOnShow","FOnShow")})),this.$rtti.$MethodVar("TFileAsTextEvent",{procsig:rtl.newTIProcSig([["Sender",pas.System.$rtti.TObject],["AFileIndex",rtl.longint],["AText",rtl.string]]),methodkind:0}),this.$rtti.$MethodVar("TFileAsBase64Event",{procsig:rtl.newTIProcSig([["Sender",pas.System.$rtti.TObject],["AFileIndex",rtl.longint],["ABase64",rtl.string]]),methodkind:0}),this.$rtti.$MethodVar("TFileAsDataURLEvent",{procsig:rtl.newTIProcSig([["Sender",pas.System.$rtti.TObject],["AFileIndex",rtl.longint],["AURL",rtl.string]]),methodkind:0}),this.$rtti.$MethodVar("TFileAsArrayBufferEvent",{procsig:rtl.newTIProcSig([["Sender",pas.System.$rtti.TObject],["AFileIndex",rtl.longint],["ABuffer",pas["WEBLib.Controls"].$rtti.TJSArrayBufferRecord]]),methodkind:0}),this.$rtti.$MethodVar("TFileAsStreamEvent",{procsig:rtl.newTIProcSig([["Sender",pas.System.$rtti.TObject],["AFileIndex",rtl.longint],["AStream",pas.Classes.$rtti.TStream]]),methodkind:0}),this.$rtti.$MethodVar("TFileUploadEvent",{procsig:rtl.newTIProcSig([["Sender",pas.System.$rtti.TObject],["AFileIndex",rtl.longint]]),methodkind:0}),this.$rtti.$MethodVar("TFileUploadResponseEvent",{procsig:rtl.newTIProcSig([["Sender",pas.System.$rtti.TObject],["AFileIndex",rtl.longint],["ARequest",pas["WEBLib.Controls"].$rtti.TJSXMLHttpRequestRecord],["AResponse",rtl.string]]),methodkind:0}),this.$rtti.$MethodVar("TFileUploadErrorEvent",{procsig:rtl.newTIProcSig([["Sender",pas.System.$rtti.TObject],["AFileIndex",rtl.longint],["AError",rtl.string]]),methodkind:0}),this.$rtti.$MethodVar("TFileUploadProgressEvent",{procsig:rtl.newTIProcSig([["Sender",pas.System.$rtti.TObject],["AFileIndex",rtl.longint],["APosition",rtl.longint],["ATotalSize",rtl.longint]]),methodkind:0}),rtl.createClass(this,"TFile",pas.Classes.TCollectionItem,(function(){this.$init=function(){pas.Classes.TCollectionItem.$init.call(this),this.FModified=0,this.FName="",this.FMimeType="",this.FSize=0,this.FFileObject=null},this.$final=function(){this.FFileObject=void 0,pas.Classes.TCollectionItem.$final.call(this)}})),rtl.createClass(this,"TFiles",pas.Classes.TCollection,(function(){this.$init=function(){pas.Classes.TCollection.$init.call(this),this.FOwner=null},this.$final=function(){this.FOwner=void 0,pas.Classes.TCollection.$final.call(this)},this.Create$2=function(e){return pas.Classes.TCollection.Create$1.call(this,t.TFile),this.FOwner=e,this},this.Add$1=function(){return pas.Classes.TCollection.Add.call(this)}})),rtl.createClass(this,"TFilePicker",pas["WEBLib.Controls"].TCustomControl,(function(){this.$init=function(){pas["WEBLib.Controls"].TCustomControl.$init.call(this),this.FOnChange=null,this.FMultiFile=!1,this.FFiles=null,this.FOnFileAsText=null,this.FOnGetFileAsArrayBuffer=null,this.FAccept="",this.FOnFileAsBase64=null,this.FChangePtr=null,this.FOnFileAsDataURL=null,this.FOnUploadFileAbort=null,this.FOnUploadFileComplete=null,this.FOnUploadFileProgress=null,this.FOnUploadFileError=null,this.FOnUploadFileResponseComplete=null,this.FOnGetFileAsStream=null},this.$final=function(){this.FOnChange=void 0,this.FFiles=void 0,this.FOnFileAsText=void 0,this.FOnGetFileAsArrayBuffer=void 0,this.FOnFileAsBase64=void 0,this.FOnFileAsDataURL=void 0,this.FOnUploadFileAbort=void 0,this.FOnUploadFileComplete=void 0,this.FOnUploadFileProgress=void 0,this.FOnUploadFileError=void 0,this.FOnUploadFileResponseComplete=void 0,this.FOnGetFileAsStream=void 0,pas["WEBLib.Controls"].TCustomControl.$final.call(this)},this.SetMultiFile=function(t){this.FMultiFile!==t&&(this.FMultiFile=t,this.UpdateElement())},this.DoHandleChange=function(t){var e=0,i=0,s="",n="",r=null,a=null,o=null;for(!0;this.FFiles.GetCount()>0;)this.FFiles.Delete(0);for(var l=this.GetElementHandle().files,h=0,d=l.length-1;h<=d;h++)e=h,r=this.FFiles.Add$1(),o=l[e],s=l[e].name,n=l[e].type,i=l[e].size,a=new Date(l[e].lastModified),r.FFileObject=o,r.FName=s,r.FMimeType=n,r.FSize=i,r.FModified=pas.SysUtils.EncodeDate(a.getFullYear(),a.getMonth()+1,a.getDate())+pas.SysUtils.EncodeTime(a.getHours(),a.getMinutes(),a.getSeconds(),a.getMilliseconds());return null!=this.FOnChange&&this.FOnChange(this),!0},this.SetAccept=function(t){this.FAccept!==t&&(this.FAccept=t,this.UpdateElement())},this.UpdateElement=function(){pas["WEBLib.Controls"].TControl.UpdateElement.call(this),null!=this.GetElementHandle()&&(this.FMultiFile?this.GetElementHandle().setAttribute("multiple",""):this.GetElementHandle().removeAttribute("multiple"),""!==this.FAccept?this.GetElementHandle().setAttribute("accept",this.FAccept):this.GetElementHandle().removeAttribute("accept"))},this.CreateElement=function(){var t=null;return(t=document.createElement("INPUT")).setAttribute("type","file"),t},this.GetMethodPointers=function(){null===this.FChangePtr&&(this.FChangePtr=rtl.createCallback(this,"DoHandleChange"),pas["WEBLib.Controls"].TControl.GetMethodPointers.call(this))},this.BindEvents=function(){pas["WEBLib.Controls"].TCustomControl.BindEvents.call(this),null!=this.GetElementBindHandle()&&this.GetElementBindHandle().addEventListener("change",rtl.createSafeCallback(this,"DoHandleChange"))},this.CreateInitialize=function(){pas["WEBLib.Controls"].TCustomControl.CreateInitialize.call(this),this.FFiles=t.TFiles.$create("Create$2",[this]),this.SetWidth(160),this.SetHeight(40)},this.Destroy=function(){rtl.free(this,"FFiles"),pas["WEBLib.Controls"].TCustomControl.Destroy.call(this)},rtl.addIntf(this,pas["WEBLib.Controls"].IControl),rtl.addIntf(this,pas.System.IUnknown);var e=this.$rtti;e.addProperty("Accept",2,rtl.string,"FAccept","SetAccept"),e.addProperty("ChildOrder",2,rtl.longint,"FChildOrder","SetChildOrderEx",4,{Default:0}),e.addProperty("ElementClassName",2,pas["WEBLib.Controls"].$rtti.TElementClassName,"FElementClassName","SetElementClassName"),e.addProperty("ElementFont",2,pas["WEBLib.Controls"].$rtti.TElementFont,"FElementFont","SetElementFont",4,{Default:pas["WEBLib.Controls"].TElementFont.efProperty}),e.addProperty("ElementID",3,pas["WEBLib.Controls"].$rtti.TElementID,"GetID","SetID"),e.addProperty("ElementPosition",2,pas["WEBLib.Controls"].$rtti.TElementPosition,"FElementPosition","SetElementPosition",4,{Default:pas["WEBLib.Controls"].TElementPosition.epAbsolute}),e.addProperty("HeightPercent",2,rtl.double,"FHeightPercent","SetHeightPercent",4,{Default:100}),e.addProperty("HeightStyle",2,pas["WEBLib.Controls"].$rtti.TSizeStyle,"FHeightStyle","SetHeightStyle",4,{Default:pas["WEBLib.Controls"].TSizeStyle.ssAbsolute}),e.addProperty("Multifile",2,rtl.boolean,"FMultiFile","SetMultiFile"),e.addProperty("WidthPercent",2,rtl.double,"FWidthPercent","SetWidthPercent",4,{Default:100}),e.addProperty("WidthStyle",2,pas["WEBLib.Controls"].$rtti.TSizeStyle,"FWidthStyle","SetWidthStyle",4,{Default:pas["WEBLib.Controls"].TSizeStyle.ssAbsolute}),e.addProperty("OnChange",0,pas["WEBLib.Controls"].$rtti.TNotifyEvent,"FOnChange","FOnChange"),e.addProperty("OnGetFileAsText",0,t.$rtti.TFileAsTextEvent,"FOnFileAsText","FOnFileAsText"),e.addProperty("OnGetFileAsArrayBuffer",0,t.$rtti.TFileAsArrayBufferEvent,"FOnGetFileAsArrayBuffer","FOnGetFileAsArrayBuffer"),e.addProperty("OnGetFileAsBase64",0,t.$rtti.TFileAsBase64Event,"FOnFileAsBase64","FOnFileAsBase64"),e.addProperty("OnGetFileAsDataURL",0,t.$rtti.TFileAsDataURLEvent,"FOnFileAsDataURL","FOnFileAsDataURL"),e.addProperty("OnGetFileAsStream",0,t.$rtti.TFileAsStreamEvent,"FOnGetFileAsStream","FOnGetFileAsStream"),e.addProperty("OnUploadFileComplete",0,t.$rtti.TFileUploadEvent,"FOnUploadFileComplete","FOnUploadFileComplete"),e.addProperty("OnUploadFileResponseComplete",0,t.$rtti.TFileUploadResponseEvent,"FOnUploadFileResponseComplete","FOnUploadFileResponseComplete"),e.addProperty("OnUploadFileAbort",0,t.$rtti.TFileUploadEvent,"FOnUploadFileAbort","FOnUploadFileAbort"),e.addProperty("OnUploadFileError",0,t.$rtti.TFileUploadErrorEvent,"FOnUploadFileError","FOnUploadFileError"),e.addProperty("OnUploadFileProgress",0,t.$rtti.TFileUploadProgressEvent,"FOnUploadFileProgress","FOnUploadFileProgress")})),this.MessageDlg=function(i,s,n,r){null==e.WebLibDlg&&(e.WebLibDlg=t.TMessageDlg.$create("Create$1",[null]),1===pas["WEBLib.Forms"].Application.FMainForm.FCSSLibrary&&e.WebLibDlg.InitBootstrapStyle()),e.WebLibDlg.ShowDialog$1(i,s,rtl.refSet(n),r)},this.ShowMessage=function(e){null!==pas["WEBLib.Forms"].Application&&null!==pas["WEBLib.Forms"].Application.FMainForm&&1===pas["WEBLib.Forms"].Application.FMainForm.FCSSLibrary?t.MessageDlg(e,2,rtl.createSet(2),null):alert(e)},this.MessageDlgAsync=async function(i,s,n){return null==e.WebLibDlg&&(e.WebLibDlg=t.TMessageDlg.$create("Create$1",[null]),1===pas["WEBLib.Forms"].Application.FMainForm.FCSSLibrary&&e.WebLibDlg.InitBootstrapStyle()),await e.WebLibDlg.ShowDialog$2(i,s,rtl.refSet(n))},t.$implcode=function(){e.lMaterial="https://fonts.googleapis.com/icon?family=Material+Icons",e.lWaitCursor="0954474946496D61676547494638396190012C01A20000FFFFFFDDDDDDBBBBBB999999FFFFFFFFFFFFFFFFFFFFFFFF21FF0B4E45545343415045322E30030100000021F90405050004002C0000000090012C0182FFFFFFDDDDDDBBBBBB999999FFFFFFFFFFFFFFFFFFFFFFFF03FF48BADCFE30CA49ABBD38EBCDBBFF60288E64699E68AAAE6CEBBE702CCF746DDF78AEEF7CEFFFC0A070482C1A8FC8A472C96C3A9FD0A8744AAD5AAFD8AC76CBED7ABFE0B0784C2E9BCFE8B47ACD6EBBDFF0B87C4EAFDBEFF8BC7ECFEFFBFF808182838485868788898A8B8C8D8E8F909192939495969798999A9B9C9D9E9FA0A1A2A3A4A5A6A7A8A9AAABACADAEAFB0B1B2B3B4B5B6B7B8B9BABBBCBDBEBFC0C1C2C3C4C5C6C7C8C9CACBCCCDCECFD0D1D2D3D4D5D6D7D8D9DADBDCDDDEDFE0E1E2E3E4E5E6E7E8E9EAEBECEDEEEFF0F1F2F3F4F5F6F7F8F9FAFBFCFDFEFF00030A1C48B0A0C18308132A5CC8B0A1C3871023861A407180C444152B5E349431FFE346421D357E141492E24892254F062A6951E51F962EC978F400D383809B02621E09493365079C387512A9B981A806A040850A319A812906A441950261D95283530B50A34AF541B52A86AB14B26ADDDA836A519F19C4E6243B15AC04B711D4B20D62B629DA0B72E7B6BD5B01EE83BC7A7F74FDCA7782DAB58105FB6DB09801E0C45CEBF62D1CF731E4B28D15642660F93266CA0F3277F6CC43F204D162492F6DDC78B4EA1D834F8376ECFAB50ED31016D7B69D237604BF8779AF9EBD80A7E1D4C24BCCFC803BB44809BB2F04981E20B9F19EC48F22F7409D3AEFE676AF87D8CEA1BB79DB5DBD86EF48827C06F3F0D1A7577F41BC08A8E5E1C77F3DDFE459FFFF2624B5817EFA7DD71F7D4E1058A0700702D884820B26474083081601E17E1216D7A012179E97A103141AD161771FBEB56110237A57A26C070291E2742B5A70220F2FC6B81E78378C682307E9F970E18ED865370384408220240D111669E4733F90A8E493504629E594545669E5955866A9A54014FA960400608629E698648EB955973D7E59E69A6C86A9149AF321D1E69C6C0A05679A46D0A9A7993ADDE925117B060A809D7E6E9683A07BBE59287B6A225AA7548B3229A7A3656E69E9A59866AAE9A69C76EAE9A7A086AAC5728A39E8E99133A06AE59FBDE198259EB0B18A657F91C1BA6A8B9FC5596588A5D22A25AF7BF9AA24B04310BBA2B145206BDD8CFF4928CB1FB34C387B19B44F503BADB0EBA1402A61BAAA862DB79286605F7DDD92662BB8DB32A72A88B226E6AA8CEB5260A873F1129AAE55F3B2382EBEF77AD6EF8DFF6A682ABDFBF25BE1AC8B15CCC0BBA2FEC6B05FED36ECB09009E71B6AC402336AA2C59F32ACD9911E4B3C61662473CC69C8232BCC98C99AA29CB2C6F2B27C29C62BAB5C73BD2D1BAAB3CC5AD27C73C0ECF28C70BCF3BA9C73BDF91A8DA9D22F034D30CC0D33DD74B893E13C34CE16FBBC34C75C0B1DA5C9605B7DABCD1B438D2ED5A79A7DF6C0678BFC31DB6B1F0C2FDC6E77E075DDCA898D770A77EF2D42DF7E2F4976E02F004E7890741F9E2ADA8A37EEF8E390472EF9E494576EF9E5649867AEF9E69C77EEF9E7A0872EFAE8A4976EFAE9A8A7AEFAEAACB7EEFAEBB0C72EFBECB4D76EFBEDB8E7AEFBEEBCF7EEFBEFC0072FFCF0C4176FFCF1C827AFFCF2CC37EFFCF3D0472FFDF4D4576FFDF5D867AFFDF6DC77EFFDF7E0872FFEF8E497DF7D020021F90405050007002CD60060003000570082FFFFFFDDDDDDBBBBBB999999FFFFFFFFFFFFFFFFFFFFFFFF03EC78BABCF3A3C9492B85D0EA7D71E6E0E67D61298DA4A9A2A95AB291BBB2B20BD7E68D8770BC73BA9F2828B4108B1D1472A85C568E4E462F9A1C5127D36B037AE5AA04608191B60B879FCD9A795DC5A8D7ECB6CF04AF8F1FB2BA9DAADF3BFB7E4880707C83665186877F8960858C8E865A895A0A83940B80970C819A95679DA0A1A2A3A4A5A6A7A8A9AA2A01ADAEAFB0B1B035B2B5B6AF2EB7BAB6ACBBBEB826BFC201BDC3BBB9C6B7B4C9B2ABCECFD0D1D2D3D4D53200D800A5D9DCA2DCDFDA9DE0DFE2E3E494E6E3E8E9E05AECEDEEEFDDF1F2D8F4F5EBF5E157FAFBFCF8F9D8954B178AA0B773A3E65148000021F90405050007002CD60075003000570082FFFFFFDDDDDDBBBBBB999999FFFFFFFFFFFFFFFFFFFFFFFF03E978BADCFE6EC801ABBD6D4ECCFBD1A0274660388E657A8AA9BA62ADFB56B13C93B576D3B9BEE33DCA2F13940C81BD2331A844B69A8F1C14529BF24CD6AB30CBED7ABFE0B0784C2E9BCF5C817ACD6EBBDBB3B77CCE5ED1EFF3137E0F1FF1FF027A807B76837471866F688B8C8D8E8F909192930A01960166979A639A9D98609E9DA0A1A25DA4A1A6A79E5CAAABACAD9BAFB096B2B3A9B39F59B8B91000BE002FB815BFBFC1B0BDC4C5C6A7C8C9C037CC0FCECAD0A5D2D3CF3BB1C3D862D8BEDEDD61DFD95FDF63E7E3E2EAD3E1EBE6EF5EE4EECEE8F15DE9ECF5FAFB60F9FEEDE81123D3CF1EB82909000021F90405050007002CC40092004200420082FFFFFFDDDDDDBBBBBB999999FFFFFFFFFFFFFFFFFFFFFFFF03F978BADCFE508D49ABBD36EA1DB1FF15277260F98DE863AE59EA4A6CFCBEB13CBBB579CFF9B9FFC0A070482C1A8FC8A472C96C3A9FD0A8747A105805D4D7759B1D6DBFD8AE06FC1547C860B3034D5633D86D77155E96CFE957FB1D1F76F3F3767F567A8246018701377F4488888A78438D8D3B74919287406C96978999751100A1001C9C98415C1AA2A2A4A54FAAAA1BA5A64CAFABB1AD4DB5A1ACB84BBAA3BC97B9BA23B2B4C422C6BEC8C9BD48BF28B29DCFCCCD9C4AD0D1CA47D9DAD7D4B52FDB45DDDEC2DCD5E692E8E1E2E342E529EF41F1F2DF44F5EA8EE4E92EE7FCED764C62F74A8F837C7610CA51E886A11A870F0B1A7C006B6283040021F90405050007002CA700A4005700300082FFFFFFDDDDDDBBBBBB999999FFFFFFFFFFFFFFFFFFFFFFFF03FF78BADCFE30CA37EA9838EBCD8FFD5D288ECD675E64AA4AA7B9BEB0D7BA711DCEADAD6B78BEFF90DE0948740869C5E411942C2E2D4DE51315054E35802CE027E80A464F8C56ABF37AC1C7C9785C339B4942F53ADB76775538C99C1CB39FF148107B7413018601187E772B4C11835B858786898A518F90119292138A8B458F189A87947E4997A1A2889C9D9F8319A9AAABA540A0AFA91AAC3FB5A8A2B8953BBBBC9A1BB935A71AB0C4C530C1C29BCAB3CCCD91BDD0D12BD3D4C31CCB29D9DACFDCBF2ADF12C91DDD22E5E6B721E91CC71DE7E8EF58AE22F3F4D71DF7F8ED22E342F40B914F9F1B6F6B521434E889041B85FF46BCA9E26C14C5280B2FFEC8A8511307C78E353E82842172E48B6A2689844BA920010021F90405050007002C9200A4005700300082FFFFFFDDDDDDBBBBBB999999FFFFFFFFFFFFFFFFFFFFFFFF03FF78BADC0E10B849ABBD38B7C8B5FFE0C78D52689E2139A26C4BA9A42BB7B03ADF606DE33CA6C7BDE0E4B7121A17C4CE71998C2C8F4DC813DA9C5289A78036201C7807996476ABED7DBF3E1D8A4CC69DCF975A8BBD75BFBD69258B5EBFDDD1714E2E7C6517028702187F785607845C8688878A8B568F90159292178B8C4B8F189A88947F4F97A1A2899C9D9F8419A9AAABA546A0AFA91AAC42B5A8A2B89541BBBC9A1EB938A71AB0C4C533C1C29BCAB3CCCD91BDD0D183AE1FC91FCB7BD9DAB720DD637C21DBDCBFDEE5E6E1E2E926C720E7E8EF20D3C8EDEED7F6EB26F3FA6FD6F46357CD443D7E6D50FC03E849602185F90C026A446D18452B0B2F0AC9A8B11207C78E383E829C2172A48C82268D3CE391000021F90405050007002C8A0092004200420082FFFFFFDDDDDDBBBBBB999999FFFFFFFFFFFFFFFFFFFFFFFF03F57807DCFEF0A949ABBD98C6CD5DFEE0D58D5C6882642A9DACA5BE402B4FB03ADFF578EFF9B6FFC0A070482C1A8FC8A472C96C3A9FD0A8744A3D05AE81AA0CCBD59AB8E0AC3713068F2FE5F099922EAF0F6DF73AAE3ED3CDF63BF6ADDFE7FB7C8081773B028602467A85878645743F8C8C446D4191878E784096979857439B8D2003A30352A088A2A4A350A7A819AAAA4FA721B0A44EADB4B5A54DB3B9B5BCA027BABB4BBDBEB04CC6C7B14AB8C2BAC5C12CC3CDCACBB649D6D7AB48DADBC446DEA9BF47E2E3C8E1E61FD4E99B3BEC45D237F044F233F4F59140F8F9A13FFC6F26000C78606040836F10AE5178866143740431304B000021F90405050007002C8A0075003000570082FFFFFFDDDDDDBBBBBB999999FFFFFFFFFFFFFFFFFFFFFFFF03E778BA0C0E2CCA496B7BCEEA4DB1E7E0E68D61298DA8A9A2A95AB2ADCBC1B1ACD1A47DE3982EF20FDF0E0811768845E304A9AC009B161C340A9B0E7BD65F26CBED7ABFE0B0784C2E9BCFA1807ACD6EBBDBB6B77CCE76D1EF73157E0F37F1FF017A807B76837471866F688B8C8D8E8F909192936802960266979A639A9D98609E9D5FA19E5DA4A159A7A856AAA553ADA2AFB097A9B396ACB69FB2B35CB63203C00316BC2EC1C115AD36C6C614A73ECBC7CDB13AD0D1D2B742D5C062DAC261DDDE60DDDCE3DFDAE4D563E5E2E7E6EDECE9EEF1F0D0E8F5F6CBF8CCF2F7F4F9FADBD4CDD377669F86040021F90405050007002C8A0060003000570082FFFFFFDDDDDDBBBBBB999999FFFFFFFFFFFFFFFFFFFFFFFF03EB78BADCFE0B4800ABBD6D4ECCBBD29A2756E0369E4C69A2A7BAB2A24BC1AD4B8FF28DDB7A27CF3D4C2E281C122DC62389A784249B8E2734229D1EAAD39F35CA8404BE811EF60006EBB0E5F4ADCB48BB61EC857BCE2A55E67454C882CF4FFB7E50806F7F83655B8687568966858C888F90835B7280949578976D849A9B5F9DA0A1A2A3A4A5A6A7A8A93A02ACADAEAFB0AF30B1B4B5AE28B6B9B527BABDB223BEC102BCC2BDB8C5B6B3C8B1AACDCECFD0D1D2D3D4CF03D703A3D8DBA0DBDED997DFDE94E2DF56E5E250E8E94DEBE64AEEE3F0F1D8EAF4D7EDF7E0F3F453F75BFD00AED3842ED43B51DCAC24000021F90405050007002C8A0058004200420082FFFFFFDDDDDDBBBBBB999999FFFFFFFFFFFFFFFFFFFFFFFF03FD78BADCFE30CA062A9838EB69EDFE20D77961698EA4A96E68B5BE597BC13424D738D5E64BE007AF1BEFF75B097144A2EA584B164FBB9CF31962D2A6D48FF58A2D6DB9D36A74D8057DC14EF3985CD69CD149ED9A1D76CFE9713B8AE7C0026377784A807B7C0D7E842386878822858B3D6D116F528D93818696971D13029E027083129C129F9F309A2BA6AB2F92AAABAC26AE2AB0B5B27934B5B625A235BABB9020BFC0C11BC3B0C51FC7B1C91ACBA6CDC6CF9ED119D3D4D518D7D9D6CBDCCEC3DFE0BAE2D2CCE5E3A0E8EBECEDEEEFF0F1F2F3F4F5F68603F9FAFBFCFDFCD5FE020ADCD76CA04181C90E2AFC576CA1C301091F2A2C287120C08AFEA225000021F90405050007002C920058005700300082FFFFFFDDDDDDBBBBBB999999FFFFFFFFFFFFFFFFFFFFFFFF03FF78BADCFE30BE4083BC38EB3D2BE560284A9E379E28575669EB76EB2BBFEB37DF676DE13CA8F723815090FAA10048406B38441947C9248AC9CCD54ED1E889DA1C3D435969902BF45E4561B188DCF59D4169F59A2DFA6EE2CA149BE88EC1E32E7B217619782F822A6F1A8687881A841278798D64897E8B80337B7C19901092388E189E0F8CA1749D8A91993CA224AA11A6ADA817A40CB2B3B411B60AA0400AAE302518B83D9BB5B00DBEBFC0BA1097B1AC1003D40381CEC2C4D20FD5D54BD847DB0DDDE47A9532E2E3E4E5635C33E90CEBF2ED6DE85918F2F373653C5A19F9FA9809041850E02F82EB0C3243C84E211086DD1C1E84484D620F8A152DF2C0A8F11322C38E0F09820C996FE4C48626495A4BA921010021F90401050007002CA70058005700300082FFFFFFDDDDDDBBBBBB999999FFFFFFFFFFFFFFFFFFFFFFFF03FF78BADCFE4B4801ABBD38EB36E7FE60A8759D689E22E9A16C5BA9922BCF074CD1F869E77CB8F7A28170C0FA9D02C8406B38441945C9248AC9D4C18E51A989DA343D41596D902BF45EA161E489DC057D3569F1989C3A83E34BB6CFBE892BF3746E7C70782E6C441F6F177E33878823838B8C8D7A1B8A1593949519970F7E7F34879691988539A29CA49EA6A79B179D0D993CA8AFAAB1ACB3B42FB60B9F400BBA10B00AB2408EB52A92B8C6AEC22418C5BF07C10F25CA612E00DA0018D428D121DBDBDD8132CB20E2E917CD2CE71AE9F0E45538D822F0F719F3395126F7F8D2D2FCFD03D843E04082380CC643C843A13A86091D8E834843E2448A332C6AC358D11422C7880A3FE6082972A4C0920517A24CB9D14402003B",e.WebLibDlg=null,e.StringToHTML=function(t){var e="";return e=pas.SysUtils.StringReplace(t,"\r","<BR>",rtl.createSet(0)),e=pas.SysUtils.StringReplace(e,"\n","",rtl.createSet(0))}},t.$init=function(){e.WebLibDlg=null}}),["WEBLib.Forms","WEBLib.Consts","WEBLib.WebTools"]),rtl.module("Math",["System"],(function(){"use strict"})),rtl.module("WEBLib.JSON",["System","Classes","Web","JS","SysUtils"],(function(){"use strict";var t=this,e=t.$impl;rtl.createClass(this,"TJSONAncestor",pas.System.TObject,(function(){this.GetStrValue=function(){return"",""},this.SetStrValue=function(t){}})),rtl.createClass(this,"TJSONValue",this.TJSONAncestor,(function(){this.$init=function(){t.TJSONAncestor.$init.call(this),this.fjv=void 0,this.fjo=void 0},this.GetStrValue=function(){return""+this.fjv},this.JSONValueFromJS=function(e){var i=null,s=0;return i=null,rtl.isArray(e)?(i=t.TJSONArray.$create("Create"),rtl.as(i,t.TJSONArray).fja=e):rtl.isObject(e)?(i=t.TJSONObject.$create("Create$2"),rtl.as(i,t.TJSONObject).fjo$1=e):rtl.isString(e)?(i=t.TJSONString.$create("Create"),rtl.as(i,t.TJSONString).SetStrValue(""+e)):rtl.isNumber(e)?(i=t.TJSONNumber.$create("Create"),rtl.as(i,t.TJSONNumber).SetStrValue(""+e),s=rtl.getNumber(e),rtl.as(i,t.TJSONNumber).FDouble=s,0===pas.System.Frac(s)&&(rtl.as(i,t.TJSONNumber).FInt=rtl.trunc(e))):pas.JS.isNull(e)?i=t.TJSONNull.$create("Create"):pas.JS.isBoolean(e)&&(i=pas.JS.toBoolean(e)?t.TJSONTrue.$create("Create$3"):t.TJSONFalse.$create("Create$3")),null==i&&(i=t.TJSONNull.$create("Create")),i.fjv=e,i},this.Create$1=function(t){return pas.System.TObject.Create.call(this),this.fjv=t,this},this.ToString=function(){return JSON.stringify(this.fjv)}})),rtl.createClass(this,"TJSONPair",pas.System.TObject,(function(){this.$init=function(){pas.System.TObject.$init.call(this),this.fjo=void 0,this.fjv=null,this.fjs=null},this.$final=function(){this.fjv=void 0,this.fjs=void 0,pas.System.TObject.$final.call(this)},this.Create$1=function(){return pas.System.TObject.Create.call(this),this.fjs=t.TJSONString.$create("Create"),this},this.Destroy=function(){rtl.free(this,"fjs"),pas.System.TObject.Destroy.call(this)},this.ToString=function(){return t.TJSONObject.isPrototypeOf(this.fjv)?'"'+this.fjs.GetStrValue()+'":'+rtl.as(this.fjv,t.TJSONObject).ToJSON():null!==this.fjs&&null!==this.fjv?'"'+this.fjs.GetStrValue()+'":'+this.fjv.ToString():""}})),rtl.createClass(this,"TJSONPairList",pas.Classes.TList,(function(){})),rtl.createClass(this,"TJSONObject",this.TJSONValue,(function(){this.$init=function(){t.TJSONValue.$init.call(this),this.fjo$1=null,this.FMembers=null},this.$final=function(){this.fjo$1=void 0,this.FMembers=void 0,t.TJSONValue.$final.call(this)},this.GetCount=function(){return null!=this.fjo$1?rtl.length(Object.keys(this.fjo$1)):null!=this.FMembers?this.FMembers.GetCount():0},this.Create$2=function(){return pas.System.TObject.Create.call(this),this.FMembers=t.TJSONPairList.$create("Create$1"),this.fjo$1=null,this},this.Destroy=function(){rtl.free(this,"FMembers"),pas.System.TObject.Destroy.call(this)},this.ParseJSONValue=function(t){var e;return e=JSON.parse(t),this.JSONValueFromJS(e)},this.GetJSONValue=function(t){var i;return i=this.fjo$1[t],e.JSONObjectToString(i)},this.Get=function(e){var i=null,s=void 0,n=null,r=0,a=null;if(i=null,null!=this.fjo$1)null==(s=this.fjo$1[e])&&null!==s||(i=t.TJSONPair.$create("Create$1"),n=this.$class.JSONValueFromJS(s),i.fjo=this.fjo$1,i.fjs.SetStrValue(e),i.fjv=n);else for(var o=0,l=this.FMembers.GetCount()-1;o<=l;o++)r=o,(a=rtl.getObject(this.FMembers.Get(r))).fjs.ToString()==='"'+e+'"'&&(i=a);return i},this.Get$1=function(t){return this.Get(Object.keys(this.fjo$1)[t])},this.GetValue$1=function(t){var e,i=null;return i=null,null!=(e=this.Get(t))&&((i=e.fjv).fjo=e.fjo),i},this.ToJSON=function(){var t="",e=0,i=0,s=null;t="{",(e=null!=this.fjo$1?this.GetCount():this.FMembers.GetCount())>0&&(null!=this.fjo$1?null!=(s=this.Get$1(0))?t+=s.ToString():t=t+'"'+Object.keys(this.fjo$1)[0]+'":null':t+=rtl.getObject(this.FMembers.Get(0)).ToString());for(var n=1,r=e-1;n<=r;n++)i=n,t=null!=this.fjo$1?null!=(s=this.Get$1(i))?t+","+s.ToString():t+',"'+Object.keys(this.fjo$1)[i]+'":null':t+","+rtl.getObject(this.FMembers.Get(i)).ToString();return t+="}"},this.ToString=function(){return this.ToJSON()}})),rtl.createClass(this,"TJSONString",this.TJSONValue,(function(){this.$init=function(){t.TJSONValue.$init.call(this),this.FValue=""},this.GetStrValue=function(){return this.FValue},this.SetStrValue=function(t){if(this.FValue=t,this.fjv=t,pas.System.Assigned(this.fjo)){var e=Object.keys(this.fjo)[0];this.fjo[e]=t}}})),rtl.createClass(this,"TJSONNumber",this.TJSONString,(function(){this.$init=function(){t.TJSONString.$init.call(this),this.FInt=0,this.FInt64=0,this.FDouble=0},this.GetStrValue=function(){return pas.SysUtils.FloatToStr$1(this.FDouble,pas.SysUtils.TFormatSettings.Invariant())},this.SetStrValue=function(t){this.FDouble=pas.SysUtils.StrToFloat$1(t,pas.SysUtils.TFormatSettings.Invariant()),0===pas.System.Frac(this.FDouble)?(pas.SysUtils.TryStrToInt64$1(t,{p:this,get:function(){return this.p.FInt64},set:function(t){this.p.FInt64=t}},pas.SysUtils.TFormatSettings.Invariant())||(this.FInt64=0),this.FInt=this.FInt64,this.fjv=this.FInt64):this.fjv=this.FDouble}})),rtl.createClass(this,"TJSONBool",this.TJSONValue,(function(){this.$init=function(){t.TJSONValue.$init.call(this),this.FBool=!1},this.SetStrValue=function(t){var e;e=pas.SysUtils.UpperCase(t),this.FBool="TRUE"===e},this.Create$2=function(e){return t.TJSONValue.Create$1.call(this,e),this.FBool=e,this}})),rtl.createClass(this,"TJSONTrue",this.TJSONBool,(function(){this.GetStrValue=function(){return"true","true"},this.Create$3=function(){return t.TJSONBool.Create$2.call(this,!0),this},this.ToString=function(){return this.GetStrValue()}})),rtl.createClass(this,"TJSONFalse",this.TJSONBool,(function(){this.GetStrValue=function(){return"false","false"},this.Create$3=function(){return t.TJSONBool.Create$2.call(this,!1),this},this.ToString=function(){return this.GetStrValue()}})),rtl.createClass(this,"TJSONNull",this.TJSONValue,(function(){this.GetStrValue=function(){return"null","null"},this.ToString=function(){return this.GetStrValue()}})),rtl.createClass(this,"TJSONArray",this.TJSONValue,(function(){this.$init=function(){t.TJSONValue.$init.call(this),this.fja=null},this.$final=function(){this.fja=void 0,t.TJSONValue.$final.call(this)},this.GetItem=function(e){var i;return i=this.GetJA()[e],rtl.isExt(i,t.TJSONObject,1)||rtl.isExt(i,t.TJSONArray,1)?rtl.getObject(i):this.$class.JSONValueFromJS(i)},this.GetCount=function(){return this.GetJA().length},this.GetJA=function(){return null==this.fja&&(this.fja=new Array),this.fja},this.ToString=function(){var e="",i=0,s=null,n="";e="[",n="";for(var r=0,a=this.GetCount()-1;r<=a;r++)i=r,null!=(s=this.GetItem(i))&&(e=t.TJSONObject.isPrototypeOf(s)?e+n+rtl.as(s,t.TJSONObject).ToString():e+n+s.ToString(),n=",");return e+="]"}})),t.$implcode=function(){e.JSONObjectToString=function(t){return t+""}}}),["TypInfo"]),rtl.module("WEBLib.Storage",["System","Web","Classes"],(function(){"use strict";var t=this;this.$rtti.$MethodVar("TStorageChangeEvent",{procsig:rtl.newTIProcSig([["Sender",pas.System.$rtti.TObject],["AKey",rtl.string],["AOldValue",rtl.string],["ANewValue",rtl.string],["AURL",rtl.string]]),methodkind:0}),rtl.createClass(this,"TLocalStorage",pas.Classes.TComponent,(function(){this.$init=function(){pas.Classes.TComponent.$init.call(this),this.FChangePtr=null,this.FOnChange=null},this.$final=function(){this.FOnChange=void 0,pas.Classes.TComponent.$final.call(this)},this.SetValues=function(t,e){window.localStorage.setItem(t,e)},this.StorageChanged=function(t){var e;e=t.storageArea+" ",null!=this.FOnChange&&pas.System.Pos("OBJECT",pas.SysUtils.UpperCase(e))>0&&this.FOnChange(this,t.key,t.oldValue,t.newValue,t.url)},this.Create$1=function(t){return this.FChangePtr=rtl.createCallback(this,"StorageChanged"),pas.Classes.TComponent.Create$1.apply(this,arguments),window.addEventListener("storage",this.FChangePtr),this},this.Destroy=function(){window.removeEventListener("storage",this.FChangePtr),pas.Classes.TComponent.Destroy.call(this)},rtl.addIntf(this,pas.System.IUnknown),this.$rtti.addProperty("OnChange",0,t.$rtti.TStorageChangeEvent,"FOnChange","FOnChange")}))}),["SysUtils"]),rtl.module("WEBLib.REST",["System","Classes","Web","JS","SysUtils","WEBLib.Controls","WEBLib.JSON"],(function(){"use strict";var t=this;this.THTTPRequestResponseType={0:"rtDefault",rtDefault:0,1:"rtText",rtText:1,2:"rtBlob",rtBlob:2,3:"rtJSON",rtJSON:3,4:"rtDocument",rtDocument:4,5:"rtArrayBuffer",rtArrayBuffer:5},this.$rtti.$Enum("THTTPRequestResponseType",{minvalue:0,maxvalue:5,ordtype:1,enumtype:this.THTTPRequestResponseType}),this.$rtti.$MethodVar("THttpResponse",{procsig:rtl.newTIProcSig([["Sender",pas.System.$rtti.TObject],["AResponse",rtl.string]]),methodkind:0}),rtl.createClass(this,"TPersistTokens",pas.Classes.TPersistent,(function(){this.$init=function(){pas.Classes.TPersistent.$init.call(this),this.FKey="",this.FEnabled=!1},this.Create$1=function(){return this.FEnabled=!1,this.FKey="",this},this.Assign=function(e){t.TPersistTokens.isPrototypeOf(e)&&(this.FKey=rtl.as(e,t.TPersistTokens).FKey,this.FEnabled=rtl.as(e,t.TPersistTokens).FEnabled)};var e=this.$rtti;e.addProperty("Key",0,rtl.string,"FKey","FKey"),e.addProperty("Enabled",0,rtl.boolean,"FEnabled","FEnabled",4,{Default:!1})})),rtl.createClass(this,"TRESTApp",pas.Classes.TPersistent,(function(){this.$init=function(){pas.Classes.TPersistent.$init.call(this),this.FKey="",this.FCallbackURL="",this.FSecret="",this.FAuthURL="",this.FClientID=""},this.Assign=function(e){t.TRESTApp.isPrototypeOf(e)&&(this.FKey=rtl.as(e,t.TRESTApp).FKey,this.FClientID=rtl.as(e,t.TRESTApp).FClientID,this.FCallbackURL=rtl.as(e,t.TRESTApp).FCallbackURL,this.FSecret=rtl.as(e,t.TRESTApp).FSecret,this.FAuthURL=rtl.as(e,t.TRESTApp).FAuthURL)};var e=this.$rtti;e.addProperty("AuthURL",0,rtl.string,"FAuthURL","FAuthURL"),e.addProperty("ClientID",0,rtl.string,"FClientID","FClientID"),e.addProperty("Key",0,rtl.string,"FKey","FKey"),e.addProperty("CallbackURL",0,rtl.string,"FCallbackURL","FCallbackURL"),e.addProperty("Secret",0,rtl.string,"FSecret","FSecret")})),this.TAuthLocale={0:"lcDefault",lcDefault:0,1:"lcEnglish",lcEnglish:1,2:"lcDutch",lcDutch:2,3:"lcGerman",lcGerman:3,4:"lcFrench",lcFrench:4,5:"lcSpanish",lcSpanish:5,6:"lcItalian",lcItalian:6,7:"lcPortuguese",lcPortuguese:7,8:"lcGreek",lcGreek:8,9:"lcDanish",lcDanish:9,10:"lcRussian",lcRussian:10,11:"lcRomanian",lcRomanian:11,12:"lcSwedish",lcSwedish:12,13:"lcFinnish",lcFinnish:13,14:"lcTurkish",lcTurkish:14,15:"lcJapanese",lcJapanese:15},rtl.createClass(this,"TRESTClient",pas.Classes.TComponent,(function(){this.$init=function(){pas.Classes.TComponent.$init.call(this),this.FAccessToken="",this.FRefreshToken="",this.FAccessExpiry=0,this.FRefreshExpiry=0,this.FOnAccessToken=null,this.FOnAuthFailed=null,this.FEventRegistered=!1,this.FOnResponse=null,this.FPersistTokens=null,this.FApp=null,this.FScopes=null,this.FLocale=0,this.FOnRequestResponse=null,this.FOnError=null,this.FResponseType=0,this.FLoginWidth=0,this.FLoginHeight=0,this.FHandleAccessTokenPtr=null,this.FHandleAuthClosePtr=null,this.FOpenResolver=null,this.FWithCredentials=!1},this.$final=function(){this.FOnAccessToken=void 0,this.FOnAuthFailed=void 0,this.FOnResponse=void 0,this.FPersistTokens=void 0,this.FApp=void 0,this.FScopes=void 0,this.FOnRequestResponse=void 0,this.FOnError=void 0,this.FOpenResolver=void 0,pas.Classes.TComponent.$final.call(this)},this.SetPersistTokens=function(t){this.FPersistTokens.Assign(t)},this.SetApp=function(t){this.FApp.Assign(t)},this.SetScopes=function(t){this.FScopes.Assign(t)},this.InstallCallback=function(){var t=document.createElement("script");t.innerHTML=' function processAuthData(access_token) {var event = new CustomEvent("oauthcallback", {\r            detail: {\r                 message: access_token\r            },\r  bubbles: true,\r  cancelable: true});\r  document.dispatchEvent(event);}',document.head.appendChild(t);var e=document.createElement("script");return e.async=!0,e.defer=!0,e.type="text/javascript",document.body.appendChild(e),!0,!0},this.RemoveOAuthHandler=function(){document.removeEventListener("oauthcallback",this.FHandleAccessTokenPtr),this.FEventRegistered=!1},this.HandleAccessToken=function(t){var e;return this.RemoveOAuthHandler(),e=t.detail.message,this.FAccessToken=e,this.WriteTokens(),null!=this.FOnAccessToken&&this.FOnAccessToken(this),null!=this.FOpenResolver&&(this.FOpenResolver(!0),this.FOpenResolver=null),!0,!0},this.Create$1=function(e){return pas.Classes.TComponent.Create$1.apply(this,arguments),this.FPersistTokens=t.TPersistTokens.$create("Create$1"),this.FApp=t.TRESTApp.$create("Create"),this.FScopes=pas.Classes.TStringList.$create("Create$1"),this.FLocale=0,this.FResponseType=0,this.FWithCredentials=!1,this.FLoginWidth=800,this.FLoginHeight=600,this.FHandleAccessTokenPtr=rtl.createCallback(this,"HandleAccessToken"),this},this.Destroy=function(){null!=this.FHandleAuthClosePtr&&(this.FHandleAuthClosePtr=null),rtl.free(this,"FApp"),rtl.free(this,"FScopes"),rtl.free(this,"FPersistTokens"),pas.Classes.TComponent.Destroy.call(this)},this.WriteTokens=function(){var t=null;this.FPersistTokens.FEnabled&&""!==this.FPersistTokens.FKey&&((t=pas["WEBLib.Storage"].TLocalStorage.$create("Create")).SetValues(this.FPersistTokens.FKey,this.FAccessToken),t.SetValues(this.FPersistTokens.FKey+"refresh",this.FRefreshToken),t.SetValues(this.FPersistTokens.FKey+"accessexpiry",pas["WEBLib.Utils"].TDateTimeHelper.ToIsoString.call({p:this,get:function(){return this.p.FAccessExpiry},set:function(t){this.p.FAccessExpiry=t}},!0,!1)),t.SetValues(this.FPersistTokens.FKey+"refreshexpiry",pas["WEBLib.Utils"].TDateTimeHelper.ToIsoString.call({p:this,get:function(){return this.p.FRefreshExpiry},set:function(t){this.p.FRefreshExpiry=t}},!0,!1)),t=rtl.freeLoc(t))},rtl.addIntf(this,pas.System.IUnknown);var e=this.$rtti;e.addProperty("App",2,t.$rtti.TRESTApp,"FApp","SetApp"),e.addProperty("LoginHeight",0,rtl.longint,"FLoginHeight","FLoginHeight",4,{Default:600}),e.addProperty("LoginWidth",0,rtl.longint,"FLoginWidth","FLoginWidth",4,{Default:800}),e.addProperty("PersistTokens",2,t.$rtti.TPersistTokens,"FPersistTokens","SetPersistTokens"),e.addProperty("ResponseType",0,t.$rtti.THTTPRequestResponseType,"FResponseType","FResponseType",4,{Default:t.THTTPRequestResponseType.rtDefault}),e.addProperty("Scopes",2,pas.Classes.$rtti.TStrings,"FScopes","SetScopes"),e.addProperty("WithCredentials",0,rtl.boolean,"FWithCredentials","FWithCredentials",4,{Default:!1}),e.addProperty("OnAccessToken",0,pas["WEBLib.Controls"].$rtti.TNotifyEvent,"FOnAccessToken","FOnAccessToken"),e.addProperty("OnAuthFailed",0,pas["WEBLib.Controls"].$rtti.TNotifyEvent,"FOnAuthFailed","FOnAuthFailed"),e.addProperty("OnRequestResponse",0,pas["WEBLib.Controls"].$rtti.THTTPRequestResponseEvent,"FOnRequestResponse","FOnRequestResponse"),e.addProperty("OnResponse",0,t.$rtti.THttpResponse,"FOnResponse","FOnResponse"),e.addProperty("OnError",0,pas["WEBLib.Controls"].$rtti.THTTPErrorEvent,"FOnError","FOnError")})),t.$init=function(){t.TRESTClient.InstallCallback()}}),["WEBLib.Storage","WEBLib.Utils"]),rtl.module("WEBLib.Utils",["System","Types","Web","SysUtils","Math","Classes","JS"],(function(){"use strict";var t=this,e=t.$impl;rtl.createHelper(this,"TLongIntHelper",null,(function(){this.ToString=function(){return t.TLongIntHelper.ToString$1(this.get())},this.ToString$1=function(t){return t.toString()}})),rtl.createHelper(this,"TDateTimeHelper",null,(function(){this.ToIsoString=function(t,e){var i=0,s=0,n=0,r=0,a=0,o=0,l=0,h="",d="",u="";function c(t,e){var i="";for(i=pas.SysUtils.IntToStr(t);i.length<e;)i="0"+i;return i}return t&&(h="-",d=":"),pas.SysUtils.DecodeDate(this.get(),{get:function(){return n},set:function(t){n=t}},{get:function(){return s},set:function(t){s=t}},{get:function(){return i},set:function(t){i=t}}),pas.SysUtils.DecodeTime(this.get(),{get:function(){return r},set:function(t){r=t}},{get:function(){return a},set:function(t){a=t}},{get:function(){return o},set:function(t){o=t}},{get:function(){return l},set:function(t){l=t}}),e&&(u="."+c(l,3)+"Z"),c(n,4)+h+c(s,2)+h+c(i,2)+"T"+c(r,2)+d+c(a,2)+d+c(o,2)+u}})),this.MatchStr=function(t,i,s){return s?e.Matches(t,i):e.Matches(pas.SysUtils.UpperCase(t),pas.SysUtils.UpperCase(i))},this.SelectElementContents=function(t){if(window.getSelection&&document.createRange){var e=window.getSelection(),i=document.createRange();i.selectNodeContents(t),e.removeAllRanges(),e.addRange(i)}else if(document.selection&&document.body.createTextRange){var s=document.body.createTextRange();s.moveToElementText(t),s.select()}},this.FormatProp=function(t,e){return pas.SysUtils.Format$1(t,e,pas.SysUtils.TFormatSettings.Invariant())},t.$implcode=function(){e.StripThousandSep=function(t){for(;pas.System.Pos(pas.SysUtils.FormatSettings.ThousandSeparator,t)>0;)pas.System.Delete({get:function(){return t},set:function(e){t=e}},pas.System.Pos(pas.SysUtils.FormatSettings.ThousandSeparator,t),1);return t},e.VarPos=function(t,e,i){return i.set(pas.System.Pos(t,e)),i.get()},e.IsDate=function(t,i){var s,n,r,a=!1,o="",l="",h=0,d=0,u=0,c=0,F=0,p=0,S=0,m=0;if(a=!1,l="",o=pas.SysUtils.UpperCase(pas.SysUtils.FormatSettings.ShortDateFormat),s=pas.System.Pos("D",o),n=pas.System.Pos("M",o),r=pas.System.Pos("Y",o),h=0,d=0,u=0,c=0,F=0,p=0,m=-1,e.VarPos(pas.SysUtils.FormatSettings.DateSeparator,t,{get:function(){return m},set:function(t){m=t}})>0){if(o=pas.System.Copy(t,1,m-1),s<n&&s<r?pas.System.val$5(o,{get:function(){return h},set:function(t){h=t}},{get:function(){return S},set:function(t){S=t}}):n<s&&n<r?pas.System.val$5(o,{get:function(){return d},set:function(t){d=t}},{get:function(){return S},set:function(t){S=t}}):r<n&&r<s&&pas.System.val$5(o,{get:function(){return u},set:function(t){u=t}},{get:function(){return S},set:function(t){S=t}}),0!==S)return a;if(pas.System.Delete({get:function(){return t},set:function(e){t=e}},1,m),e.VarPos(pas.SysUtils.FormatSettings.DateSeparator,t,{get:function(){return m},set:function(t){m=t}})>0){if(o=pas.System.Copy(t,1,m-1),s>n&&s<r||s>r&&s<n?pas.System.val$5(o,{get:function(){return h},set:function(t){h=t}},{get:function(){return S},set:function(t){S=t}}):n>s&&n<r||n>r&&n<s?pas.System.val$5(o,{get:function(){return d},set:function(t){d=t}},{get:function(){return S},set:function(t){S=t}}):(r>n&&r<s||r>s&&r<n)&&pas.System.val$5(o,{get:function(){return u},set:function(t){u=t}},{get:function(){return S},set:function(t){S=t}}),0!==S)return a;if(pas.System.Delete({get:function(){return t},set:function(e){t=e}},1,m),t=pas.SysUtils.Trim(t),e.VarPos(" ",t,{get:function(){return m},set:function(t){m=t}})>0&&(l=pas.System.Copy(t,m,t.length),t=pas.System.Copy(t,1,m-1)),s>n&&s>r?pas.System.val$5(t,{get:function(){return h},set:function(t){h=t}},{get:function(){return S},set:function(t){S=t}}):n>s&&n>r?pas.System.val$5(t,{get:function(){return d},set:function(t){d=t}},{get:function(){return S},set:function(t){S=t}}):r>n&&r>s&&pas.System.val$5(t,{get:function(){return u},set:function(t){u=t}},{get:function(){return S},set:function(t){S=t}}),0!==S)return a;if(h>31)return a;if(d>12)return a;if(""!==l){if(e.VarPos(pas.SysUtils.FormatSettings.TimeSeparator,l,{get:function(){return m},set:function(t){m=t}})>0){if(o=pas.System.Copy(l,1,m-1),pas.System.val$5(o,{get:function(){return c},set:function(t){c=t}},{get:function(){return S},set:function(t){S=t}}),0!==S)return a;if(c>23)return a;if(pas.System.Delete({get:function(){return l},set:function(t){l=t}},1,m),e.VarPos(pas.SysUtils.FormatSettings.TimeSeparator,l,{get:function(){return m},set:function(t){m=t}})>0){if(o=pas.System.Copy(l,1,m-1),pas.System.val$5(o,{get:function(){return F},set:function(t){F=t}},{get:function(){return S},set:function(t){S=t}}),0!==S)return a;if(pas.System.Delete({get:function(){return l},set:function(t){l=t}},1,m),pas.System.val$5(l,{get:function(){return p},set:function(t){p=t}},{get:function(){return S},set:function(t){S=t}}),0!==S)return a;if(p>60)return a}else if(pas.System.val$5(o,{get:function(){return F},set:function(t){F=t}},{get:function(){return S},set:function(t){S=t}}),0!==S)return a;if(F>59)return a;a=!0}}else a=!0;try{i.set(pas.SysUtils.EncodeDate(u,d,h)+pas.SysUtils.EncodeTime(c,F,p,0))}catch(t){a=!1}}}return a};e.Matches=function(t,i){var s=!1,n=!1,r=0,a="\0",o=0,l=0,h=0,d=0,u=!1,c=!1,F=!1,p="",S=!1,m=!1,C=!1,g=!1,b=0,f=0,T=0,y=0,E=0,L=0,B=0;if(0,u=!0,c=!0,S=!1,m=!1,C=!1,F=!1,g=!1,0!==(h=pas.System.Pos(">",t))){for(h+=1,"="===t.charAt(h-0-1)&&(g=!0,h+=1);" "===t.charAt(h-0-1);)h+=1;for(d=h,r=0,a="\0",B=0;h-0<=t.length&&" "!==t.charAt(h-0-1)&&h<=t.length&&(pas.System.Odd(B)||"&"!==t.charAt(h-0-1)&&"|"!==t.charAt(h-0-1));)'"'===t.charAt(h-0-1)&&(B+=1),0===r&&'"'===t.charAt(h-0-1)?d+=1:r+=1,a=t.charAt(h-0-1),(h+=1)-0<=t.length&&" "===t.charAt(h-0-1)&&pas.System.Odd(B)&&(a=t.charAt(h-0-1),h+=1);r>0&&'"'===a&&(r-=1),p=pas.System.Copy(t,d,r),pas.System.val$8(e.StripThousandSep(i),{get:function(){return b},set:function(t){b=t}},{get:function(){return T},set:function(t){T=t}}),pas.System.val$8(e.StripThousandSep(p),{get:function(){return f},set:function(t){f=t}},{get:function(){return y},set:function(t){y=t}}),L=0,e.IsDate(p,{get:function(){return L},set:function(t){L=t}})&&(y=1),E=0,e.IsDate(i,{get:function(){return E},set:function(t){E=t}})&&(T=1),c=0===T&&0===y?g?b>=f:b>f:e.IsDate(p,{get:function(){return L},set:function(t){L=t}})&&e.IsDate(i,{get:function(){return E},set:function(t){E=t}})?g?E>=L:E>L:g?pas.SysUtils.CompareStr(p,i)<=0:pas.SysUtils.CompareStr(p,i)<0,S=!0}if(g=!1,0!==(h=pas.System.Pos("<",t))){for(h+=1,"="===t.charAt(h-0-1)&&(g=!0,h+=1),a="\0";h-0<=t.length&&" "===t.charAt(h-0-1);)h+=1;for(d=h,r=0,B=0;h-0<=t.length&&" "!==t.charAt(h-0-1)&&h<=t.length&&(pas.System.Odd(B)||"&"!==t.charAt(h-0-1)&&"|"!==t.charAt(h-0-1));)'"'===t.charAt(h-0-1)&&(B+=1),0===r&&'"'===t.charAt(h-0-1)?d+=1:r+=1,a=t.charAt(h-0-1),h+=1;r>0&&'"'===a&&(r-=1),p=pas.System.Copy(t,d,r),pas.System.val$8(e.StripThousandSep(i),{get:function(){return b},set:function(t){b=t}},{get:function(){return T},set:function(t){T=t}}),pas.System.val$8(e.StripThousandSep(p),{get:function(){return f},set:function(t){f=t}},{get:function(){return y},set:function(t){y=t}}),e.IsDate(p,{get:function(){return L},set:function(t){L=t}})&&(y=1),e.IsDate(i,{get:function(){return E},set:function(t){E=t}})&&(T=1),u=0===T&&0===y?g?b<=f:b<f:e.IsDate(p,{get:function(){return L},set:function(t){L=t}})&&e.IsDate(i,{get:function(){return E},set:function(t){E=t}})?g?E<=L:E<L:g?pas.SysUtils.CompareStr(p,i)>=0:pas.SysUtils.CompareStr(p,i)>0,m=!0}if(0!==(h=pas.System.Pos("!",t))){for(h+=1;" "===t.charAt(h-0-1);)h+=1;for(d=h,r=0,a="\0",B=0;" "!==t.charAt(h-0-1)&&h<=t.length&&(pas.System.Odd(B)||"&"!==t.charAt(h-0-1)&&"|"!==t.charAt(h-0-1));)'"'===t.charAt(h-0-1)&&(B+=1),0===r&&'"'===t.charAt(h-0-1)?d+=1:r+=1,a=t.charAt(h-0-1),h+=1;r>0&&'"'===a&&(r-=1),p=pas.System.Copy(t,d,r),C=!0}if(C&&(0===pas.System.Pos(">",t)&&(S=C),0===pas.System.Pos("<",t)&&(m=C)),0!==pas.System.Pos("^",t)&&(S||m))return u||c;if(0!==pas.System.Pos("&",t)&&S&&m)return u&&c;if(0!==pas.System.Pos(">",t)&&c||0!==pas.System.Pos("<",t)&&u)return!0;for(o=1,l=1,n=""===t||""===i,s=!0;!n&&s;){var D=t.charAt(o-0-1);if("?"===D)(s=l<=i.length)&&(o+=1,l+=1);else if("!"===D)F=!0,o+=1;else if('"'===D)o+=1;else if("*"===D){do{o+=1}while(!(o-0>t.length||"*"!==t.charAt(o-0-1)));for(l+=r=i.length-l,s=e.Matches(pas.System.Copy(t,o,t.length),pas.System.Copy(i,l,i.length));r>=0&&!s;)l-=1,r-=1,s=e.Matches(pas.System.Copy(t,o,t.length),pas.System.Copy(i,l,i.length));s&&(o=t.length+1,l=i.length+1)}else(s=o<=t.length&&l<=i.length&&t.charAt(o-0-1)===i.charAt(l-0-1))&&(o+=1,l+=1);n=o>t.length&&l>i.length}return F?!s:s}}}),["RTLConsts","WEBLib.Consts","WEBLib.REST"]),rtl.module("WEBLib.Controls",["System","Classes","WEBLib.Graphics","Types","SysUtils","Web","JS"],(function(){"use strict";var t=this,e=t.$impl;this.VK_TAB=9,this.VK_RETURN=13,this.VK_ESCAPE=27,this.VK_PRIOR=33,this.VK_NEXT=34,this.VK_END=35,this.VK_HOME=36,this.VK_UP=38,this.VK_DOWN=40,this.WHEEL_DELTA=120,this.$rtti.$inherited("TCursor",rtl.longint,{}),this.crDefault=0,this.crNone=1,this.crArrow=2,this.crCross=3,this.crIBeam=4,this.crSize=5,this.crSizeNESW=6,this.crSizeNS=7,this.crSizeNWSE=8,this.crSizeWE=9,this.crUpArrow=10,this.crHourGlass=11,this.crDrag=12,this.crNoDrop=13,this.crHSplit=14,this.crVSplit=15,this.crMultIDrag=16,this.crSQLWait=17,this.crNo=18,this.crAppStart=19,this.crHelp=20,this.crHandPoint=21,this.crSizeAll=22,this.CSSBackground="background-color",this.CSSZIndex="z-index",this.TCSSLibrary={0:"cssNone",cssNone:0,1:"cssBootstrap",cssBootstrap:1},this.$rtti.$Enum("TCSSLibrary",{minvalue:0,maxvalue:1,ordtype:1,enumtype:this.TCSSLibrary}),this.TDragState={0:"dsDragEnter",dsDragEnter:0,1:"dsDragLeave",dsDragLeave:1,2:"dsDragMove",dsDragMove:2},this.$rtti.$Enum("TDragState",{minvalue:0,maxvalue:2,ordtype:1,enumtype:this.TDragState}),this.TDragMode={0:"dmManual",dmManual:0,1:"dmAutomatic",dmAutomatic:1},this.$rtti.$Enum("TDragMode",{minvalue:0,maxvalue:1,ordtype:1,enumtype:this.TDragMode}),this.TDragKind={0:"dkDrag",dkDrag:0,1:"dkDock",dkDock:1},this.$rtti.$Enum("TDragKind",{minvalue:0,maxvalue:1,ordtype:1,enumtype:this.TDragKind}),rtl.createClass(this,"TDragObject",pas.System.TObject,(function(){})),this.TAlign={0:"alNone",alNone:0,1:"alTop",alTop:1,2:"alBottom",alBottom:2,3:"alLeft",alLeft:3,4:"alRight",alRight:4,5:"alClient",alClient:5,6:"alCustom",alCustom:6},this.$rtti.$Enum("TAlign",{minvalue:0,maxvalue:6,ordtype:1,enumtype:this.TAlign}),this.TMouseButton={0:"mbLeft",mbLeft:0,1:"mbRight",mbRight:1,2:"mbMiddle",mbMiddle:2},this.$rtti.$Enum("TMouseButton",{minvalue:0,maxvalue:2,ordtype:1,enumtype:this.TMouseButton}),this.TBorderStyle={0:"bsNone",bsNone:0,1:"bsSingle",bsSingle:1},this.$rtti.$Enum("TBorderStyle",{minvalue:0,maxvalue:1,ordtype:1,enumtype:this.TBorderStyle}),this.TSizeStyle={0:"ssPercent",ssPercent:0,1:"ssAbsolute",ssAbsolute:1,2:"ssAuto",ssAuto:2},this.$rtti.$Enum("TSizeStyle",{minvalue:0,maxvalue:2,ordtype:1,enumtype:this.TSizeStyle}),this.TScrollStyle={0:"ssNone",ssNone:0,1:"ssHorizontal",ssHorizontal:1,2:"ssVertical",ssVertical:2,3:"ssBoth",ssBoth:3},this.TAnchorKind={0:"akLeft",akLeft:0,1:"akTop",akTop:1,2:"akRight",akRight:2,3:"akBottom",akBottom:3},this.$rtti.$Enum("TAnchorKind",{minvalue:0,maxvalue:3,ordtype:1,enumtype:this.TAnchorKind}),this.$rtti.$Set("TAnchors",{comptype:this.$rtti.TAnchorKind}),this.$rtti.$inherited("TElementClassName",rtl.string,{}),this.$rtti.$inherited("TElementID",rtl.string,{}),this.TElementFont={0:"efProperty",efProperty:0,1:"efCSS",efCSS:1},this.$rtti.$Enum("TElementFont",{minvalue:0,maxvalue:1,ordtype:1,enumtype:this.TElementFont}),this.TElementPosition={0:"epAbsolute",epAbsolute:0,1:"epRelative",epRelative:1,2:"epIgnore",epIgnore:2},this.$rtti.$Enum("TElementPosition",{minvalue:0,maxvalue:2,ordtype:1,enumtype:this.TElementPosition}),this.TElementEvent={0:"eeClick",eeClick:0,1:"eeMouseDown",eeMouseDown:1,2:"eeMouseUp",eeMouseUp:2,3:"eeMouseMove",eeMouseMove:3,4:"eeDblClick",eeDblClick:4,5:"eeKeyPress",eeKeyPress:5,6:"eeKeyDown",eeKeyDown:6,7:"eeKeyUp",eeKeyUp:7,8:"eeTouchStart",eeTouchStart:8,9:"eeTouchMove",eeTouchMove:9,10:"eeTouchEnd",eeTouchEnd:10},this.TTextDirection={0:"tdDefault",tdDefault:0,1:"tdLeftToRight",tdLeftToRight:1,2:"tdRightToLeft",tdRightToLeft:2,3:"tdInherit",tdInherit:3},this.$rtti.$Enum("TTextDirection",{minvalue:0,maxvalue:3,ordtype:1,enumtype:this.TTextDirection}),rtl.recNewT(this,"TJSXMLHttpRequestRecord",(function(){this.req=null,this.$eq=function(t){return this.req===t.req},this.$assign=function(t){return this.req=t.req,this},t.$rtti.$Record("TJSXMLHttpRequestRecord",{},this).addField("req",pas.Web.$rtti.TJSXMLHttpRequest)})),rtl.recNewT(this,"TJSEventRecord",(function(){this.event=null,this.$eq=function(t){return this.event===t.event},this.$assign=function(t){return this.event=t.event,this},t.$rtti.$Record("TJSEventRecord",{},this).addField("event",pas.Web.$rtti.TJSEvent)})),this.$rtti.$MethodVar("THTTPRequestResponseEvent",{procsig:rtl.newTIProcSig([["Sender",pas.System.$rtti.TObject],["ARequest",this.$rtti.TJSXMLHttpRequestRecord],["AResponse",rtl.string]]),methodkind:0}),this.$rtti.$MethodVar("THTTPErrorEvent",{procsig:rtl.newTIProcSig([["Sender",pas.System.$rtti.TObject],["ARequest",this.$rtti.TJSXMLHttpRequestRecord],["Event",this.$rtti.TJSEventRecord],["Handled",rtl.boolean,1]]),methodkind:0}),rtl.recNewT(this,"TJSHTMLElementRecord",(function(){this.element=null,this.$eq=function(t){return this.element===t.element},this.$assign=function(t){return this.element=t.element,this},t.$rtti.$Record("TJSHTMLElementRecord",{},this).addField("element",pas.Web.$rtti.TJSHTMLElement)})),rtl.recNewT(this,"TJSArrayBufferRecord",(function(){this.jsarraybuffer=null,this.$eq=function(t){return this.jsarraybuffer===t.jsarraybuffer},this.$assign=function(t){return this.jsarraybuffer=t.jsarraybuffer,this},t.$rtti.$Record("TJSArrayBufferRecord",{},this).addField("jsarraybuffer",pas.JS.$rtti.TJSArrayBuffer)})),this.$rtti.$MethodVar("TNotifyEvent",{procsig:rtl.newTIProcSig([["Sender",pas.System.$rtti.TObject]]),methodkind:0}),this.$rtti.$MethodVar("TMouseEvent",{procsig:rtl.newTIProcSig([["Sender",pas.System.$rtti.TObject],["Button",this.$rtti.TMouseButton],["Shift",pas.Classes.$rtti.TShiftState],["X",rtl.longint],["Y",rtl.longint]]),methodkind:0}),this.$rtti.$MethodVar("TMouseWheelEvent",{procsig:rtl.newTIProcSig([["Sender",pas.System.$rtti.TObject],["Shift",pas.Classes.$rtti.TShiftState],["WheelDelta",rtl.longint],["MousePos",pas.Types.$rtti.TPoint],["Handled",rtl.boolean,1]]),methodkind:0}),this.$rtti.$MethodVar("TMouseMoveEvent",{procsig:rtl.newTIProcSig([["Sender",pas.System.$rtti.TObject],["Shift",pas.Classes.$rtti.TShiftState],["X",rtl.longint],["Y",rtl.longint]]),methodkind:0}),this.$rtti.$MethodVar("TKeyEvent",{procsig:rtl.newTIProcSig([["Sender",pas.System.$rtti.TObject],["AKey",rtl.word,1],["Shift",pas.Classes.$rtti.TShiftState]]),methodkind:0}),this.$rtti.$MethodVar("TKeyPressEvent",{procsig:rtl.newTIProcSig([["Sender",pas.System.$rtti.TObject],["AChar",rtl.char,1]]),methodkind:0}),this.$rtti.$MethodVar("TTouchEvent",{procsig:rtl.newTIProcSig([["Sender",pas.System.$rtti.TObject],["X",rtl.longint],["Y",rtl.longint]]),methodkind:0}),this.TBiDiMode={0:"bdLeftToRight",bdLeftToRight:0,1:"bdRightToLeft",bdRightToLeft:1,2:"bdRightToLeftNoAlign",bdRightToLeftNoAlign:2,3:"bdRightToLeftReadingOnly",bdRightToLeftReadingOnly:3},this.$rtti.$Enum("TBiDiMode",{minvalue:0,maxvalue:3,ordtype:1,enumtype:this.TBiDiMode}),this.$rtti.$MethodVar("TDragOverEvent",{procsig:rtl.newTIProcSig([["Sender",pas.System.$rtti.TObject],["Source",pas.System.$rtti.TObject],["X",rtl.longint],["Y",rtl.longint],["State",this.$rtti.TDragState],["Accept",rtl.boolean,1]]),methodkind:0}),this.$rtti.$MethodVar("TDragDropEvent",{procsig:rtl.newTIProcSig([["Sender",pas.System.$rtti.TObject],["Source",pas.System.$rtti.TObject],["X",rtl.longint],["Y",rtl.longint]]),methodkind:0}),this.$rtti.$MethodVar("TStartDragEvent",{procsig:rtl.newTIProcSig([["Sender",pas.System.$rtti.TObject],["DragObject",this.$rtti.TDragObject,1]]),methodkind:0}),this.$rtti.$MethodVar("TEndDragEvent",{procsig:rtl.newTIProcSig([["Sender",pas.System.$rtti.TObject],["Target",pas.System.$rtti.TObject],["X",rtl.longint],["Y",rtl.longint]]),methodkind:0}),this.TControlStyleValue={0:"csAcceptsControls",csAcceptsControls:0,1:"csSetCaption",csSetCaption:1},rtl.createClass(this,"TMargins",pas.Classes.TPersistent,(function(){this.$init=function(){pas.Classes.TPersistent.$init.call(this),this.FOnChange=null,this.FLeft=0,this.FTop=0,this.FRight=0,this.FBottom=0},this.$final=function(){this.FOnChange=void 0,pas.Classes.TPersistent.$final.call(this)},this.SetLeft=function(t){t!==this.FLeft&&(this.FLeft=t,this.DoChange())},this.SetTop=function(t){t!==this.FTop&&(this.FTop=t,this.DoChange())},this.SetRight=function(t){t!==this.FRight&&(this.FRight=t,this.DoChange())},this.SetBottom=function(t){t!==this.FBottom&&(this.FBottom=t,this.DoChange())},this.DoChange=function(){null!=this.FOnChange&&this.FOnChange(this)},this.Create$1=function(){return this.FLeft=3,this.FTop=3,this.FBottom=3,this.FRight=3,this},this.Assign=function(e){t.TMargins.isPrototypeOf(e)?(this.FLeft=rtl.as(e,t.TMargins).FLeft,this.FTop=rtl.as(e,t.TMargins).FTop,this.FBottom=rtl.as(e,t.TMargins).FBottom,this.FRight=rtl.as(e,t.TMargins).FRight):pas.Classes.TPersistent.Assign.apply(this,arguments)};var e=this.$rtti;e.addProperty("Left",2,rtl.longint,"FLeft","SetLeft",4,{Default:3}),e.addProperty("Top",2,rtl.longint,"FTop","SetTop",4,{Default:3}),e.addProperty("Right",2,rtl.longint,"FRight","SetRight",4,{Default:3}),e.addProperty("Bottom",2,rtl.longint,"FBottom","SetBottom",4,{Default:3})})),rtl.createClass(this,"TCenter",pas.Classes.TPersistent,(function(){this.$init=function(){pas.Classes.TPersistent.$init.call(this),this.FHorizontal=!1,this.FVertical=!1,this.FOnChange=null},this.$final=function(){this.FOnChange=void 0,pas.Classes.TPersistent.$final.call(this)},this.SetHorizontal=function(t){this.FHorizontal!==t&&(this.FHorizontal=t,this.DoChange())},this.SetVertical=function(t){this.FVertical!==t&&(this.FVertical=t,this.DoChange())},this.DoChange=function(){null!=this.FOnChange&&this.FOnChange(this)},this.Assign=function(e){t.TCenter.isPrototypeOf(e)&&(this.FHorizontal=rtl.as(e,t.TCenter).FHorizontal,this.FVertical=rtl.as(e,t.TCenter).FVertical)};var e=this.$rtti;e.addProperty("Horizontal",2,rtl.boolean,"FHorizontal","SetHorizontal",4,{Default:!1}),e.addProperty("Vertical",2,rtl.boolean,"FVertical","SetVertical",4,{Default:!1})})),rtl.createClass(this,"TPadding",pas.Classes.TPersistent,(function(){this.$init=function(){pas.Classes.TPersistent.$init.call(this),this.FOnChange=null,this.FLeft=0,this.FTop=0,this.FRight=0,this.FBottom=0},this.$final=function(){this.FOnChange=void 0,pas.Classes.TPersistent.$final.call(this)},this.SetLeft=function(t){this.FLeft!==t&&(this.FLeft=t,this.DoChange())},this.SetTop=function(t){this.FTop!==t&&(this.FTop=t,this.DoChange())},this.SetRight=function(t){this.FRight!==t&&(this.FRight=t,this.DoChange())},this.SetBottom=function(t){this.FBottom!==t&&(this.FBottom=t,this.DoChange())},this.DoChange=function(){null!=this.FOnChange&&this.FOnChange(this)},this.Create$1=function(){return pas.System.TObject.Create.call(this),this.FLeft=0,this.FTop=0,this.FRight=0,this.FBottom=0,this},this.Assign=function(e){t.TPadding.isPrototypeOf(e)&&(this.FLeft=rtl.as(e,t.TPadding).FLeft,this.FRight=rtl.as(e,t.TPadding).FRight,this.FTop=rtl.as(e,t.TPadding).FTop,this.FBottom=rtl.as(e,t.TPadding).FBottom)};var e=this.$rtti;e.addProperty("Left",2,rtl.longint,"FLeft","SetLeft",4,{Default:0}),e.addProperty("Top",2,rtl.longint,"FTop","SetTop",4,{Default:0}),e.addProperty("Right",2,rtl.longint,"FRight","SetRight",4,{Default:0}),e.addProperty("Bottom",2,rtl.longint,"FBottom","SetBottom",4,{Default:0})})),rtl.createInterface(this,"IControl","{6325F220-F2E4-384C-B7C4-A6C697D13DCF}",["EnterChildren","ExitChildren"],pas.System.IUnknown),rtl.createClass(this,"TControl",pas.Classes.TComponent,(function(){this.$init=function(){pas.Classes.TComponent.$init.call(this),this.FGotFocus=!1,this.FAcceptDrag=!1,this.FCaptureDown=!1,this.FMouseInsideLayer=!1,this.FLayer=null,this.FCaptured=!1,this.FControlCreated=!1,this.FUpdateCount=0,this.FBlockUpdateElement=!1,this.FElement=null,this.FID="",this.FNew=!1,this.FContainer=null,this.FElementEvent=null,this.FLastElementEvent=null,this.FElementClassName="",this.FFont=null,this.FParent=null,this.FPrevParent=null,this.FControls=[],this.FOnDragOver=null,this.FOnDragDrop=null,this.FOnStartDrag=null,this.FonEndDrag=null,this.FOnClick=null,this.FOnDblClick=null,this.FOnMouseDown=null,this.FOnMouseUp=null,this.FOnMouseMove=null,this.FOnKeyDown=null,this.FOnKeyUp=null,this.FOnKeyPress=null,this.FOnEnter=null,this.FOnExit=null,this.FEnabled=!1,this.FHint="",this.FRole="",this.FShowHint=!1,this.FTabOrder=0,this.FTabStop=!1,this.FVisible=!1,this.FWidth=0,this.FHeight=0,this.FTag$1=0,this.FAlign=0,this.FAnchors={},this.FAlignWithMargins=!1,this.FIsAligning=!1,this.FOnMouseEnter=null,this.FOnMouseLeave=null,this.FCursor=0,this.FDoubleBuffered=!1,this.FControlStyle={},this.FMargins=null,this.FCenter=null,this.FOnMouseWheel=null,this.FParentDoubleBuffered=!1,this.FParentColor=!1,this.FParentFont=!1,this.FParentBiDiMode=!1,this.FOnTouchMove=null,this.FOnTouchStart=null,this.FOnTouchEnd=null,this.FOnTouchCancel=null,this.FLinkTouchEvents=!1,this.FWidthStyle=0,this.FHeightStyle=0,this.FWidthPercent=0,this.FHeightPercent=0,this.FOrigRect=pas.Types.TRect.$new(),this.FOrigParentRect=pas.Types.TRect.$new(),this.FIsResizing=!1,this.FShowFocus=!1,this.FBorderWidth=0,this.FOrigTop=0,this.FOrigLeft=0,this.FUpdateTopLeft=!1,this.FEnablePropagation=!1,this.FParentShowHint=!1,this.FScriptLoaded=!1,this.FControlScriptCountLoaded=0,this.FRequiredScripts=null,this.FElementFont=0,this.FElementPosition=0,this.FParentElement=null,this.FClipChildren=!1,this.FTextDirection=0,this.FEventStopPropagation={},this.FOnResize=null,this.FMouseMovePtr=null,this.FMouseDownPtr=null,this.FMouseUpPtr=null,this.FMouseEnterPtr=null,this.FMouseLeavePtr=null,this.FClickPtr=null,this.FDblClickPtr=null,this.FKeyDownPtr=null,this.FKeyUpPtr=null,this.FKeyPressPtr=null,this.FInputPtr=null,this.FTouchStartPtr=null,this.FTouchEndPtr=null,this.FTouchMovePtr=null,this.FTouchCancelPtr=null,this.FContextMenuPtr=null,this.FExitPtr=null,this.FEnterPtr=null,this.FWheelPtr=null,this.FLayerMouseEnterPtr=null,this.FLayerMouseLeavePtr=null,this.FScriptLoadedPtr=null,this.FDragStartPtr=null,this.FDragOverPtr=null,this.FDragEnterPtr=null,this.FDragLeavePtr=null,this.FDragEndPtr=null,this.FDragDropPtr=null,this.FChildOrder=0,this.FAllowTouch=!1,this.FWheelAccumulator=0,this.FWheelMousePos=pas.Types.TPoint.$new(),this.FBiDiMode=0,this.FOnMouseWheelDown=null,this.FOnMouseWheelUp=null,this.FNoUserSelect=!1,this.FEventsBound=!1,this.FDragMode=0,this.FToolTip=void 0,this.FDesignTime=!1,this.FColor=0},this.$final=function(){this.FLayer=void 0,this.FElement=void 0,this.FContainer=void 0,this.FElementEvent=void 0,this.FLastElementEvent=void 0,this.FFont=void 0,this.FParent=void 0,this.FPrevParent=void 0,this.FControls=void 0,this.FOnDragOver=void 0,this.FOnDragDrop=void 0,this.FOnStartDrag=void 0,this.FonEndDrag=void 0,this.FOnClick=void 0,this.FOnDblClick=void 0,this.FOnMouseDown=void 0,this.FOnMouseUp=void 0,this.FOnMouseMove=void 0,this.FOnKeyDown=void 0,this.FOnKeyUp=void 0,this.FOnKeyPress=void 0,this.FOnEnter=void 0,this.FOnExit=void 0,this.FAnchors=void 0,this.FOnMouseEnter=void 0,this.FOnMouseLeave=void 0,this.FControlStyle=void 0,this.FMargins=void 0,this.FCenter=void 0,this.FOnMouseWheel=void 0,this.FOnTouchMove=void 0,this.FOnTouchStart=void 0,this.FOnTouchEnd=void 0,this.FOnTouchCancel=void 0,this.FOrigRect=void 0,this.FOrigParentRect=void 0,this.FRequiredScripts=void 0,this.FParentElement=void 0,this.FEventStopPropagation=void 0,this.FOnResize=void 0,this.FWheelMousePos=void 0,this.FOnMouseWheelDown=void 0,this.FOnMouseWheelUp=void 0,pas.Classes.TComponent.$final.call(this)},this.GetControlsCount=function(){return rtl.length(this.FControls)},this.GetControls=function(t){return this.FControls[t]},this.SetVisible=function(t){this.FVisible!==t&&(this.VisibleChanging(),this.FVisible=t,this.UpdateElement(),this.DoRealign(),this.AlignControl(this),this.VisibleChanged())},this.SetHint=function(t){this.FHint!==t&&(this.FHint=t,this.UpdateElement())},this.SetShowHint=function(t){this.FShowHint!==t&&(this.FShowHint=t,this.UpdateElement())},this.SetTabOrder=function(t){this.FTabOrder!==t&&(this.FTabOrder=t,this.UpdateElement())},this.SetTabStop=function(t){this.FTabStop!==t&&(this.FTabStop=t,this.UpdateElement())},this.SetAlign=function(t){this.FAlign!==t&&(this.FAlign=t,this.DoRealign())},this.SetAlignWithMargins=function(t){this.FAlignWithMargins!==t&&(this.FAlignWithMargins=t,this.DoRealign())},this.GetBoundsRect=function(){var t=pas.Types.TRect.$new();return t.Left=this.GetLeft(),t.Top=this.GetTop(),t.Right=this.GetLeft()+this.GetWidth(),t.Bottom=this.GetTop()+this.GetHeight(),t},this.SetID=function(t){var e=null,i=null,s=null,n=null,r=0,a=0,o=0,l=0;if(this.FNew&&this.FID!==t&&null!=(e=document.getElementById(t)))return r=this.FLeft,a=this.FTop,o=this.FWidth,l=this.FHeight,i=null,this.UnbindEvents(),null!=this.FContainer&&(this.FParentElement=this.FContainer.parentElement,i=document.createElement("SPAN"),this.$class.MoveElements(this.FContainer,i)),n=this.FParent,this.SetParent(null),this.CreateWithID(t),this.SetParentComponent(n),this.FID=t,this.FWidth=o,this.FHeight=l,this.UpdateElement(),4 in this.FComponentState&&(this.FLeft=r,this.FTop=a),void(null!=i&&(this.GetElementHandle().textContent="",this.MoveElementsAndFree(i,this.GetElementHandle())));if(!this.FNew&&this.FID!==t){if(o=this.FWidth,l=this.FHeight,null!=(e=document.getElementById(this.FID))&&(i=document.createElement("SPAN"),this.$class.MoveElements(e,i),this.UnbindEvents()),""!==t&&null!=(e=document.getElementById(t)))return this.CreateWithID(t),this.FID=t,this.FWidth=o,this.FHeight=l,this.UpdateElement(),void this.MoveElementsAndFree(i,this.FContainer);this.FNew=!0,this.FElement=null,this.CreateControl(),""===t&&(this.CreateInitialize(),this.FWidth=o,this.FHeight=l),null!=this.FParentElement?this.FParentElement.appendChild(this.GetContainer()):document.body.appendChild(this.GetContainer()),null!=(s=pas["WEBLib.Forms"].GetParentForm(this))&&(this.SetParent(s),this.SetElementPosition(0),this.SetLeft(0),this.SetTop(0)),null!=i&&this.MoveElementsAndFree(i,this.FContainer),this.UpdateElement(),this.UpdateElementSize()}this.FID=t,null!=this.FContainer&&this.FContainer.setAttribute("id",t)},this.SetMargins=function(t){this.FMargins.Assign(t)},this.SetAnchors=function(t){rtl.neSet(this.FAnchors,t)&&(this.FAnchors=rtl.refSet(t),0 in this.FComponentState||this.UpdateAnchoring())},this.GetElementEvent=function(){return this.FElementEvent},this.GetIsLinked=function(){return!this.FNew},this.SetElementFont=function(t){this.FElementFont!==t&&(this.FElementFont=t,this.UpdateElementVisual())},this.SetElementPosition=function(t){this.FElementPosition!==t&&(this.FElementPosition=t,null!=this.GetElementHandle()&&(this.UpdateElementSize(),this.RecreateCanvas(),this.InternalResize()))},this.SetClipChildren=function(t){this.FClipChildren=t,this.UpdateElement()},this.SetChildOrderEx=function(t){this.FChildOrder=t},this.GetRole=function(){var t="";return t=this.FRole,null!=this.GetElementHandle()&&(t=this.GetElementHandle().getAttribute("role")),t},this.SetRole=function(t){this.FRole=t,null!=this.GetElementHandle()&&(""===t?this.GetElementHandle().removeAttribute("role"):this.GetElementHandle().setAttribute("role",t))},this.GetContainer=function(){return this.FContainer},this.GetChildContainer=function(){return this.FContainer},this.SetParentFont=function(t){t!==this.FParentFont&&t&&null!=this.FParent&&(this.BeginUpdate(),this.FFont.Assign(this.FParent.FFont),this.EndUpdate(),this.UpdateElement()),this.FParentFont=t},this.SetParentColor=function(t){this.FParentColor!==t&&t&&null!=this.FParent&&this.SetColor(this.FParent.FColor),this.FParentColor=t},this.SetDragMode=function(t){this.FDragMode=t,1===t?this.BeginDrag():this.DisableDrag()},this.GetClientHeight=function(){return this.GetHeight()},this.SetHeightStyle=function(t){this.FHeightStyle!==t&&(this.FHeightStyle=t,2!==this.FHeightStyle||null==this.GetElementHandle()||this.GetIsLinked()||this.GetElementStyle().removeProperty("height"),this.UpdateElementSize(),this.ResetAnchoring(),this.DoBoundsChange())},this.SetWidthStyle=function(t){this.FWidthStyle!==t&&(this.FWidthStyle=t,2!==this.FWidthStyle||null==this.GetElementHandle()||this.GetIsLinked()||this.GetElementStyle().removeProperty("width"),this.UpdateElementSize(),this.ResetAnchoring(),this.DoBoundsChange())},this.SetHeightPercent=function(t){this.FHeightPercent!==t&&(this.FHeightPercent=t,this.UpdateElementSize(),this.ResetAnchoring(),this.DoBoundsChange())},this.SetWidthPercent=function(t){this.FWidthPercent!==t&&(this.FWidthPercent=t,this.UpdateElementSize(),this.ResetAnchoring(),this.DoBoundsChange())},this.SetShowFocus=function(t){this.FShowFocus!==t&&(this.FShowFocus=t,this.UpdateElement())},this.SetWidth=function(t){this.FWidth!==t&&(this.FWidth=t,this.ResetAnchoring(),this.DoBoundsChange(),!this.GetIsLinked()||1!==this.FWidthStyle||0 in this.FComponentState||this.IsUpdating()||null==this.GetElementHandle()||(t>=0?this.GetElementStyle().setProperty("width",pas.SysUtils.IntToStr(t)+"px"):this.GetElementStyle().removeProperty("width")))},this.SetHeight=function(t){var e=null;this.FHeight!==t&&(this.FAlign in rtl.createSet(3,4,5)&&null!=this.GetElementHandle()&&(e=this.GetElementHandle().getBoundingClientRect()).top+t>=pas["WEBLib.Forms"].WinHeight()&&(t=Math.round(pas["WEBLib.Forms"].WinHeight()-e.top)),this.FHeight=t,this.ResetAnchoring(),this.DoBoundsChange(),!this.GetIsLinked()||1!==this.FHeightStyle||0 in this.FComponentState||this.IsUpdating()||null==this.GetElementHandle()||(t>=0?this.GetElementStyle().setProperty("height",pas.SysUtils.IntToStr(t)+"px"):this.GetElementStyle().removeProperty("height")))},this.SetWidthInt=function(t){this.FWidth=t},this.SetHeightInt=function(t){this.FHeight=t},this.SetEnabled=function(t){this.FEnabled!==t&&(this.FEnabled=t,this.UpdateElementData())},this.RecreateCanvas=function(){},this.VisibleChanging=function(){},this.VisibleChanged=function(){for(var t=0,e=0,i=this.GetControlsCount()-1;e<=i;e++)t=e,this.GetControls(t).VisibleChanged()},this.ColorChanging=function(){},this.FocusedControlEntered=function(){var e=null,i=null,s=rtl.createIntfRefs();try{for(e=this.FParent;!(null===e||pas.SysUtils.Supports$1(s.ref(1,rtl.queryIntfT(e,pas.System.IUnknown)),rtl.getIntfGUIDR(t.IControl),{get:function(){return i},set:function(t){i=t}})&&i.EnterChildren(s.ref(2,rtl.queryIntfT(this,t.IControl))));)e=e.FParent}finally{s.free(),rtl._Release(i)}},this.FocusedControlExited=function(){var e=null,i=null,s=rtl.createIntfRefs();try{for(e=this.FParent;!(null===e||pas.SysUtils.Supports$1(s.ref(1,rtl.queryIntfT(e,pas.System.IUnknown)),rtl.getIntfGUIDR(t.IControl),{get:function(){return i},set:function(t){i=t}})&&i.ExitChildren(s.ref(2,rtl.queryIntfT(this,t.IControl))));)e=e.FParent}finally{s.free(),rtl._Release(i)}},this.EnterChildren=function(t){var e=!1;rtl._AddRef(t);try{e=!1}finally{rtl._Release(t)}return e},this.ExitChildren=function(t){var e=!1;rtl._AddRef(t);try{e=!1}finally{rtl._Release(t)}return e},this.GetWidth=function(){var t=0,e=null;return t=this.FWidth,null==this.GetElementHandle()||0 in this.FComponentState||(-1===t&&(t=Math.round(pas.System.Int(this.GetElementHandle().offsetWidth))),1!==this.FWidthStyle&&(e=this.GetElementHandle().getBoundingClientRect(),t=Math.round(pas.System.Int(e.right-e.left)))),t},this.GetHeight=function(){var t=0,e=null;return t=this.FHeight,null==this.GetElementHandle()||0 in this.FComponentState||(-1===t&&(t=Math.round(pas.System.Int(this.GetElementHandle().offsetHeight))),1!==this.FHeightStyle&&(e=this.GetElementHandle().getBoundingClientRect(),t=Math.round(pas.System.Int(e.bottom-e.top)))),t},this.GetOuterWidth=function(){return this.FWidth-this.FBorderWidth},this.GetOuterHeight=function(){return this.FHeight-this.FBorderWidth},this.GetDesignWidth=function(){return this.FWidth},this.GetDesignHeight=function(){return this.FHeight},this.GetDesignLeft=function(){return this.FLeft},this.GetDesignTop=function(){return this.FTop},this.GetLeft=function(){var t=0;return-1!==(t=this.FLeft)||null==this.GetElementHandle()||0 in this.FComponentState||(t=Math.round(this.GetElementHandle().offsetLeft)),t},this.GetTop=function(){var t=0;return-1!==(t=this.FTop)||null==this.GetElementHandle()||0 in this.FComponentState||(t=Math.round(this.GetElementHandle().offsetTop)),t},this.CreateElement=function(){return null,null},this.CreateChildElements=function(t){},this.ContainerElement=function(){return document.body},this.IsStructuralElement=function(){return!1,!1},this.IsEnabled=function(){return this.FEnabled},this.GetNewName=function(){var e,i="",s="";return i=this.$classname,pas.System.Delete({get:function(){return i},set:function(t){i=t}},1,1),s="",null!=(e=pas["WEBLib.Forms"].GetParentForm(this))&&(s=e.$classname),s+"_"+t.FindUniqueName(i)},this.IsInputControl=function(){return!1,!1},this.UseCSSFont=function(){return!(""===this.FElementClassName&&0===this.FElementFont&&!this.GetIsLinked())},this.UseCSSFontColor=function(){return!(pas["WEBLib.Forms"].Application.FThemed&&pas["WEBLib.Graphics"].ColorToRGB(this.FFont.FColor)===pas["WEBLib.Graphics"].RGB(0,0,0))},this.BindElement=function(){},this.CreateInitialize=function(){var t=null;this.FDesignTime=4 in this.FComponentState&&!(1 in this.FOwner.FComponentState||0 in this.FOwner.FComponentState),this.FRequiredScripts=pas.Classes.TStringList.$create("Create$1"),this.FOrigRect.$assign(pas.Types.Rect(-1,-1,-1,-1)),this.FClipChildren=!0,this.FDesignTime&&null!=(t=pas["WEBLib.Forms"].GetParentForm(this))&&pas["WEBLib.Forms"].TForm.isPrototypeOf(t)&&0!==rtl.as(t,pas["WEBLib.Forms"].TForm).FCSSLibrary&&this.InitCSSLibrary(rtl.as(t,pas["WEBLib.Forms"].TForm).FCSSLibrary)},this.DestroyControls=function(){for(var t=0,e=null,i=this.GetControlsCount()-1;i>=0;i--)t=i,e=this.GetControls(t),e=rtl.freeLoc(e)},this.ClearControls=function(){this.FControls=rtl.arraySetLength(this.FControls,null,0)},this.GetElementStyle=function(){return this.GetElementHandle().style},this.InitCSSLibrary=function(t){},this.SetControlCursor=function(t){this.FCursor=t,""===this.FElementClassName&&null!=this.GetElementHandle()&&this.SetElementPointer(this.GetElementHandle(),t)},this.SetBiDiMode=function(t){null!=this.GetElementHandle()&&(0===t?this.GetElementHandle().removeAttribute("dir"):this.GetElementHandle().setAttribute("dir","rtl"))},this.GetMouseEventButton=function(t){var e=0;e=0;var i=t.button;return 0===i?e=0:1===i?e=2:2===i&&(e=1),e},this.GetMouseEventShiftState=function(t){var e={};return e={},t.shiftKey&&(e=rtl.unionSet(e,rtl.createSet(0))),t.ctrlKey&&(e=rtl.unionSet(e,rtl.createSet(2))),t.altKey&&(e=rtl.unionSet(e,rtl.createSet(1))),1==(1&t.buttons)&&(e=rtl.unionSet(e,rtl.createSet(3))),2==(2&t.buttons)&&(e=rtl.unionSet(e,rtl.createSet(4))),4==(4&t.buttons)&&(e=rtl.unionSet(e,rtl.createSet(5))),e},this.GetKeyBoardEventShiftState=function(t){var e={};return e={},t.shiftKey&&(e=rtl.unionSet(e,rtl.createSet(0))),t.ctrlKey&&(e=rtl.unionSet(e,rtl.createSet(2))),t.altKey&&(e=rtl.unionSet(e,rtl.createSet(1))),e},this.GetMouseWheelEventShiftState=function(t){var e={};return e={},t.shiftKey&&(e=rtl.unionSet(e,rtl.createSet(0))),t.ctrlKey&&(e=rtl.unionSet(e,rtl.createSet(2))),t.altKey&&(e=rtl.unionSet(e,rtl.createSet(1))),e},this.GetTouchEventShiftState=function(t){var e={};return e={},t.shiftKey&&(e=rtl.unionSet(e,rtl.createSet(0))),t.ctrlKey&&(e=rtl.unionSet(e,rtl.createSet(2))),t.altKey&&(e=rtl.unionSet(e,rtl.createSet(1))),e},this.HandleDoClick=function(t){return this.FElementEvent=t,0 in this.FEventStopPropagation&&this.StopPropagation(),this.FEnabled&&this.Click(),!0,this.FElementEvent=null,!0},this.HandleDoWheel=function(t){var e,i=!1,s=0,n=0;return this.FElementEvent=t,this.StopPropagation(),this.XYToClient(t.clientX,t.clientY,{get:function(){return s},set:function(t){s=t}},{get:function(){return n},set:function(t){n=t}}),this.FWheelMousePos.x=Math.round(s),this.FWheelMousePos.y=Math.round(n),e=rtl.refSet(this.GetMouseWheelEventShiftState(t)),i=!1,this.MouseWheel(rtl.refSet(e),pas.System.Trunc(-t.deltaY),{get:function(){return i},set:function(t){i=t}}),!0,this.FElementEvent=null,!0},this.HandleDoDblClick=function(t){return this.FCaptureDown=!1,this.FElementEvent=t,4 in this.FEventStopPropagation&&this.StopPropagation(),this.FEnabled&&this.DblClick(),!0,this.FElementEvent=null,!0},this.HandleDoMouseDown=function(i){var s,n,r,a=!1,o=0,l=0;return r=i,this.FElementEvent=r,1 in this.FEventStopPropagation&&this.StopPropagation(),this.CanFocus()||this.PreventDefault(),e.FMouseX=Math.round(r.clientX),e.FMouseY=Math.round(r.clientY),this.XYToClient(r.clientX,r.clientY,{get:function(){return o},set:function(t){o=t}},{get:function(){return l},set:function(t){l=t}}),this.HasVertScrollBar()&&o>this.GetWidth()-t.GetScrollBarWidth()||this.HasHorzScrollBar()&&l>this.GetHeight()-t.GetScrollBarHeight()||(s=rtl.refSet(this.GetMouseEventShiftState(r)),n=this.GetMouseEventButton(r),this.MouseDown(n,rtl.refSet(s),pas.System.Trunc(o),pas.System.Trunc(l)),a=!0,this.FElementEvent=null),a},this.HandleDoMouseUp=function(e){var i,s,n,r=!1,a=0,o=0;return n=e,this.FElementEvent=n,2 in this.FEventStopPropagation&&this.StopPropagation(),this.XYToClient(n.clientX,n.clientY,{get:function(){return a},set:function(t){a=t}},{get:function(){return o},set:function(t){o=t}}),this.HasVertScrollBar()&&a>this.GetWidth()-t.GetScrollBarWidth()||this.HasHorzScrollBar()&&o>this.GetHeight()-t.GetScrollBarHeight()?(this.FElementEvent=null,r):(i=rtl.refSet(this.GetMouseEventShiftState(n)),s=this.GetMouseEventButton(n),0===this.FDragMode&&this.DisableDrag(),this.MouseUp(s,rtl.refSet(i),pas.System.Trunc(a),pas.System.Trunc(o)),r=!0,this.FElementEvent=null,r)},this.HandleDoMouseMove=function(t){var i,s,n=0,r=0;return s=t,this.FElementEvent=s,e.FCursorX=Math.round(s.clientX),e.FCursorY=Math.round(s.clientY),3 in this.FEventStopPropagation&&this.StopPropagation(),this.XYToClient(s.clientX,s.clientY,{get:function(){return n},set:function(t){n=t}},{get:function(){return r},set:function(t){r=t}}),i=rtl.refSet(this.GetMouseEventShiftState(s)),this.MouseMove(rtl.refSet(i),pas.System.Trunc(n),pas.System.Trunc(r)),!0,this.FElementEvent=null,!0},this.HandleDoMouseLeave=function(t){var e=!1;return this.Captured()?e:(t.stopPropagation(),this.DoMouseLeave(),e=!0)},this.HandleDoContextMenu=function(t){return!0,!0},this.LayerHandleDoMouseEnter=function(t){return 0===t.buttons&&this.Captured()&&!this.FMouseInsideLayer&&(this.ReleaseCapture(),this.HandleDoMouseUp(t),this.HandleDoMouseLeave(t)),this.FMouseInsideLayer=!0,!0,!0},this.LayerHandleDoMouseLeave=function(t){return this.FMouseInsideLayer=!1,!0,!0},this.HandleDoMouseEnter=function(t){var e=!1;return this.Captured()?e:(t.stopPropagation(),this.DoMouseEnter(),e=!0)},this.HandleDoKeyDown=function(t){var e,i=0,s={};return e=t,this.FElementEvent=e,6 in this.FEventStopPropagation&&this.StopPropagation(),null==e.key||(i=this.GetKeyCode(e.key,!0),s=rtl.refSet(this.GetKeyBoardEventShiftState(e)),this.KeyDown({get:function(){return i},set:function(t){i=t}},rtl.refSet(s)),i in rtl.createSet(13,27,9)&&this.KeyPreview({get:function(){return i},set:function(t){i=t}},rtl.refSet(s))),!0,0===i&&this.PreventDefault(),this.FElementEvent=null,!0},this.HandleDoKeyUp=function(t){var e,i=0,s={},n="\0";return e=t,this.FElementEvent=e,7 in this.FEventStopPropagation&&this.StopPropagation(),null==e.key||(i=this.GetKeyCode(e.key,!0),s=rtl.refSet(this.GetKeyBoardEventShiftState(e)),27===i&&(n="",this.KeyPress({get:function(){return n},set:function(t){n=t}})),this.KeyUp({get:function(){return i},set:function(t){i=t}},rtl.refSet(s))),!0,0===i&&this.PreventDefault(),this.FElementEvent=null,!0},this.HandleDoKeyPress=function(t){var e,i="\0";return e=t,this.FElementEvent=e,5 in this.FEventStopPropagation&&this.StopPropagation(),this.IsKeyCharacter(e.key)&&(i=this.GetKeyChar(e.key),this.KeyPress({get:function(){return i},set:function(t){i=t}})),!0,"\0"===i&&this.PreventDefault(),this.FElementEvent=null,!0},this.HandleDoInput=function(e){var i=!1,s="\0",n="";return t.IsAndroid()&&(this.FElementEvent=e,5 in this.FEventStopPropagation&&this.StopPropagation(),s="\0",""!==e.data&&(n=e.data,s=pas.System.Assigned(n)?n.charAt(n.length-1):"\b",this.KeyPress({get:function(){return s},set:function(t){s=t}})),i=!0,"\0"===s&&this.PreventDefault(),this.FElementEvent=null),i},this.HandleDoExit=function(t){return this.DoExit(),!0,this.FocusedControlExited(),!0},this.HandleDoEnter=function(t){return this.FElementEvent=t,this.StopPropagation(),this.DoEnter(),!0,this.FElementEvent=null,this.FGotFocus=!0,this.FocusedControlEntered(),!0},this.HandleDoTouchStart=function(t){var e=0,i=0,s=null,n={};return this.FElementEvent=t,this.FLastElementEvent=t,8 in this.FEventStopPropagation&&this.StopPropagation(),this.FAllowTouch||this.PreventDefault(),t.touches.length>0&&(s=t.touches.item(0),this.XYToClient(s.clientX,s.clientY,{get:function(){return e},set:function(t){e=t}},{get:function(){return i},set:function(t){i=t}}),n=rtl.refSet(this.GetTouchEventShiftState(t)),this.FLinkTouchEvents&&this.MouseDown(0,rtl.refSet(n),pas.System.Trunc(e),pas.System.Trunc(i)),this.TouchStart(pas.System.Trunc(e),pas.System.Trunc(i))),!0,this.FElementEvent=null,!0},this.HandleDoTouchMove=function(t){var e=0,i=0,s=null,n={};return this.FElementEvent=t,this.FLastElementEvent=t,9 in this.FEventStopPropagation&&this.StopPropagation(),this.FAllowTouch||this.PreventDefault(),this.Captured()&&this.PreventDefault(),t.touches.length>0&&(s=t.touches.item(0),this.XYToClient(s.clientX,s.clientY,{get:function(){return e},set:function(t){e=t}},{get:function(){return i},set:function(t){i=t}}),n=rtl.refSet(this.GetTouchEventShiftState(t)),this.FLinkTouchEvents&&this.MouseMove(rtl.refSet(n),pas.System.Trunc(e),pas.System.Trunc(i)),this.TouchMove(pas.System.Trunc(e),pas.System.Trunc(i))),this.FElementEvent=null,!0,!0},this.HandleDoTouchEnd=function(t){var e=0,i=0,s=null,n={};return this.FElementEvent=t,this.FAllowTouch||this.PreventDefault(),this.ReleaseCapture(),10 in this.FEventStopPropagation&&this.StopPropagation(),null!=this.FLastElementEvent&&this.FLastElementEvent.touches.length>0&&(s=this.FLastElementEvent.touches.item(0),this.XYToClient(s.clientX,s.clientY,{get:function(){return e},set:function(t){e=t}},{get:function(){return i},set:function(t){i=t}}),n=rtl.refSet(this.GetTouchEventShiftState(t)),this.FLinkTouchEvents&&(this.MouseUp(0,rtl.refSet(n),pas.System.Trunc(e),pas.System.Trunc(i)),this.FEnabled&&!this.FAllowTouch&&this.Click()),this.TouchEnd(pas.System.Trunc(e),pas.System.Trunc(i))),this.FElementEvent=null,!0,!0},this.HandleDoTouchCancel=function(t){var e=0,i=0,s=null,n={};return this.FElementEvent=t,this.ReleaseCapture(),this.StopPropagation(),t.touches.length>0&&(s=t.touches.item(0),this.XYToClient(s.clientX,s.clientY,{get:function(){return e},set:function(t){e=t}},{get:function(){return i},set:function(t){i=t}}),n=rtl.refSet(this.GetTouchEventShiftState(t)),this.FLinkTouchEvents&&this.MouseUp(0,rtl.refSet(n),pas.System.Trunc(e),pas.System.Trunc(i)),this.TouchCancel(pas.System.Trunc(e),pas.System.Trunc(i))),this.FElementEvent=null,!0,!0},this.HandleDoDragStart=function(t){var i=null;return this.FElementEvent=t,t.stopPropagation(),i=null,this.DoStartDrag({get:function(){return i},set:function(t){i=t}}),e.DragObject=null!=i?i:this,!0,!0},this.HandleDoDragOver=function(t){var i;return this.FElementEvent=t,t.stopPropagation(),this.DragOver(e.DragObject,t.clientX,t.clientY,2,{p:this,get:function(){return this.p.FAcceptDrag},set:function(t){this.p.FAcceptDrag=t}}),!this.FAcceptDrag||this.IsInputControl()&&0!==t.dataTransfer.items.length||t.preventDefault(),i=!this.FAcceptDrag,this.FElementEvent=null,i},this.HandleDoDragEnter=function(t){var i;return this.FElementEvent=t,t.stopPropagation(),this.FAcceptDrag=this.IsInputControl(),this.DragOver(e.DragObject,t.clientX,t.clientY,0,{p:this,get:function(){return this.p.FAcceptDrag},set:function(t){this.p.FAcceptDrag=t}}),this.FAcceptDrag&&t.preventDefault(),i=!this.FAcceptDrag,this.FElementEvent=null,i},this.HandledoDragLeave=function(t){return this.FElementEvent=t,t.stopPropagation(),this.DragOver(e.DragObject,t.clientX,t.clientY,1,{p:this,get:function(){return this.p.FAcceptDrag},set:function(t){this.p.FAcceptDrag=t}}),!0,this.FElementEvent=null,!0},this.HandleDoDragEnd=function(t){return this.FElementEvent=t,t.stopPropagation(),this.DoEndDrag(e.DragObject,t.clientX,t.clientY),!0,0===this.FDragMode&&this.DisableDrag(),this.FElementEvent=null,!0},this.HandleDoDragDrop=function(t){var i;return this.FElementEvent=t,t.stopPropagation(),this.FAcceptDrag?(this.IsInputControl()||t.preventDefault(),this.DragDrop(e.DragObject,t.clientX,t.clientY)):t.preventDefault(),i=this.FAcceptDrag,this.FElementEvent=null,i},this.HandleKeyPreview=function(t){},this.HandleFontChanged=function(t){0===this.FUpdateCount&&(this.SetParentFont(!1),this.ParentFontChanged()),this.FontChanged()},this.ParentFontChanged=function(){for(var t=0,e=0,i=this.GetControlsCount()-1;e<=i;e++)t=e,this.GetControls(t).FParentFont&&(this.GetControls(t).FFont.Assign(this.FFont),this.GetControls(t).FontChanged(),this.GetControls(t).FParentFont=!0,this.GetControls(t).ParentFontChanged())},this.DoExit=function(){null!=this.FOnExit&&this.FOnExit(this)},this.DoEnter=function(){null!=this.FOnEnter&&this.FOnEnter(this)},this.Click=function(){null!=this.FOnClick&&this.IsEnabled()&&this.FOnClick(this)},this.UpdateElement=function(){this.FBlockUpdateElement||this.FUpdateCount>0||null==this.GetElementHandle()||this.GetElementHandle()===this.ContainerElement()||this.IsUpdating()||(this.UpdateElementData(),this.GetIsLinked()||this.UpdateElementVisual())},this.UpdateElementSize=function(){var t=null,e=0,i=0,s=0,n=null,r=null;if(!(this.FBlockUpdateElement||this.FUpdateCount>0||this.GetIsLinked()||null==this.GetElementHandle()||this.GetElementHandle()===this.ContainerElement())){for(t=this.GetElementStyle(),e=0,i=0,n=this.FParent;null!=n&&0===this.FElementPosition&&0!==n.FElementPosition&&!pas["WEBLib.Forms"].TCustomForm.isPrototypeOf(n);){if(n.GetIsLinked()&&null!=n.GetElementHandle()&&"absolute"!==n.GetElementHandle().style.getPropertyValue("position")){r=n.GetElementHandle().getBoundingClientRect(),e=Math.round(r.left),i=Math.round(r.top),null!=n.FParent&&null!=n.FParent.GetElementHandle()&&"absolute"===n.FParent.GetElementHandle().style.getPropertyValue("position")&&(r=n.FParent.GetElementHandle().getBoundingClientRect(),e-=Math.round(r.left),i-=Math.round(r.top));break}n=n.FParent}null!=this.FParent&&this.FParent.IsStructuralElement()&&(e=this.FParent.GetLeft(),i=this.FParent.GetTop()),0===this.FElementPosition?(-1!==this.FTop?t.setProperty("top",pas.SysUtils.IntToStr(this.FTop+i)+"px"):t.setProperty("top",""),-1!==this.FLeft?t.setProperty("left",pas.SysUtils.IntToStr(this.FLeft+e)+"px"):t.setProperty("left","")):(t.removeProperty("top"),t.removeProperty("left")),1===this.FWidthStyle&&(s=this.GetOuterWidth(),-1!==this.FWidth?t.setProperty("width",pas.SysUtils.IntToStr(s)+"px"):t.removeProperty("width")),2===this.FWidthStyle&&t.removeProperty("width"),1===this.FHeightStyle&&(-1!==this.FHeight?t.setProperty("height",pas.SysUtils.IntToStr(this.GetOuterHeight())+"px"):t.removeProperty("height")),2===this.FHeightStyle&&t.removeProperty("height"),0===this.FWidthStyle&&(-1!==this.FWidth?t.setProperty("width",pas["WEBLib.Utils"].FormatProp("%.2f%%",pas.System.VarRecs(3,this.FWidthPercent))):t.removeProperty("width")),0===this.FHeightStyle&&(-1!==this.FHeight?t.setProperty("height",pas["WEBLib.Utils"].FormatProp("%.2f%%",pas.System.VarRecs(3,this.FHeightPercent))):t.removeProperty("height")),0===this.FElementPosition?t.setProperty("position","absolute"):1===this.FElementPosition?t.setProperty("position","relative"):t.removeProperty("position"),t.setProperty("box-sizing","border-box")}},this.UpdateElementVisual=function(){var e,i,s=null,n=!1;if(null!=(e=this.GetElementHandle())&&!this.IsUpdating()){s=this.GetElementStyle(),this.FParentFont&&null!=this.FParent&&(this.FFont.FOnChange=null,this.FFont.Assign(this.FParent.FFont),this.FFont.FOnChange=rtl.createCallback(this,"HandleFontChanged")),""===this.FElementClassName&&(n=pas["WEBLib.Forms"].TCustomForm.isPrototypeOf(this)&&""!==rtl.as(this,pas["WEBLib.Forms"].TCustomForm).FFormContainer,this.GetIsLinked()||n||(this.FClipChildren&&pas.SysUtils.LowerCase(e.tagName)!==pas["WEBLib.WebTools"].cBodyTag?s.setProperty("overflow","hidden"):s.setProperty("overflow","")),this.SetElementPointer(e,this.FCursor)),this.Captured()&&this.FLayer.style.setProperty("cursor",s.getPropertyValue("cursor")),""!==this.FElementClassName||this.CanShowFocus()?s.setProperty("outline",""):s.setProperty("outline","none"),this.UpdateElementSize();var r=this.FTextDirection;0===r?s.removeProperty("direction"):2===r?s.setProperty("direction","rtl"):1===r?s.setProperty("direction","ltr"):3===r&&s.setProperty("direction","inherit"),""===this.FElementClassName&&this.FNoUserSelect&&(s.setProperty("webkit-user-select","none"),s.setProperty("moz-user-select","none"),s.setProperty("khtml-user-select","none"),s.setProperty("ms-user-select","none"),s.setProperty("user-select","none"),s.setProperty("-webkit-tap-highlight-color","transparent")),this.SetElementColor(e,this.FColor),i=this.UseCSSFont(),this.GetIsLinked()||t.SetHTMLElementFont(e,this.FFont,i),i?s.removeProperty("color"):this.IsEnabled()&&this.UseCSSFontColor()&&s.setProperty("color",pas["WEBLib.Graphics"].ColorToHTML(this.FFont.FColor))}},this.UpdateElementData=function(){var t=null,e=null,i="",s="",n="",r=0,a=0,o=void 0,l=!1;if(null!=this.GetElementHandle()){if(4 in this.FComponentState||(this.FVisible?this.GetElementStyle().setProperty("display",""):this.GetElementStyle().setProperty("display","none")),this.EnableTab(),null!=this.FContainer&&(this.IsEnabled()?(this.FContainer.removeAttribute("disabled"),this.FContainer.style.removeProperty("pointer-events")):(this.FContainer.setAttribute("disabled",""),this.FContainer.style.setProperty("pointer-events","none"))),this.GetIsLinked()&&""===this.FHint)return;if(null!=this.FContainer&&""!==this.GetRole()&&this.FContainer.setAttribute("role",this.FRole),(l=null!=(t=pas["WEBLib.Forms"].GetParentForm(this))&&1===t.FCSSLibrary)&&this.FShowHint&&""!==this.FHint){e=this.GetElementHandle(),i=this.FHint;var h=pas["WEBLib.Forms"].Application.FHintPosition;0===h?n="left":2===h?n="right":1===h?n="top":3===h&&(n="bottom"),s=pas["WEBLib.Forms"].Application.FHintClassName,r=pas["WEBLib.Forms"].Application.FHintPause,a=pas["WEBLib.Forms"].Application.FHintHidePause,(o=this.FToolTip)&&o.dispose(),e.setAttribute("title",i),o=new bootstrap.Tooltip(e,{title:i,trigger:"hover",placement:n,customClass:s,delay:{show:r,hide:a}}),this.FToolTip=o}else null!=this.FContainer&&(this.FShowHint&&""!==this.FHint?l?this.FContainer.setAttribute("data-title",this.FHint):this.FContainer.setAttribute("title",this.FHint):l?this.FContainer.removeAttribute("data-title"):this.FContainer.removeAttribute("title"));this.IsEnabled()&&1!==this.FElementFont?this.UseCSSFontColor()&&this.GetElementStyle().setProperty("color",pas["WEBLib.Graphics"].ColorToHTML(this.FFont.FColor)):this.GetElementStyle().removeProperty("color")}},this.UpdateParent=function(){this.InternalUpdateParent(),0!==this.FAlign&&(this.UpdateChildren(this.FPrevParent),this.UpdateChildren(this.FParent))},this.UpdateControlSize=function(t,e){this.FWidth=t,this.FHeight=e},this.InternalUpdateParent=function(){var t=null;t=this.FPrevParent,this.FNew&&(this.CreateControl(),null!=this.GetContainer()&&(null!=this.FParent&&null==this.FParent.GetContainer()&&this.FParent.CreateControl(),this.FParent!==t&&null!=t&&null!=t.GetContainer()&&this.GetContainer().parentNode===t.GetChildContainer()&&t.GetChildContainer().removeChild(this.GetContainer()),null!=this.FParent&&null!=this.FParent.GetContainer()&&this.FParent.GetChildContainer().appendChild(this.GetContainer())))},this.UpdateChildren=function(e){var i=0,s=null;if(null!=e&&!(3 in this.FComponentState)){0!==e.FAlign&&e.DoRealign(),t.TCustomControl.isPrototypeOf(e)&&(rtl.as(e,t.TCustomControl).RecreateCanvas(),rtl.as(e,t.TCustomControl).Invalidate());for(var n=0,r=e.GetControlsCount()-1;n<=r;n++)i=n,s=e.GetControls(i),this.UpdateChildren(s)}},this.DisableTab=function(){var t=0;this.FTabStop&&this.CanFocus()||null!=this.GetContainer()&&this.GetContainer().setAttribute("tabindex","-1");for(var e=0,i=this.GetControlsCount()-1;e<=i;e++)t=e,this.GetControls(t).DisableTab()},this.EnableTab=function(){var t=0;null==this.FContainer||this.GetIsLinked()||(this.FTabStop&&this.CanFocus()?this.FContainer.setAttribute("tabindex",pas.SysUtils.IntToStr(this.FTabOrder+1)):this.FContainer.setAttribute("tabindex","-1"));for(var e=0,i=this.GetControlsCount()-1;e<=i;e++)t=e,this.GetControls(t).EnableTab()},this.SetElementClassName=function(t){this.FElementClassName!==t&&(this.FElementClassName=t,null!=this.FContainer&&this.FContainer.setAttribute("class",t),this.UpdateElement())},this.SetColor=function(t){this.FColor=t,this.UpdateElementVisual(),this.ColorChanging()},this.SetFont=function(t){this.FFont.SetName(t.FName),this.FFont.SetSize(t.FSize),this.FFont.SetStyle(rtl.refSet(t.FStyle)),this.FFont.SetColor(t.FColor)},this.SetParent=function(t){var e;null!=t&&(t=t.CanAcceptChild(this)),e=this.FNew,this.FParent!==t&&(null!=this.FParent&&this.FParent.UnRegisterParent(this),this.FPrevParent=this.FParent,this.FParent=t,this.FGotFocus=!1,this.UpdateParent(),3 in this.FComponentState||(e||this.UpdateElement(),this.InitScript()),null!=this.FParent&&this.FParent.RegisterParent(this),0 in this.FComponentState&&null!=this.FParent&&!(0 in this.FParent.FComponentState)&&this.Loaded(),null==t||null==this.FParent||this.FParent.IsUpdating()||(0!==this.FAlign?this.DoRealign():this.Realign()),3 in this.FComponentState||this.Invalidate())},this.RegisterParent=function(t){this.FControls=rtl.arraySetLength(this.FControls,null,rtl.length(this.FControls)+1),this.FControls[rtl.length(this.FControls)-1]=t},this.UnRegisterParent=function(t){var e=0,i=!1;i=!1;for(var s=0,n=rtl.length(this.FControls)-1;s<=n;s++)e=s,this.FControls[e]===t&&(i=!0),i&&e<rtl.length(this.FControls)-1&&(this.FControls[e]=this.FControls[e+1]);i&&(this.FControls=rtl.arraySetLength(this.FControls,null,rtl.length(this.FControls)-1))},this.CanAcceptChild=function(t){return this,this},this.SetLeft=function(t){this.FLeft!==t&&(this.FLeft=t,this.ResetAnchoring(),this.FUpdateTopLeft||(this.FOrigLeft=t),this.UpdateElementSize(),this.RecreateCanvas(),this.InternalResize(),0 in this.FComponentState||0===this.FAlign||null==this.FParent||this.DoRealign())},this.SetTop=function(t){this.FTop!==t&&(this.FTop=t,this.ResetAnchoring(),this.FUpdateTopLeft||(this.FOrigTop=t),this.UpdateElementSize(),this.RecreateCanvas(),this.InternalResize(),0 in this.FComponentState||0===this.FAlign||null==this.FParent||this.DoRealign())},this.MouseUp=function(t,e,i,s){this.FEnabled&&null!=this.FOnMouseUp&&this.FOnMouseUp(this,t,rtl.refSet(e),i,s)},this.MouseDown=function(t,e,i,s){this.FEnabled&&null!=this.FOnMouseDown&&this.FOnMouseDown(this,t,rtl.refSet(e),i,s)},this.MouseMove=function(t,e,i){this.FEnabled&&null!=this.FOnMouseMove&&this.FOnMouseMove(this,rtl.refSet(t),e,i)},this.TouchStart=function(t,e){null!=this.FOnTouchStart&&this.FOnTouchStart(this,t,e)},this.TouchMove=function(t,e){null!=this.FOnTouchMove&&this.FOnTouchMove(this,t,e)},this.TouchEnd=function(t,e){null!=this.FOnTouchEnd&&this.FOnTouchEnd(this,t,e)},this.TouchCancel=function(t,e){null!=this.FOnTouchCancel&&this.FOnTouchCancel(this,t,e)},this.DoMouseEnter=function(){null!=this.FOnMouseEnter&&this.FOnMouseEnter(this)},this.DoMouseLeave=function(){null!=this.FOnMouseLeave&&this.FOnMouseLeave(this)},this.MouseWheel=function(t,e,i){var s=!1;for(null!=this.FOnMouseWheel&&this.FOnMouseWheel(this,rtl.refSet(t),e,pas.Types.TPoint.$clone(pas.Types.Point(0,0)),i),this.FWheelAccumulator+=e;Math.abs(this.FWheelAccumulator)>=120;)s=this.FWheelAccumulator<0,this.FWheelAccumulator=Math.abs(this.FWheelAccumulator)-120,s?(0!==this.FWheelAccumulator&&(this.FWheelAccumulator=-this.FWheelAccumulator),this.DoMouseWheelDown(rtl.refSet(t),pas.Types.TPoint.$clone(this.FWheelMousePos))):this.DoMouseWheelUp(rtl.refSet(t),pas.Types.TPoint.$clone(this.FWheelMousePos))},this.DoMouseWheelDown=function(t,e){var i=!1;return i=!1,null!=this.FOnMouseWheelDown&&this.FOnMouseWheelDown(this,rtl.refSet(t),pas.Types.TPoint.$clone(e),{get:function(){return i},set:function(t){i=t}}),i},this.DoMouseWheelUp=function(t,e){var i=!1;return i=!1,null!=this.FOnMouseWheelUp&&this.FOnMouseWheelUp(this,rtl.refSet(t),pas.Types.TPoint.$clone(e),{get:function(){return i},set:function(t){i=t}}),i},this.DblClick=function(){null!=this.FOnDblClick&&this.FOnDblClick(this)},this.KeyDown=function(t,e){null!=this.FOnKeyDown&&this.FOnKeyDown(this,t,rtl.refSet(e))},this.KeyPreview=function(e,i){null!=this.FOwner&&t.TControl.isPrototypeOf(this.FOwner)&&rtl.as(this.FOwner,t.TControl).KeyPreview(e,rtl.refSet(i))},this.KeyPress=function(t){null!=this.FOnKeyPress&&this.FOnKeyPress(this,t)},this.KeyUp=function(t,e){null!=this.FOnKeyUp&&this.FOnKeyUp(this,t,rtl.refSet(e))},this.SetFocus=function(){var t=null;this.CanFocus()&&null!=this.GetElementHandle()&&(t=this.GetElementHandle(),this.FGotFocus?t.focus():setTimeout((function(){t.focus()}),1))},this.DoMarginsChanged=function(t){this.DoRealign()},this.DoCenterChanged=function(t){this.DoRealign()},this.DoRealign=function(){null==this.FParent||this.FParent.IsUpdating()||this.FParent.AlignControl(this.FParent)},this.DoBoundsChange=function(){var t,e=!1;this.UpdateElementSize(),this.RecreateCanvas(),this.FIsResizing||(this.FIsResizing=!0,this.InternalResize(),this.DoRealign(),e=!1,null!=(t=pas["WEBLib.Forms"].GetParentForm(this))&&(e=(e=t.FIsResizing$1)||t.FUpdateCount>0),(e=(e=e||this.FUpdateCount>0)||this.FIsAligning)||this.UpdateChildAnchoring(),this.FIsResizing=!1)},this.DoEndDrag=function(t,e,i){null!=this.FonEndDrag&&this.FonEndDrag(this,t,e,i)},this.DoStartDrag=function(t){null!=this.FOnStartDrag&&this.FOnStartDrag(this,t)},this.DragOver=function(t,e,i,s,n){null!=this.FOnDragOver&&this.FOnDragOver(this,t,e,i,s,n)},this.Focused=function(){return this.FContainer===document.activeElement},this.GetID=function(){return this.FID},this.GetElementHandle=function(){var t=null;return t=null,null!=this.FContainer&&this.FControlCreated&&(t=this.FContainer),t},this.GetElementBindHandle=function(){return this.GetElementHandle()},this.GetKeyCode=function(t,e){var i=0;i=-1;var s=t;return"Up"===s?i=38:"Down"===s?i=40:"Left"===s?i=37:"Right"===s?i=39:"!"===s?i=56:'"'===s||"#"===s?i=51:"$"===s?i=186:"%"===s?i=192:"'"===s?i=52:"("===s?i=53:")"===s?i=219:"*"===s?i=106:"+"===s?i=107:"-"===s?i=109:","===s?i=44:"."===s?i=46:"/"===s?i=111:"\\"===s?i=226:"="===s?i=187:"<"===s||">"===s?i=226:s===pas.Web.TJSKeyNames.BackSpace?i=8:s===pas.Web.TJSKeyNames.Tab?i=9:s===pas.Web.TJSKeyNames.Enter?i=13:s===pas.Web.TJSKeyNames.Shift?i=16:s===pas.Web.TJSKeyNames.Control?i=17:s===pas.Web.TJSKeyNames.Alt?i=18:s===pas.Web.TJSKeyNames.Pause?i=19:s===pas.Web.TJSKeyNames.CapsLock?i=20:s===pas.Web.TJSKeyNames.Escape?i=27:s===pas.Web.TJSKeyNames.PageUp?i=33:s===pas.Web.TJSKeyNames.PageDown?i=34:s===pas.Web.TJSKeyNames._End?i=35:s===pas.Web.TJSKeyNames.Home?i=36:s===pas.Web.TJSKeyNames.ArrowLeft?i=37:s===pas.Web.TJSKeyNames.ArrowUp?i=38:s===pas.Web.TJSKeyNames.ArrowRight?i=39:s===pas.Web.TJSKeyNames.ArrowDown?i=40:s===pas.Web.TJSKeyNames.Insert?i=45:s===pas.Web.TJSKeyNames.Delete?i=46:s===pas.Web.TJSKeyNames.F1?i=112:s===pas.Web.TJSKeyNames.F2?i=113:s===pas.Web.TJSKeyNames.F3?i=114:s===pas.Web.TJSKeyNames.F4?i=115:s===pas.Web.TJSKeyNames.F5?i=116:s===pas.Web.TJSKeyNames.F6?i=117:s===pas.Web.TJSKeyNames.F7?i=118:s===pas.Web.TJSKeyNames.F8?i=119:s===pas.Web.TJSKeyNames.F9?i=120:s===pas.Web.TJSKeyNames.F10?i=121:s===pas.Web.TJSKeyNames.F11?i=122:s===pas.Web.TJSKeyNames.F12?i=123:s===pas.Web.TJSKeyNames.F13?i=124:s===pas.Web.TJSKeyNames.F14?i=125:s===pas.Web.TJSKeyNames.F15?i=126:s===pas.Web.TJSKeyNames.F16?i=127:s===pas.Web.TJSKeyNames.F17?i=128:s===pas.Web.TJSKeyNames.F18?i=129:s===pas.Web.TJSKeyNames.F19?i=130:s===pas.Web.TJSKeyNames.F20?i=131:pas.System.Assigned(t)&&t.length>0&&(i=t.charCodeAt(0),e&&i>=97&&i<=122?i&=223:i>=65&&i<=90?i|=64:i>122&&(i|=128)),i},this.GetKeyChar=function(t){var e="\0",i=0;i=-1,e="\0";var s=t;return s===pas.Web.TJSKeyNames.BackSpace?i=8:s===pas.Web.TJSKeyNames.Tab?i=9:s===pas.Web.TJSKeyNames.Enter?i=13:s===pas.Web.TJSKeyNames.Shift?i=16:s===pas.Web.TJSKeyNames.Control?i=17:s===pas.Web.TJSKeyNames.Alt?i=18:s===pas.Web.TJSKeyNames.Pause?i=19:s===pas.Web.TJSKeyNames.CapsLock?i=20:s===pas.Web.TJSKeyNames.Escape?i=27:s===pas.Web.TJSKeyNames.PageUp?i=33:s===pas.Web.TJSKeyNames.PageDown?i=34:s===pas.Web.TJSKeyNames._End?i=35:s===pas.Web.TJSKeyNames.Home?i=36:s===pas.Web.TJSKeyNames.ArrowLeft?i=37:s===pas.Web.TJSKeyNames.ArrowUp?i=38:s===pas.Web.TJSKeyNames.ArrowRight?i=39:s===pas.Web.TJSKeyNames.ArrowDown?i=40:s===pas.Web.TJSKeyNames.Insert?i=45:s===pas.Web.TJSKeyNames.Delete?i=46:s===pas.Web.TJSKeyNames.F1?i=112:s===pas.Web.TJSKeyNames.F2?i=113:s===pas.Web.TJSKeyNames.F3?i=114:s===pas.Web.TJSKeyNames.F4?i=115:s===pas.Web.TJSKeyNames.F5?i=116:s===pas.Web.TJSKeyNames.F6?i=117:s===pas.Web.TJSKeyNames.F7?i=118:s===pas.Web.TJSKeyNames.F8?i=119:s===pas.Web.TJSKeyNames.F9?i=120:s===pas.Web.TJSKeyNames.F10?i=121:s===pas.Web.TJSKeyNames.F11?i=122:s===pas.Web.TJSKeyNames.F12?i=123:s===pas.Web.TJSKeyNames.F13?i=124:s===pas.Web.TJSKeyNames.F14?i=125:s===pas.Web.TJSKeyNames.F15?i=126:s===pas.Web.TJSKeyNames.F16?i=127:s===pas.Web.TJSKeyNames.F17?i=128:s===pas.Web.TJSKeyNames.F18?i=129:s===pas.Web.TJSKeyNames.F19?i=130:s===pas.Web.TJSKeyNames.F20?i=131:e=t.charAt(0),-1!==i&&(e=String.fromCharCode(i)),e},this.IsKeyCharacter=function(t){var e=t;return"Up"!==e&&"Down"!==e&&"Left"!==e&&"Right"!==e&&e!==pas.Web.TJSKeyNames.Shift&&e!==pas.Web.TJSKeyNames.Control&&e!==pas.Web.TJSKeyNames.Alt&&e!==pas.Web.TJSKeyNames.Pause&&e!==pas.Web.TJSKeyNames.CapsLock&&e!==pas.Web.TJSKeyNames.PageUp&&e!==pas.Web.TJSKeyNames.PageDown&&e!==pas.Web.TJSKeyNames._End&&e!==pas.Web.TJSKeyNames.Home&&e!==pas.Web.TJSKeyNames.ArrowLeft&&e!==pas.Web.TJSKeyNames.ArrowUp&&e!==pas.Web.TJSKeyNames.ArrowRight&&e!==pas.Web.TJSKeyNames.ArrowDown&&e!==pas.Web.TJSKeyNames.Insert&&e!==pas.Web.TJSKeyNames.Delete&&e!==pas.Web.TJSKeyNames.F1&&e!==pas.Web.TJSKeyNames.F2&&e!==pas.Web.TJSKeyNames.F3&&e!==pas.Web.TJSKeyNames.F4&&e!==pas.Web.TJSKeyNames.F5&&e!==pas.Web.TJSKeyNames.F6&&e!==pas.Web.TJSKeyNames.F7&&e!==pas.Web.TJSKeyNames.F8&&e!==pas.Web.TJSKeyNames.F9&&e!==pas.Web.TJSKeyNames.F10&&e!==pas.Web.TJSKeyNames.F11&&e!==pas.Web.TJSKeyNames.F12&&e!==pas.Web.TJSKeyNames.F13&&e!==pas.Web.TJSKeyNames.F14&&e!==pas.Web.TJSKeyNames.F15&&e!==pas.Web.TJSKeyNames.F16&&e!==pas.Web.TJSKeyNames.F17&&e!==pas.Web.TJSKeyNames.F18&&e!==pas.Web.TJSKeyNames.F19&&e!==pas.Web.TJSKeyNames.F20},this.GetClientRect=function(){var t=pas.Types.TRect.$new(),e="",i=0,s=0;return e=pas.SysUtils.UpperCase(this.GetStyle("border-width")),s=0,(i=pas.System.Pos("PX",e))>0&&(pas.System.Delete({get:function(){return e},set:function(t){e=t}},i,2),pas.System.val$6(e,{get:function(){return s},set:function(t){s=t}},{get:function(){return i},set:function(t){i=t}})),t.$assign(pas.Types.Rect(0,0,this.GetWidth()-2*s,this.GetHeight()-2*s)),t},this.CreateControl=function(){null==this.FElement&&(this.FElement=this.CreateElement(),null!=this.FElement&&(this.FControlCreated=!0,this.FContainer=this.FElement,"body"!==this.GetID()&&this.GetContainer().setAttribute("id",this.GetID()),this.GetContainer().setAttribute("zindex","0"),""!==this.FElementClassName&&this.GetContainer().setAttribute("class",this.FElementClassName),this.CreateChildElements(this.FElement),this.BindEvents(),this.UpdateElement()))},this.ClearMethodPointers=function(){this.FWheelPtr=null,this.FClickPtr=null,this.FDblClickPtr=null,this.FMouseDownPtr=null,this.FMouseUpPtr=null,this.FMouseMovePtr=null,this.FMouseLeavePtr=null,this.FMouseEnterPtr=null,this.FKeyDownPtr=null,this.FKeyUpPtr=null,this.FKeyPressPtr=null,this.FInputPtr=null,this.FEnterPtr=null,this.FExitPtr=null,this.FTouchStartPtr=null,this.FTouchEndPtr=null,this.FTouchMovePtr=null,this.FTouchCancelPtr=null,this.FLayerMouseLeavePtr=null,this.FLayerMouseEnterPtr=null,this.FScriptLoadedPtr=null,this.FContextMenuPtr=null},this.GetMethodPointers=function(){null===this.FWheelPtr&&(this.FWheelPtr=rtl.createCallback(this,"HandleDoWheel"),this.FClickPtr=rtl.createCallback(this,"HandleDoClick"),this.FDblClickPtr=rtl.createCallback(this,"HandleDoDblClick"),this.FMouseDownPtr=rtl.createCallback(this,"HandleDoMouseDown"),this.FMouseUpPtr=rtl.createCallback(this,"HandleDoMouseUp"),this.FMouseMovePtr=rtl.createCallback(this,"HandleDoMouseMove"),this.FMouseLeavePtr=rtl.createCallback(this,"HandleDoMouseLeave"),this.FMouseEnterPtr=rtl.createCallback(this,"HandleDoMouseEnter"),this.FKeyDownPtr=rtl.createCallback(this,"HandleDoKeyDown"),this.FKeyUpPtr=rtl.createCallback(this,"HandleDoKeyUp"),this.FKeyPressPtr=rtl.createCallback(this,"HandleDoKeyPress"),this.FInputPtr=rtl.createCallback(this,"HandleDoInput"),this.FEnterPtr=rtl.createCallback(this,"HandleDoEnter"),this.FExitPtr=rtl.createCallback(this,"HandleDoExit"),this.FTouchStartPtr=rtl.createCallback(this,"HandleDoTouchStart"),this.FTouchEndPtr=rtl.createCallback(this,"HandleDoTouchEnd"),this.FTouchMovePtr=rtl.createCallback(this,"HandleDoTouchMove"),this.FTouchCancelPtr=rtl.createCallback(this,"HandleDoTouchCancel"),this.FLayerMouseLeavePtr=rtl.createCallback(this,"LayerHandleDoMouseLeave"),this.FLayerMouseEnterPtr=rtl.createCallback(this,"LayerHandleDoMouseEnter"),this.FScriptLoadedPtr=rtl.createCallback(this,"RequiredScriptLoaded"),this.FDragStartPtr=rtl.createCallback(this,"HandleDoDragStart"),this.FDragOverPtr=rtl.createCallback(this,"HandleDoDragOver"),this.FDragEnterPtr=rtl.createCallback(this,"HandleDoDragEnter"),this.FDragLeavePtr=rtl.createCallback(this,"HandledoDragLeave"),this.FDragEndPtr=rtl.createCallback(this,"HandleDoDragEnd"),this.FDragDropPtr=rtl.createCallback(this,"HandleDoDragDrop"),this.FContextMenuPtr=rtl.createCallback(this,"HandleDoContextMenu"))},this.EventsBound=function(){return this.FEventsBound},this.BindEvents=function(){var t=null,e=null;null!=this.GetElementBindHandle()&&(this.GetMethodPointers(),this.FEventsBound=!0,t=this.GetElementBindHandle(),e=this.FWheelPtr,t.addEventListener("wheel",e,{passive:!0}),t.addEventListener("click",this.FClickPtr),t.addEventListener("dblclick",this.FDblClickPtr),t.addEventListener("mousedown",this.FMouseDownPtr),t.addEventListener("mouseup",this.FMouseUpPtr),t.addEventListener("mousemove",this.FMouseMovePtr),t.addEventListener("mouseleave",this.FMouseLeavePtr),t.addEventListener("mouseenter",this.FMouseEnterPtr),t.addEventListener("keydown",this.FKeyDownPtr),t.addEventListener("keyup",this.FKeyUpPtr),t.addEventListener("keypress",this.FKeyPressPtr),t.addEventListener("input",this.FInputPtr),t.addEventListener("focus",this.FEnterPtr),t.addEventListener("blur",this.FExitPtr),e=this.FTouchStartPtr,t.addEventListener("touchstart",e,{passive:!0}),e=this.FTouchMovePtr,t.addEventListener("touchmove",e,{passive:!0}),t.addEventListener("touchend",this.FTouchEndPtr),t.addEventListener("touchcancel",this.FTouchCancelPtr),t.addEventListener("contextmenu",this.FContextMenuPtr),t.addEventListener("dragstart",this.FDragStartPtr),t.addEventListener("dragover",this.FDragOverPtr),t.addEventListener("dragenter",this.FDragEnterPtr),t.addEventListener("dragleave",this.FDragLeavePtr),t.addEventListener("dragend",this.FDragEndPtr),t.addEventListener("drop",this.FDragDropPtr))},this.UnbindEvents=function(){var t=null;this.ReleaseCapture(),null!=this.GetElementBindHandle()&&((t=this.GetElementBindHandle()).removeEventListener("wheel",this.FWheelPtr),t.removeEventListener("click",this.FClickPtr),t.removeEventListener("dblclick",this.FDblClickPtr),t.removeEventListener("mousedown",this.FMouseDownPtr),t.removeEventListener("mouseup",this.FMouseUpPtr),t.removeEventListener("mousemove",this.FMouseMovePtr),t.removeEventListener("mouseleave",this.FMouseLeavePtr),t.removeEventListener("mouseenter",this.FMouseEnterPtr),t.removeEventListener("keydown",this.FKeyDownPtr),t.removeEventListener("keyup",this.FKeyUpPtr),t.removeEventListener("keypress",this.FKeyPressPtr),t.removeEventListener("focus",this.FEnterPtr),t.removeEventListener("blur",this.FExitPtr),t.removeEventListener("input",this.FInputPtr),t.removeEventListener("touchstart",this.FTouchStartPtr),t.removeEventListener("touchmove",this.FTouchMovePtr),t.removeEventListener("touchend",this.FTouchEndPtr),t.removeEventListener("touchcancel",this.FTouchEndPtr),t.removeEventListener("contextmenu",this.FContextMenuPtr))},this.UpdatePadding=function(t){},this.AlignControls=function(t,e){var i=this,s=0;function n(t,s){var n=0,r=0,a=0,o=0;t.AnchoringInitialized()||i.InitAnchoring(),t.FUpdateTopLeft=!0,t.FAlignWithMargins?(n=t.FMargins.FLeft,r=t.FMargins.FTop,o=t.FMargins.FBottom,a=t.FMargins.FRight):(n=0,r=0,o=0,a=0);var l=s;1===l?(t.SetBoundsInt(e.Left+n,e.Top+r,e.Right-e.Left-n-a,t.GetHeight()),e.Top=e.Top+t.GetHeight()+r+o):2===l?(t.SetBoundsInt(e.Left+n,e.Bottom-t.GetHeight()-o-1,e.Right-e.Left-n-a-1,t.GetHeight()),e.Bottom=e.Bottom-t.GetHeight()-r-o):3===l?(t.SetBoundsInt(e.Left+n,e.Top+r,t.GetWidth(),e.Bottom-e.Top-r-o),e.Left=e.Left+t.GetWidth()+n+a):4===l?(t.SetBoundsInt(e.Right-t.GetWidth()-a,e.Top+r,t.GetWidth(),e.Bottom-e.Top-o-r),e.Right=e.Right-t.GetWidth()-a-n):5===l?t.SetBoundsInt(e.Left+n,e.Top+r,e.Right-e.Left-n-a,e.Bottom-e.Top-o-r):6===l&&(n=t.GetLeft(),r=t.GetTop(),a=0,o=0,(t.FCenter.FVertical||t.FCenter.FHorizontal)&&(t.FCenter.FHorizontal&&(n=e.Left,a=rtl.trunc((e.Right-e.Left-t.GetWidth())/2)),t.FCenter.FVertical&&(r=e.Top,o=rtl.trunc((e.Bottom-e.Top-t.GetHeight())/2)),t.SetBoundsInt(n+a,r+o,t.GetWidth(),t.GetHeight()))),t.FUpdateTopLeft=!1}function r(t){var e=0,s=0,r=0,a=null;a=pas.Classes.TList.$create("Create$1");for(var o=0,l=i.GetControlsCount()-1;o<=l;o++)if(e=o,(i.GetControls(e).FCenter.FVertical||i.GetControls(e).FCenter.FHorizontal)&&6===t||i.GetControls(e).FAlign===t&&(i.GetControls(e).FVisible||4 in i.FComponentState)){r=a.GetCount();for(var h=a.GetCount()-1;h>=0;h--){s=h;var d=t;1===d?i.GetControls(e).FOrigTop<rtl.getObject(a.Get(s)).FOrigTop&&(r=s):3===d?i.GetControls(e).FOrigLeft<rtl.getObject(a.Get(s)).FOrigLeft&&(r=s):4===d?i.GetControls(e).FOrigLeft+i.GetControls(e).GetWidth()>rtl.getObject(a.Get(s)).FOrigLeft+rtl.getObject(a.Get(s)).GetWidth()&&(r=s):2===d&&i.GetControls(e).FOrigTop+i.GetControls(e).GetHeight()>rtl.getObject(a.Get(s)).FOrigTop+rtl.getObject(a.Get(s)).GetHeight()&&(r=s)}a.Insert(r,i.GetControls(e))}for(var u=0,c=a.GetCount()-1;u<=c;u++)e=u,n(rtl.getObject(a.Get(e)),t);a=rtl.freeLoc(a)}this.UpdatePadding(e),r(1),r(2),r(3),r(4),r(5),r(6);for(var a=0,o=this.GetControlsCount()-1;a<=o;a++)s=a,this.GetControls(s).AlignControl(this.GetControls(s))},this.AlignControl=function(t){var e,i=pas.Types.TRect.$new(),s=null,n="",r="",a="",o=null,l=null,h=0,d=0,u=0;this.FIsAligning||this.IsUpdating()||0 in this.FComponentState||(null==this.FParent||this.FParent.FVisible)&&(null!=(l=pas["WEBLib.Forms"].GetParentForm(this))&&l.IsUpdating()||(h=0,null!=l&&""!==l.FFormContainer&&pas["WEBLib.Forms"].TCustomForm.isPrototypeOf(t)&&null!=(o=document.getElementById(l.FFormContainer))&&(s=o.getBoundingClientRect(),h=Math.round(s.top+1)),this.FIsAligning=!0,null!=t&&(null!=(e=t.GetElementHandle())&&(n=t.GetElementStyle().getPropertyValue("overflow"),r=t.GetElementStyle().getPropertyValue("overflow-x"),a=t.GetElementStyle().getPropertyValue("overflow-y"),this.FClipChildren&&pas.SysUtils.LowerCase(e.tagName)!==pas["WEBLib.WebTools"].cBodyTag?t.GetElementStyle().setProperty("overflow","hidden"):t.GetElementStyle().setProperty("overflow","")),i.$assign(this.GetClientRect()),i.Bottom=i.Bottom-h,this.GetIsLinked()&&(s=this.GetElementHandle().getBoundingClientRect(),i.$assign(pas.Types.Rect(0,0,Math.round(s.right-s.left),Math.round(s.bottom-s.top)))),i.Bottom+h>pas["WEBLib.Forms"].WinHeight()&&1!==this.FHeightStyle&&0!==this.FElementPosition&&!this.GetIsLinked()&&null==pas["WEBLib.Forms"].VSIDE&&(null!=this.FParent&&pas["WEBLib.Forms"].TCustomForm.isPrototypeOf(this.FParent)||pas["WEBLib.Forms"].TCustomForm.isPrototypeOf(this))&&(i.Bottom=pas["WEBLib.Forms"].WinHeight()-h),null!=e&&"BODY"===e.tagName&&(d=0,document.body.scrollHeight>document.body.clientHeight&&!(4 in this.FComponentState)&&(d=16),""!==l.FFormContainer?(i.Bottom=Math.round(Math.min(i.Bottom,pas["WEBLib.Forms"].WinHeight())),i.Right=Math.round(Math.min(i.Right-d,pas["WEBLib.Forms"].WinWidth()))):(i.Bottom=l.GetHeight(),i.Right=l.GetWidth())),pas["WEBLib.Forms"].TCustomForm.isPrototypeOf(t)&&null==pas["WEBLib.Forms"].VSIDE&&(i.Bottom>pas["WEBLib.Forms"].WinHeight()&&(i.Bottom=pas["WEBLib.Forms"].WinHeight()),i.Right>pas["WEBLib.Forms"].WinWidth()&&(i.Right=pas["WEBLib.Forms"].WinWidth())),t.IsStructuralElement()&&i.$assign(this.FParent.GetClientRect()),pas["WEBLib.Forms"].Application.CalcScrollBarWidth()<16&&!pas["WEBLib.Forms"].TCustomForm.isPrototypeOf(t)&&null!=t.FParent&&null!=t.GetElementHandle()&&t.GetElementHandle().scrollHeight>t.GetElementHandle().clientHeight&&(0===(u=pas["WEBLib.Forms"].Application.CalcScrollBarWidth())&&(u=16),i.Right=i.Right+(17-u)),this.AlignControls(t,i),null!=e&&(t.GetElementStyle().setProperty("overflow",n),t.GetElementStyle().setProperty("overflow-x",r),t.GetElementStyle().setProperty("overflow-y",a)),this.FIsAligning=!1)))},this.InitAnchoring=function(){var t=0,e=0,i=0;function s(e,i,s){var n;i.set(0),s.set(0),null!=(n=pas.TypInfo.GetPropInfo(e.$class.ClassInfo(),"BorderStyle"))&&((t=pas.TypInfo.GetOrdProp$1(e,n))in rtl.createSet(1,4,5)&&(i.set(4),s.set(4)),t in rtl.createSet(2,3)&&(i.set(16),s.set(16)))}if(!this.AnchoringInitialized()){e=0,i=0,pas["WEBLib.Forms"].TForm.isPrototypeOf(this)?(rtl.as(this,pas["WEBLib.Forms"].TForm).IsMiletus()&&s(this,{get:function(){return e},set:function(t){e=t}},{get:function(){return i},set:function(t){i=t}}),this.FOrigRect.$assign(pas.Types.Rect(0,0,this.GetDesignWidth()-e,this.GetDesignHeight()-i))):this.FOrigRect.$assign(pas.Types.Rect(this.GetDesignLeft(),this.GetDesignTop(),this.GetDesignLeft()+this.GetDesignWidth(),this.GetDesignTop()+this.GetDesignHeight())),null!=this.FParent&&(pas["WEBLib.Forms"].TForm.isPrototypeOf(this.FParent)?(rtl.as(this.FParent,pas["WEBLib.Forms"].TForm).IsMiletus()&&s(this.FParent,{get:function(){return e},set:function(t){e=t}},{get:function(){return i},set:function(t){i=t}}),this.FOrigParentRect.$assign(pas.Types.Rect(0,0,this.FParent.GetDesignWidth()-e,this.FParent.GetDesignHeight()-i))):(this.FParent.AnchoringInitialized()||this.FParent.InitAnchoring(),this.FOrigParentRect.$assign(pas.Types.Rect(this.FParent.GetDesignLeft(),this.FParent.GetDesignTop(),this.FParent.GetDesignLeft()+this.FParent.GetDesignWidth(),this.FParent.GetDesignTop()+this.FParent.GetDesignHeight()))));for(var n=0,r=this.GetControlsCount()-1;n<=r;n++)t=n,this.GetControls(t).InitAnchoring()}},this.AnchoringInitialized=function(){return-1!==this.FOrigRect.Left||-1!==this.FOrigRect.Top},this.InitScript=function(){},this.Realign=function(){this.AlignControl(this)},this.Loaded=function(){var t=0,e=null,i=0,s=0,n=0,r=null,a=null,o=null;if(0 in this.FComponentState){if(pas.Classes.TComponent.Loaded.call(this),null!=this.GetChildContainer()){i=(e=this.GetChildContainer().childNodes).length;for(var l=0,h=this.GetControlsCount()-1;l<=h;l++)t=l,(o=this.GetControls(t)).FElementPosition in rtl.createSet(1,2)&&!o.GetIsLinked()&&o.FChildOrder>=0?(n=o.FChildOrder,a=o.GetContainer(),n>=i?(this.GetChildContainer().appendChild(a),o.Loaded()):(-1!==(s=Array.prototype.indexOf.call(e,a))&&n>s&&n++,null!=(r=n<i?e.item(n):null)?this.GetChildContainer().insertBefore(a,r):this.GetChildContainer().appendChild(a),o.Loaded())):o.Loaded()}else for(var d=0,u=this.GetControlsCount()-1;d<=u;d++)t=d,this.GetControls(t).Loaded();for(var c=0,F=this.GetComponentCount()-1;c<=F;c++)t=c,0 in this.GetComponent(t).FComponentState&&this.GetComponent(t).Loaded();5===this.FAlign&&null!=this.FParent&&this.SetBoundsInt(0,0,this.FParent.FWidth,this.FParent.FHeight),this.Resize(),this.UpdateElement()}},this.InternalResize=function(){0 in this.FComponentState||this.Resize()},this.FontChanged=function(){this.UpdateElementVisual()},this.SetElementColor=function(e,i){var s;s=!(pas["WEBLib.Forms"].Application.FThemed||""!==this.FElementClassName),this.GetIsLinked()||t.SetHTMLElementColor(e,i,!s)},this.MoveElements=function(t,e){if(t&&e)for(;t.childNodes.length;)e.appendChild(t.firstChild)},this.MoveElementsAndFree=function(t,e){if(t&&e){for(;t.childNodes.length;)e.appendChild(t.firstChild);t.remove()}},this.CreateWithID=function(e){var i;this.ClearMethodPointers(),this.FUpdateCount=0,this.FControlCreated=!1,this.FLinkTouchEvents=!0,this.FIsResizing=!1,(null!=this.FOwner&&0 in this.FOwner.FComponentState||null==this.FOwner)&&(null!=this.FOwner&&4 in this.FOwner.FComponentState||this.Loading()),this.FElementPosition=0,this.FWidthStyle=1,this.FHeightStyle=1,i=document.getElementById(e),this.FNew=!(null!=i),this.FFont=pas["WEBLib.Graphics"].TFont.$create("Create$1"),this.FFont.FOnChange=rtl.createCallback(this,"HandleFontChanged"),this.FNew?this.FContainer=null:(this.FContainer=i,this.FControlCreated=!0,this.FElementPosition=1,this.CreateChildElements(i),this.BindElement(),this.BindEvents()),this.FID=e,this.FEnabled=!0,this.FVisible=!0,this.FLeft=0,this.FTop=0,this.FAlign=0,this.FAlignWithMargins=!1,this.FIsAligning=!1,this.FParentFont=!0,this.FParentBiDiMode=!0,this.FParentColor=!1,this.FAnchors=rtl.createSet(0,1),this.FShowFocus=!1,this.FBorderWidth=0,this.FEnablePropagation=!1,this.FToolTip=null,this.FColor=16711422,this.FMargins=t.TMargins.$create("Create$1"),this.FMargins.FOnChange=rtl.createCallback(this,"DoMarginsChanged"),this.FCenter=t.TCenter.$create("Create"),this.FCenter.FOnChange=rtl.createCallback(this,"DoCenterChanged"),this.FParent=null,this.FPrevParent=null,0 in this.FControlStyle||this.ClearControls(),this.CreateInitialize()},this.AddControlStyle=function(t){var e,i,s,n;e=this.$classname,i=e,s=t,(n=document.getElementById(i))?n.innerHTML=s:((n=document.createElement("style")).type="text/css",n.id=i,n.innerHTML=s,document.getElementsByTagName("head")[0].appendChild(n))},this.AddControlLink=function(t,e){var i,s,n;i=t,s=e,(n=document.getElementById(i))||((n=document.createElement("link")).id=i,n.setAttribute("rel","stylesheet"),n.setAttribute("type","text/css"),n.setAttribute("href",s),document.getElementsByTagName("head")[0].appendChild(n))},this.AddControlScriptSource=function(t){var e,i=null;e=this.$classname+"SRC",null==document.getElementById(e)&&((i=document.createElement("script")).id=e,i.innerHTML=t,i.type="text/javascript",document.head.appendChild(i))},this.ResetAnchoring=function(){this.FOrigRect.$assign(pas.Types.Rect(-1,-1,-1,-1)),this.InitAnchoring()},this.UpdateSize=function(){var t=0;this.UpdateElementSize();for(var e=0,i=this.GetControlsCount()-1;e<=i;e++)t=e,this.GetControls(t).UpdateSize()},this.UpdateAnchoring=function(){var t=0,e=0,i=0,s=0,n=0,r=0,a=pas.Types.TRect.$new(),o=pas.Types.TRect.$new();0 in this.FComponentState||this.FControlCreated&&(-1===this.FOrigRect.Left&&-1===this.FOrigRect.Top&&this.InitAnchoring(),(null==this.FParent||this.FParent.AnchoringInitialized())&&(5!==this.FAlign&&(null==this.FParent||pas["WEBLib.Forms"].TForm.isPrototypeOf(this)||(o.$assign(this.FParent.GetBoundsRect()),t=o.Right-o.Left-(this.FOrigParentRect.Right-this.FOrigParentRect.Left),e=o.Bottom-o.Top-(this.FOrigParentRect.Bottom-this.FOrigParentRect.Top),a.$assign(this.FOrigRect),i=0,s=0,n=0,r=0,2 in this.FAnchors&&(0 in this.FAnchors?n=t:i=t),3 in this.FAnchors&&(1 in this.FAnchors?r=e:s=e),(3 in this.FAnchors||2 in this.FAnchors)&&this.SetBoundsInt(a.Left+i,a.Top+s,a.Right-a.Left+n,a.Bottom-a.Top+r))),this.UpdateChildAnchoring()))},this.UpdateChildAnchoring=function(){for(var t=0,e=0,i=this.GetControlsCount()-1;e<=i;e++)t=e,this.GetControls(t).UpdateAnchoring()},this.SetElementPointer=function(e,i){0!==i?e.style.setProperty("cursor",t.GetHTMLCursorName(i)):e.style.removeProperty("cursor")},this.IsUpdating=function(){return this.FUpdateCount>0},this.CanShowFocus=function(){return this.FShowFocus},this.RequiredScriptLoaded=function(t){rtl.asExt(t.target,HTMLScriptElement).title="tmswebloaded",this.FControlScriptCountLoaded+=1},this.GetStyle=function(t){var e,i="",s="";return s="",null==(e=this.GetElementHandle())?i:(window.getComputedStyle&&(s=getComputedStyle(e,"")[t]),e.currentStyle&&(s=e.currentStyle[t]),i=s)},this.SetBoundsInt=function(t,e,i,s){(t!==this.GetLeft()||e!==this.GetTop()||i!==this.GetWidth()&&1===this.FWidthStyle||s!==this.GetHeight()&&1===this.FHeightStyle||null!=this.FParent&&this.FParent.GetIsLinked())&&(this.FBlockUpdateElement=!0,this.FLeft=t,this.FTop=e,this.FWidth=i,this.FHeight=s,this.FBlockUpdateElement=!1,this.UpdateElementSize(),0!==this.FAlign?this.DoRealign():this.Realign(),this.RecreateCanvas(),this.DoBoundsChange(),this.Invalidate(),this.UpdateChildAnchoring())},this.EnableDrag=function(){null!=this.GetContainer()&&this.GetContainer().setAttribute("draggable","true")},this.DisableDrag=function(){null!=this.GetContainer()&&"true"===this.GetContainer().getAttribute("draggable")&&this.GetContainer().setAttribute("draggable","false")},this.Create$2=function(t){return this.FGotFocus=!1,this.FTabStop=!0,this.FAllowTouch=!0,this.CreateWithID(t),this},this.Create$1=function(t){var e,i,s=!1;return this.FGotFocus=!1,this.FEventsBound=!1,this.FTabStop=!0,this.FAllowTouch=!0,this.FNoUserSelect=!0,this.ClearMethodPointers(),pas.Classes.TComponent.Create$1.call(this,t),this.FEventStopPropagation=rtl.createSet(0,4,2,3,1,5,6,7,9,8,10),this.FScriptLoaded=!1,this.FElementFont=0,this.FElementPosition=0,this.FParentElement=null,this.FTextDirection=0,s=!1,null!=(i=pas["WEBLib.Forms"].GetParentForm(this))&&(s=4 in i.FComponentState),e=this.GetNewName(),s?this.CreateWithID(""):this.CreateWithID(e),null==t||4 in t.FComponentState||this.SetName(e),this},this.Destroy=function(){this.UnbindEvents(),this.DestroyControls(),null!=this.GetContainer()&&null!=this.FParent&&null!=this.FParent.GetChildContainer()&&(this.FParent.GetChildContainer()===this.GetContainer().parentNode&&this.FParent.GetChildContainer().removeChild(this.GetContainer()),this.FContainer=null,this.SetParent(null),this.FControlCreated=!1),rtl.free(this,"FRequiredScripts"),rtl.free(this,"FMargins"),rtl.free(this,"FCenter"),rtl.free(this,"FFont"),pas.System.Assigned(this.FToolTip)&&(this.FToolTip.dispose(),this.FToolTip=null),pas.Classes.TComponent.Destroy.call(this)},this.Assign=function(t){},this.DragDrop=function(t,e,i){null!=this.FOnDragDrop&&this.FOnDragDrop(this,t,e,i)},this.Resize=function(){null!=this.FOnResize&&this.FOnResize(this)},this.ReleaseCapture=function(){var t=null;this.FCaptureDown=!1,this.FCaptured&&null!=this.FLayer&&((t=this.FLayer).removeEventListener("mouseenter",this.FLayerMouseEnterPtr),t.removeEventListener("mouseleave",this.FLayerMouseLeavePtr),t.removeEventListener("mousedown",this.FMouseDownPtr),t.removeEventListener("mouseup",this.FMouseUpPtr),t.removeEventListener("mousemove",this.FMouseMovePtr),t.removeEventListener("touchstart",this.FTouchStartPtr),t.removeEventListener("touchmove",this.FTouchMovePtr),t.removeEventListener("touchend",this.FTouchEndPtr),t.removeEventListener("touchcancel",this.FTouchEndPtr),document.body.removeChild(t),this.FCaptured=!1,this.FLayer=null,this.UpdateElement())},this.PreventDefault=function(){null!=this.GetElementEvent()&&this.GetElementEvent().preventDefault()},this.StopPropagation=function(){null==this.GetElementEvent()||this.FEnablePropagation||this.GetElementEvent().stopPropagation()},this.BeginDrag=function(){this.EnableDrag()},this.BeginUpdate=function(){this.FUpdateCount+=1},this.EndUpdate=function(){this.FUpdateCount>0&&(this.FUpdateCount-=1,0===this.FUpdateCount&&this.UpdateElement())},this.Invalidate=function(){},this.SetParentComponent=function(e){this.FParent!==e&&t.TControl.isPrototypeOf(e)&&this.SetParent(e)},this.XYToClient=function(t,e,i,s){var n=null,r=null,a=null,o=0,l=0,h=!1,d=!1,u=pas.Types.TRect.$new(),c=null,F=0,p=0,S=0,m=0;if(h=!0,d=!1,S=0,m=0,0!==this.FElementPosition)return h=!1,o=t-(r=this.GetElementHandle().getBoundingClientRect()).left,l=e-r.top,i.set(o),void s.set(l);for(S=document.body.scrollLeft+document.documentElement.scrollLeft,m=document.body.scrollTop+document.documentElement.scrollTop,o=t-this.GetLeft(),l=e-this.GetTop(),i.set(o),s.set(l),n=this.FParent,pas["WEBLib.Forms"].TCustomForm.isPrototypeOf(this)&&null==n&&null!=this.GetContainer()&&(r=this.GetContainer().getBoundingClientRect(),i.set(i.get()-r.left),s.set(s.get()-r.top));null!=n;){if(n.GetIsLinked()){r=pas["WEBLib.Forms"].TCustomForm.isPrototypeOf(n)?n.GetContainer().getBoundingClientRect():n.GetElementHandle().getBoundingClientRect(),i.set(i.get()-r.left),s.set(s.get()-r.top),i.set(i.get()+n.GetElementHandle().scrollLeft),s.set(s.get()+n.GetElementHandle().scrollTop),S=0,m=0;break}if(pas["WEBLib.Forms"].TCustomForm.isPrototypeOf(n))""!==rtl.as(n,pas["WEBLib.Forms"].TCustomForm).FFormContainer&&null!=(a=document.getElementById(rtl.as(n,pas["WEBLib.Forms"].TCustomForm).FFormContainer))&&(d=!0,r=a.getBoundingClientRect(),i.set(i.get()-r.left),s.set(s.get()-r.top)),null!=rtl.as(n,pas["WEBLib.Forms"].TCustomForm).GetContainer()&&""===rtl.as(n,pas["WEBLib.Forms"].TCustomForm).FFormContainer&&rtl.as(n,pas["WEBLib.Forms"].TCustomForm).FPopup&&(r=rtl.as(n,pas["WEBLib.Forms"].TCustomForm).GetContainer().getBoundingClientRect(),i.set(i.get()-r.left),s.set(s.get()-r.top),u.$assign(rtl.as(n,pas["WEBLib.Forms"].TCustomForm).GetClientRect()),s.set(s.get()+u.Top),S=0,m=0);else if(n.FElementPosition in rtl.createSet(1,2)){if(null!=n.GetElementHandle()){r=n.GetElementHandle().getBoundingClientRect(),i.set(o-r.left),s.set(l-r.top),S=0,m=0,h&&(c=window.getComputedStyle(document.documentElement),F=parseInt(c.marginLeft,10),p=parseInt(c.marginTop,10),i.set(i.get()+F),s.set(s.get()+p)),h=!1;break}}else 0===n.FElementPosition&&h&&(i.set(i.get()-n.GetLeft()),s.set(s.get()-n.GetTop()),null!=n.GetElementHandle()&&(i.set(i.get()+n.GetElementHandle().scrollLeft),s.set(s.get()+n.GetElementHandle().scrollTop)),o=i.get(),l=s.get());n=n.FParent}0!==this.FElementPosition||d||(i.set(i.get()+S),s.set(s.get()+m))},this.Captured=function(){return this.FCaptured&&null!=this.FLayer},this.CanFocus=function(){return!0,!0},this.HasHorzScrollBar=function(){var t=!1;return t=!1,null!=this.GetElementHandle()&&(t=this.GetElementHandle().clientWidth<this.GetElementHandle().scrollWidth),t},this.HasVertScrollBar=function(){var t=!1;return t=!1,null!=this.GetElementHandle()&&(t=this.GetElementHandle().clientHeight<this.GetElementHandle().scrollHeight),t},rtl.addIntf(this,t.IControl),rtl.addIntf(this,pas.System.IUnknown)})),rtl.createClass(this,"TWinControl",this.TControl,(function(){rtl.addIntf(this,t.IControl),rtl.addIntf(this,pas.System.IUnknown);var e=this.$rtti;e.addProperty("Cursor",2,t.$rtti.TCursor,"FCursor","SetControlCursor",4,{Default:0}),e.addProperty("ElementClassName",2,t.$rtti.TElementClassName,"FElementClassName","SetElementClassName"),e.addProperty("Enabled",2,rtl.boolean,"FEnabled","SetEnabled",4,{Default:!0}),e.addProperty("Height",3,rtl.longint,"GetHeight","SetHeight"),e.addProperty("Hint",2,rtl.string,"FHint","SetHint"),e.addProperty("Left",3,rtl.longint,"GetLeft","SetLeft"),e.addProperty("ShowHint",2,rtl.boolean,"FShowHint","SetShowHint",4,{Default:!1}),e.addProperty("Tag",0,rtl.longint,"FTag$1","FTag$1",4,{Default:0}),e.addProperty("Top",3,rtl.longint,"GetTop","SetTop"),e.addProperty("Visible",2,rtl.boolean,"FVisible","SetVisible",4,{Default:!0}),e.addProperty("Width",3,rtl.longint,"GetWidth","SetWidth"),e.addProperty("OnMouseDown",0,t.$rtti.TMouseEvent,"FOnMouseDown","FOnMouseDown"),e.addProperty("OnMouseUp",0,t.$rtti.TMouseEvent,"FOnMouseUp","FOnMouseUp"),e.addProperty("OnMouseMove",0,t.$rtti.TMouseMoveEvent,"FOnMouseMove","FOnMouseMove"),e.addProperty("OnMouseEnter",0,t.$rtti.TNotifyEvent,"FOnMouseEnter","FOnMouseEnter"),e.addProperty("OnMouseLeave",0,t.$rtti.TNotifyEvent,"FOnMouseLeave","FOnMouseLeave"),e.addProperty("OnKeyUp",0,t.$rtti.TKeyEvent,"FOnKeyUp","FOnKeyUp"),e.addProperty("OnKeyDown",0,t.$rtti.TKeyEvent,"FOnKeyDown","FOnKeyDown"),e.addProperty("OnKeyPress",0,t.$rtti.TKeyPressEvent,"FOnKeyPress","FOnKeyPress"),e.addProperty("OnEnter",0,t.$rtti.TNotifyEvent,"FOnEnter","FOnEnter"),e.addProperty("OnExit",0,t.$rtti.TNotifyEvent,"FOnExit","FOnExit")})),rtl.createClass(this,"TCustomControl",this.TWinControl,(function(){this.$init=function(){t.TWinControl.$init.call(this),this.FCaption="",this.FPixelRatio=0,this.FPainting=!1,this.FCanvas=null,this.FElementCanvas=null,this.FBorderStyle=0,this.FBorderColor=0,this.FCustomBorder=!1},this.$final=function(){this.FCanvas=void 0,this.FElementCanvas=void 0,t.TWinControl.$final.call(this)},this.RenderDesigning=function(t,e,i,s,n){var r,a=null,o=null,l=null;if(r=null!=(o=(a=e).firstChild)&&"DIV"===o.tagName&&"1"===o.getAttribute("data-design"),4 in i.FComponentState&&s&&""===this.FElementClassName){if(a.style.setProperty("border","1px solid gray"),""===n?a.style.setProperty("background-color","#F0F0F0"):a.style.setProperty("background-color","white"),r)return;a.innerHTML="",""!==n&&((l=document.createElement("DIV")).style.setProperty("background-color","white"),l.style.setProperty("background-repeat","no-repeat"),l.style.setProperty("background-position-y","center"),l.style.setProperty("background-image","url("+n+")"),l.style.setProperty("background-position-x","center"),l.style.setProperty("background-size","128px"),l.style.setProperty("top","50%"),l.style.setProperty("left","50%"),l.style.setProperty("height","70%"),a.appendChild(l)),(o=document.createElement("DIV")).setAttribute("data-design","1"),o.innerHTML=t,o.style.setProperty("position","relative"),o.style.setProperty("top","50%"),o.style.setProperty("left","50%"),o.style.setProperty("display","inline-block"),o.style.setProperty("transform","translateX(-50%)"),this.FCustomBorder=!0,a.appendChild(o)}else if(r){for(;null!=a.firstChild;)a.removeChild(a.firstChild);a.style.removeProperty("border"),a.style.removeProperty("background-color")}},this.GetPixelRatio=function(){var t=document.createElement("canvas").getContext("2d");return(window.devicePixelRatio||1)/(t.webkitBackingStorePixelRatio||t.mozBackingStorePixelRatio||t.msBackingStorePixelRatio||t.oBackingStorePixelRatio||t.backingStorePixelRatio||1)},this.RecreateCanvas=function(){var t=0,e=null,i=0,s=0;null!=this.FElementCanvas&&(this.FPainting||(null!=(e=this.GetIsLinked()?this.GetElementHandle():document.getElementById(this.GetID()+"_Canvas"))&&(this.FElementCanvas=e,rtl.free(this,"FCanvas"),this.FCanvas=null),t=this.GetPixelRatio(),i=Math.min(16383,this.GetHeight()-this.GetCanvasHeightOffset()),s=Math.min(16383,this.GetWidth()-this.GetCanvasWidthOffset()),1===this.FElementPosition?this.FElementCanvas.style.setProperty("position","relative"):this.FElementCanvas.style.setProperty("position","absolute"),this.FElementCanvas.style.setProperty("height",pas.SysUtils.IntToStr(i)+"px"),this.FElementCanvas.style.setProperty("width",pas.SysUtils.IntToStr(s)+"px"),this.FElementCanvas.height=Math.round(i*t),this.FElementCanvas.width=Math.round(s*t)),null==this.FCanvas&&(this.FCanvas=pas["WEBLib.Graphics"].TCanvas.$create("Create$1",[this.FElementCanvas])),this.FCanvas.FApplyPixelRatio=!0,this.FCanvas.SetTransform(1,0,0,1,0,0))},this.SetBorderStyle=function(t){this.FBorderStyle!==t&&(this.FBorderStyle=t,this.UpdateElement())},this.SetBorderColor=function(t){this.FBorderColor!==t&&(this.FBorderColor=t,this.UpdateElement())},this.SetName=function(e){var i={},s="";if(s="",null!=pas["WEBLib.Forms"].VSIDE&&4 in this.FComponentState||pas["WEBLib.Forms"].TFrame.isPrototypeOf(this)&&(s="F"+t.FindUniqueName(this.FName)+"_"),pas.Classes.TComponent.SetName.call(this,s+e),1 in this.FControlStyle&&4 in this.FComponentState&&!(0 in this.FComponentState)){if(null!=this.FOwner&&0 in this.FOwner.FComponentState)return;i=rtl.refSet(this.FControlStyle),this.SetCaption(e),this.FControlStyle=rtl.refSet(i)}},this.SetCaption=function(t){this.FCaption=t,this.FControlStyle=rtl.diffSet(this.FControlStyle,rtl.createSet(1))},this.CreateControl=function(){t.TControl.CreateControl.call(this),this.RecreateCanvas()},this.Loaded=function(){t.TControl.Loaded.call(this),this.Invalidate()},this.UpdateElementVisual=function(){t.TControl.UpdateElementVisual.call(this),null!=this.GetElementHandle()&&(this.GetIsLinked()||""!==this.FElementClassName||(1===this.FBorderStyle?this.FCustomBorder?(this.GetElementStyle().setProperty("border-style","solid"),this.GetElementStyle().setProperty("border-width","1px"),this.GetElementStyle().setProperty("border-color",pas["WEBLib.Graphics"].ColorToHTML(this.FBorderColor))):this.GetElementStyle().setProperty("border-style",""):this.GetElementStyle().setProperty("border-style","none")),""!==this.FElementClassName&&(this.GetElementStyle().removeProperty("border-style"),this.GetElementStyle().removeProperty("border-width"),this.GetElementStyle().removeProperty("border-color")))},this.CreateElement=function(){var t=null;return this.FElementCanvas=document.createElement("CANVAS"),0 in this.FControlStyle?((t=document.createElement("SPAN")).appendChild(this.FElementCanvas),""!==this.GetID()&&this.FElementCanvas.setAttribute("id",this.GetID()+"_Canvas"),this.FElementCanvas.setAttribute("zindex","-1")):t=this.FElementCanvas,t},this.GetCanvasHeightOffset=function(){return 0,0},this.GetCanvasWidthOffset=function(){return 0,0},this.BindElement=function(){"CANVAS"===this.GetContainer().tagName||this.FControlCreated||(this.FElementCanvas=document.createElement("CANVAS"),this.GetContainer().appendChild(this.FElementCanvas))},this.BindEvents=function(){t.TControl.BindEvents.call(this)},this.Paint=function(){},this.CreateInitialize=function(){t.TControl.CreateInitialize.call(this),this.FControlStyle=rtl.unionSet(this.FControlStyle,rtl.createSet(1)),this.FBorderStyle=1,this.FBorderColor=12632256,this.FPainting=!1,this.FWidth=100,this.FHeight=25,this.FWidthPercent=100,this.FHeightPercent=100,this.FCustomBorder=!1},this.Destroy=function(){null!=this.FCanvas&&rtl.free(this,"FCanvas"),t.TControl.Destroy.call(this)},this.Resize=function(){t.TControl.Resize.call(this),this.Invalidate()},this.Invalidate=function(){var e=null;t.TControl.Invalidate.call(this),null===this.FParent||3 in this.FComponentState||this.FVisible&&(this.FUpdateCount>0||null!=(e=pas["WEBLib.Forms"].GetParentForm(this))&&e.IsUpdating()||(this.GetPixelRatio()!==this.FPixelRatio&&this.RecreateCanvas(),this.FPixelRatio=this.GetPixelRatio(),this.FPainting=!0,null!=this.FCanvas&&this.FCanvas.Clear(),this.Paint(),this.FPainting=!1))},this.SetFocus=function(){t.TControl.SetFocus.call(this)},this.Focused=function(){return t.TControl.Focused.call(this)},this.EndUpdate=function(){t.TControl.EndUpdate.call(this),0===this.FUpdateCount&&this.Invalidate()},rtl.addIntf(this,t.IControl),rtl.addIntf(this,pas.System.IUnknown)})),rtl.createClass(this,"TCustomHTMLDiv",this.TCustomControl,(function(){this.CreateElement=function(){return document.createElement("DIV")},rtl.addIntf(this,t.IControl),rtl.addIntf(this,pas.System.IUnknown)})),rtl.createClass(this,"TControlManager",pas.Classes.TComponent,(function(){this.$init=function(){pas.Classes.TComponent.$init.call(this),this.FInstanceCount=0},this.Create$1=function(t){return pas.Classes.TComponent.Create$1.apply(this,arguments),this.FInstanceCount=0,this},this.GetInstanceNumber=function(){return this.FInstanceCount+=1,this.FInstanceCount},rtl.addIntf(this,pas.System.IUnknown)})),this.FindUniqueName=function(t){return t+pas.SysUtils.IntToStr(e.ControlManager.GetInstanceNumber())},this.GetScrollBarHeight=function(){var t=0;if(0===(t=e.ScrollBH)){var i=document.createElement("div");i.style.visibility="hidden",i.style.height="100px",i.style.msOverflowStyle="scrollbar",document.body.appendChild(i);var s=i.offsetHeight;i.style.overflow="scroll";var n=document.createElement("div");n.style.height="100%",i.appendChild(n);var r=n.offsetHeight;i.parentNode.removeChild(i),t=s-r,e.ScrollBH=t}return t},this.GetScrollBarWidth=function(){var t=0;if(0===(t=e.ScrollBW)){var i=document.createElement("div");i.style.visibility="hidden",i.style.width="100px",i.style.msOverflowStyle="scrollbar",document.body.appendChild(i);var s=i.offsetWidth;i.style.overflow="scroll";var n=document.createElement("div");n.style.width="100%",i.appendChild(n);var r=n.offsetWidth;i.parentNode.removeChild(i),t=s-r,e.ScrollBW=t}return t},this.SetHTMLElementFont=function(t,e,i){var s="";i?(t.style.removeProperty("font-family"),t.style.removeProperty("font-style"),t.style.removeProperty("font-weight"),t.style.removeProperty("font-size"),t.style.removeProperty("text-decoration")):(t.style.setProperty("font-family",e.FName),t.style.setProperty("font-style","normal"),0 in e.FStyle?t.style.setProperty("font-weight","bold"):t.style.setProperty("font-weight",""),1 in e.FStyle&&t.style.setProperty("font-style","italic"),s="",3 in e.FStyle&&(s="underline"),2 in e.FStyle&&(""!==s&&(s+=" "),s+="line-through"),""!==s?t.style.setProperty("text-decoration",s):t.style.removeProperty("text-decoration"),0!==e.FSize&&t.style.setProperty("font-size",pas.SysUtils.IntToStr(e.FSize)+"pt"))},this.SetHTMLElementColor=function(t,i,s){s||-1===i||16711422===i?t.style.removeProperty(e.cStyleBkgColor):t.style.setProperty(e.cStyleBkgColor,pas["WEBLib.Graphics"].ColorToHTML(i))},this.GetHTMLCursorName=function(t){var e="";e="default";return 0===t?e="default":2===t?e="auto":1===t?e="none":3===t?e="crosshair":4===t?e="text":6===t?e="nesw-resize":7===t?e="ns-resize":8===t?e="nwse-resize":9===t?e="ew-resize":10===t?e="n-resize":11===t?e="wait":12===t?e="copy":13===t?e="no-drop":14===t?e="col-resize":15===t?e="row-resize":16===t?e="copy":17===t?e="progress":18===t?e="not-allowed":19===t?e="progress":20===t?e="help":21===t?e="pointer":22!==t&&5!==t||(e="move"),e},this.GetHTMLElementAbsoluteRect=function(t){var e=pas.Types.TRect.$new(),i="";function s(t){var e=0,i=0;return t=pas.SysUtils.StringReplace(t,"px","",rtl.createSet(0)),pas.System.val$6(t,{get:function(){return e},set:function(t){e=t}},{get:function(){return i},set:function(t){i=t}}),e}return i=t.style.getPropertyValue("left"),e.Left=s(i),i=t.style.getPropertyValue("top"),e.Top=s(i),i=t.style.getPropertyValue("width"),e.Right=e.Left+s(i),i=t.style.getPropertyValue("height"),e.Bottom=e.Top+s(i),e},this.IsAndroid=function(){var t;return t=navigator.userAgent,pas.System.Pos("Android",t)>0},t.$implcode=function(){e.ControlManager=null,e.FMouseX=0,e.FMouseY=0,e.FCursorX=0,e.FCursorY=0,e.ScrollBW=0,e.ScrollBH=0,e.DragObject=null,e.cStyleBkgColor="background-color"},t.$init=function(){e.ScrollBW=0,e.ScrollBH=0,e.DragObject=null,e.ControlManager=t.TControlManager.$create("Create$1",[null])}}),["WEBLib.Dialogs","WEBLib.Forms","Math","TypInfo","WEBLib.WebTools","WEBLib.Utils"]),rtl.module("WEBLib.WebTools",["System","Classes","Web","JS","WEBLib.Controls","WEBLib.Graphics"],(function(){"use strict";var t=this;this.cBodyTag="body",this.cHTMLExt=".html",this.DoubleToHTML=function(t){return pas.SysUtils.Format$1("%g",pas.System.VarRecs(3,t),pas.SysUtils.TFormatSettings.Invariant())},this.GetLocaleShortDateFormat=function(t){return pas.SysUtils.TFormatSettings.Create$1(t).ShortDateFormat},this.GetLocaleLongDayName=function(t,e){var i=new Date(2017,0,1);i.setDate(i.getDate()+t-1);var s="";return s=""==e?navigator.language:e,i.toLocaleDateString(s,{weekday:"long"})},this.GetLocaleShortDayName=function(t,e){var i=new Date(2017,0,1);i.setDate(i.getDate()+t-1);var s="";return s=""==e?navigator.language:e,i.toLocaleDateString(s,{weekday:"short"})},this.GetLocaleLongMonthName=function(t,e){var i=new Date(2017,t-1,1),s="";return s=""==e?navigator.language:e,i.toLocaleDateString(s,{month:"long"})},this.GetLocaleShortMonthName=function(t,e){var i=new Date(2017,t-1,1),s="";return s=""==e?navigator.language:e,i.toLocaleDateString(s,{month:"short"})},this.GetLocaleDecimalSeparator=function(t){var e=1.1,i="";return i=""==t?navigator.language:t,e=e.toLocaleString(i).substring(1,2)},this.GetBrowserLocale=function(){return navigator.language},this.ProcessAccelerator=function(t,e){var i,s=0,n="";for(i=t.length,e.set(""),n="",s=1;s<=i;)"&"===t.charAt(s-1)?(s+1<=i&&"&"!==t.charAt(s+1-1)?(n=n+"<u>"+t.charAt(s+1-1)+"</u>",e.set(t.charAt(s+1-1))):s+1<=i&&"&"===t.charAt(s+1-1)&&(n+="&"),s+=2):(n+=t.charAt(s-1),s+=1);return n},this.HTMLToString=function(t){return t=pas.SysUtils.StringReplace(t,"<","&lt;",rtl.createSet(0)),pas.SysUtils.StringReplace(t,">","&gt;",rtl.createSet(0))},this.ElementVisible=function(e){var i=!1,s=null;for(i=!1,s=e;null!=s;)pas.SysUtils.LowerCase(s.tagName)===t.cBodyTag&&(i=!0),s=s.parentElement;if(!i)return i;for(;null!=e;){if("none"===e.style.getPropertyValue("display"))return i=!1;if(s=e.parentElement,!rtl.isExt(s,HTMLElement))return i;e=s}return i}}),["SysUtils","WEBLib.Utils"]),rtl.module("contnrs",["System","SysUtils","Classes"],(function(){"use strict";var t=this,e=t.$impl;rtl.createClass(this,"TFPObjectList",pas.System.TObject,(function(){this.$init=function(){pas.System.TObject.$init.call(this),this.FFreeObjects=!1,this.FList=null},this.$final=function(){this.FList=void 0,pas.System.TObject.$final.call(this)},this.GetCount=function(){return this.FList.FCount},this.GetItem=function(t){return rtl.getObject(this.FList.Get(t))},this.SetItem=function(t,e){var i=null;this.FFreeObjects?(i=rtl.getObject(this.FList.Get(t)),this.FList.Put(t,e),i=rtl.freeLoc(i)):this.FList.Put(t,e)},this.Create$1=function(){return pas.System.TObject.Create.call(this),this.FList=pas.Classes.TFPList.$create("Create"),this.FFreeObjects=!0,this},this.Create$2=function(t){return this.Create$1(),this.FFreeObjects=t,this},this.Destroy=function(){null!==this.FList&&(this.Clear(),this.FList.$destroy("Destroy")),pas.System.TObject.Destroy.call(this)},this.Clear=function(){var t=0,e=null;if(this.FFreeObjects)for(var i=this.FList.FCount-1;i>=0;i--)t=i,e=rtl.getObject(this.FList.Get(t)),this.FList.Put(t,null),e=rtl.freeLoc(e);this.FList.Clear()},this.Add=function(t){return this.FList.Add(t)}})),rtl.createClass(this,"TObjectList",pas.Classes.TList,(function(){this.$init=function(){pas.Classes.TList.$init.call(this),this.FFreeObjects=!1},this.Notify=function(t,e){var i=null;this.FFreeObjects&&2===e&&(i=rtl.getObject(t),i=rtl.freeLoc(i)),pas.Classes.TList.Notify.call(this,t,e)},this.GetItem=function(t){return rtl.getObject(pas.Classes.TList.Get.call(this,t))},this.Create$2=function(){return pas.Classes.TList.Create$1.call(this),this.FFreeObjects=!0,this},this.Create$3=function(t){return pas.Classes.TList.Create$1.call(this),this.FFreeObjects=t,this},this.Add$1=function(t){return pas.Classes.TList.Add.call(this,t)},this.IndexOf$1=function(t){return pas.Classes.TList.IndexOf.call(this,t)}})),rtl.createClass(this,"THTCustomNode",pas.System.TObject,(function(){this.$init=function(){pas.System.TObject.$init.call(this),this.FKey=""},this.CreateWith=function(t){return pas.System.TObject.Create.call(this),this.FKey=t,this}})),rtl.createClass(this,"TFPCustomHashTable",pas.System.TObject,(function(){this.$init=function(){pas.System.TObject.$init.call(this),this.FHashTable=null,this.FHashFunction=null,this.FCount=0,this.FHashTableSize=0},this.$final=function(){this.FHashTable=void 0,this.FHashFunction=void 0,pas.System.TObject.$final.call(this)},this.SetHashTableSize=function(t){var i=0,s=0;if(t!==this.FHashTableSize){for(i=0;e.PRIMELIST[i]<t&&i<27;)i+=1;s=e.PRIMELIST[i],0===this.FCount?(this.FHashTableSize=s,this.InitializeHashTable()):this.ChangeTableSize(s)}},this.InitializeHashTable=function(){if(this.FHashTableSize>0)for(var t=0,e=this.FHashTableSize-1;t<=e;t++)t,this.FHashTable.Add(null);this.FCount=0},this.Chain=function(t){return this.FHashTable.GetItem(t)},this.FindChainForAdd=function(e){var i,s=null,n=0;if(i=this.FHashFunction(e,this.FHashTableSize),null!=(s=this.Chain(i))){if(s.GetCount()>0)for(var r=0,a=s.GetCount()-1;r<=a;r++)if(n=r,s.GetItem(n).FKey===e)throw t.EDuplicate.$create("CreateFmt",[rtl.getResStr(t,"DuplicateMsg"),pas.System.VarRecs(18,e)])}else this.FHashTable.SetItem(i,t.TFPObjectList.$create("Create$2",[!0])),s=this.Chain(i);return this.FCount+=1,s},this.Create$1=function(){return this.CreateWith(196613,t.RSHash),this},this.CreateWith=function(e,i){return pas.System.TObject.Create.call(this),this.FHashTable=t.TFPObjectList.$create("Create$2",[!0]),this.SetHashTableSize(e),this.FHashFunction=i,this},this.Destroy=function(){rtl.free(this,"FHashTable"),pas.System.TObject.Destroy.call(this)},this.ChangeTableSize=function(e){var i,s=null,n=null,r=0,a=0,o=null;if(s=this.FHashTable,i=this.FHashTableSize,this.FHashTableSize=e,this.FHashTable=t.TFPObjectList.$create("Create$2",[!0]),this.InitializeHashTable(),i>0)for(var l=0,h=i-1;l<=h;l++)if(r=l,null!=(n=s.GetItem(r)))for(var d=0,u=n.GetCount()-1;d<=u;d++)a=d,o=n.GetItem(a),this.AddNode(o);s=rtl.freeLoc(s)},this.Clear=function(){var t=0;if(this.FHashTableSize>0)for(var e=0,i=this.FHashTableSize-1;e<=i;e++)t=e,null!=this.Chain(t)&&this.Chain(t).Clear();this.FCount=0},this.Find=function(t){var e,i=null,s=0;if(e=this.FHashFunction(t,this.FHashTableSize),null!=(i=this.Chain(e))&&i.GetCount()>0)for(var n=0,r=i.GetCount()-1;n<=r;n++)if(s=n,i.GetItem(s).FKey===t)return i.GetItem(s);return null,null}})),rtl.createClass(this,"THTObjectNode",this.THTCustomNode,(function(){this.$init=function(){t.THTCustomNode.$init.call(this),this.FData=null},this.$final=function(){this.FData=void 0,t.THTCustomNode.$final.call(this)}})),rtl.createClass(this,"THTOwnedObjectNode",this.THTObjectNode,(function(){this.Destroy=function(){pas.SysUtils.FreeAndNil({p:this,get:function(){return this.p.FData},set:function(t){this.p.FData=t}}),pas.System.TObject.Destroy.call(this)}})),rtl.createClass(this,"TFPObjectHashTable",this.TFPCustomHashTable,(function(){this.$init=function(){t.TFPCustomHashTable.$init.call(this),this.FOwnsObjects=!1},this.CreateNewNode=function(e){return this.FOwnsObjects?t.THTOwnedObjectNode.$create("CreateWith",[e]):t.THTObjectNode.$create("CreateWith",[e])},this.AddNode=function(t){this.Add(t.FKey,t.FData)},this.GetData=function(t){var e;return null!=(e=this.Find(t))?e.FData:null},this.Create$2=function(e){return t.TFPCustomHashTable.Create$1.call(this),this.FOwnsObjects=e,this},this.Add=function(t,e){var i=null,s=null;i=this.FindChainForAdd(t),(s=this.CreateNewNode(t)).FData=e,i.Add(s)}})),rtl.createClass(this,"EDuplicate",pas.SysUtils.Exception,(function(){}));this.RSHash=function(t,e){var i=0,s=0,n=0;if(s=63689,i=0,t.length>0)for(var r=1,a=t.length;r<=a;r++)n=r,i=i*s+t.charCodeAt(n-1),s*=378551;return i=rtl.lw(2147483647&i)%e},t.$implcode=function(){e.NPRIMES=28,e.PRIMELIST=[53,97,193,389,769,1543,3079,6151,12289,24593,49157,98317,196613,393241,786433,1572869,3145739,6291469,12582917,25165843,50331653,100663319,201326611,402653189,805306457,1610612741,3221225473,4294967291],t.$resourcestrings={DuplicateMsg:{org:"An item with key %0:s already exists"}}}}),["JS"]),rtl.module("WEBLib.Graphics",["System","Classes","Types","UITypes","Web","JS"],(function(){"use strict";var t=this,e=t.$impl;this.WEBDEFAULTFONT="Arial",this.clNone=-1,this.clBlack=0,this.clSilver=12632256,this.clWhite=16777215,this.clBtnFace=15790320,this.clWindowText=65793,this.clWindow=16711422,this.clHighlight=14120960,this.clHighlightText=197379,this.DEFAULT_CHARSET=1,this.$rtti.$inherited("TColor",rtl.nativeint,{}),this.TPenStyle={0:"psSolid",psSolid:0,1:"psDash",psDash:1,2:"psDot",psDot:2,3:"psDashDot",psDashDot:3,4:"psDashDotDot",psDashDotDot:4,5:"psClear",psClear:5,6:"psInsideFrame",psInsideFrame:6,7:"psUserStyle",psUserStyle:7,8:"psAlternate",psAlternate:8},this.$rtti.$Enum("TPenStyle",{minvalue:0,maxvalue:8,ordtype:1,enumtype:this.TPenStyle}),this.TPenMode={0:"pmBlack",pmBlack:0,1:"pmWhite",pmWhite:1,2:"pmNop",pmNop:2,3:"pmNot",pmNot:3,4:"pmCopy",pmCopy:4,5:"pmNotCopy",pmNotCopy:5,6:"pmMergePenNot",pmMergePenNot:6,7:"pmMaskPenNot",pmMaskPenNot:7,8:"pmMergeNotPen",pmMergeNotPen:8,9:"pmMaskNotPen",pmMaskNotPen:9,10:"pmMerge",pmMerge:10,11:"pmNotMerge",pmNotMerge:11,12:"pmMask",pmMask:12,13:"pmNotMask",pmNotMask:13,14:"pmXor",pmXor:14,15:"pmNotXor",pmNotXor:15},this.$rtti.$Enum("TPenMode",{minvalue:0,maxvalue:15,ordtype:1,enumtype:this.TPenMode}),this.TBrushStyle={0:"bsSolid",bsSolid:0,1:"bsClear",bsClear:1,2:"bsHorizontal",bsHorizontal:2,3:"bsVertical",bsVertical:3,4:"bsFDiagonal",bsFDiagonal:4,5:"bsBDiagonal",bsBDiagonal:5,6:"bsCross",bsCross:6,7:"bsDiagCross",bsDiagCross:7},this.$rtti.$Enum("TBrushStyle",{minvalue:0,maxvalue:7,ordtype:1,enumtype:this.TBrushStyle}),this.TBrushGradient={0:"bgNone",bgNone:0,1:"bgLinearVert",bgLinearVert:1,2:"bgLinearHorz",bgLinearHorz:2,3:"bgRadial",bgRadial:3},this.$rtti.$Enum("TBrushGradient",{minvalue:0,maxvalue:3,ordtype:1,enumtype:this.TBrushGradient}),this.TFontStyle={0:"fsBold",fsBold:0,1:"fsItalic",fsItalic:1,2:"fsStrikeOut",fsStrikeOut:2,3:"fsUnderline",fsUnderline:3},this.$rtti.$Enum("TFontStyle",{minvalue:0,maxvalue:3,ordtype:1,enumtype:this.TFontStyle}),this.$rtti.$Set("TFontStyles",{comptype:this.$rtti.TFontStyle}),this.$rtti.$Int("TFontCharset",{minvalue:0,maxvalue:255,ordtype:3}),this.$rtti.$inherited("TBinaryString",rtl.string,{}),rtl.createClass(this,"TPen",pas.Classes.TPersistent,(function(){this.$init=function(){pas.Classes.TPersistent.$init.call(this),this.FWidth=0,this.FColor=0,this.FStyle=0,this.FMode=0},this.SetColor=function(t){this.FColor=t},this.Create$1=function(){return this.FColor=0,this.FWidth=1,this.FStyle=0,this.FMode=4,this},this.Assign=function(e){t.TPen.isPrototypeOf(e)?(this.FColor=rtl.as(e,t.TPen).FColor,this.FStyle=rtl.as(e,t.TPen).FStyle,this.FWidth=rtl.as(e,t.TPen).FWidth):pas.Classes.TPersistent.Assign.apply(this,arguments)};var e=this.$rtti;e.addProperty("Color",2,t.$rtti.TColor,"FColor","SetColor"),e.addProperty("Mode",0,t.$rtti.TPenMode,"FMode","FMode",4,{Default:t.TPenMode.pmCopy}),e.addProperty("Width",0,rtl.longint,"FWidth","FWidth",4,{Default:1}),e.addProperty("Style",0,t.$rtti.TPenStyle,"FStyle","FStyle",4,{Default:t.TPenStyle.psSolid})})),rtl.createClass(this,"TBrush",pas.Classes.TPersistent,(function(){this.$init=function(){pas.Classes.TPersistent.$init.call(this),this.FColor=0,this.FStyle=0,this.FGradientColors=null,this.FGradient=0},this.$final=function(){this.FGradientColors=void 0,pas.Classes.TPersistent.$final.call(this)},this.Create$1=function(){return this.FColor=16777215,this.FStyle=0,this.FGradient=0,this.FGradientColors=pas.Classes.TList.$create("Create$1"),this},this.Destroy=function(){rtl.free(this,"FGradientColors"),pas.System.TObject.Destroy.call(this)},this.Assign=function(e){t.TBrush.isPrototypeOf(e)?(this.FColor=rtl.as(e,t.TBrush).FColor,this.FStyle=rtl.as(e,t.TBrush).FStyle):pas.Classes.TPersistent.Assign.apply(this,arguments)};var e=this.$rtti;e.addProperty("Gradient",0,t.$rtti.TBrushGradient,"FGradient","FGradient"),e.addProperty("Color",0,t.$rtti.TColor,"FColor","FColor"),e.addProperty("Style",0,t.$rtti.TBrushStyle,"FStyle","FStyle")})),rtl.createClass(this,"TFont",pas.Classes.TPersistent,(function(){this.$init=function(){pas.Classes.TPersistent.$init.call(this),this.FName="",this.FSize=0,this.FColor=0,this.FStyle={},this.FOnChange=null,this.FHeight=0,this.FCharset=0},this.$final=function(){this.FStyle=void 0,this.FOnChange=void 0,pas.Classes.TPersistent.$final.call(this)},this.SetHeight=function(t){var e;e=72*-t/96,this.FSize=Math.round(e),this.FHeight!==t&&(this.FHeight=t,this.DoChange())},this.SetName=function(t){this.FName!==t&&(this.FName=t,this.DoChange())},this.SetSize=function(t){this.FSize!==t&&(this.FSize=t,this.DoChange())},this.SetColor=function(t){this.FColor!==t&&(this.FColor=t,this.DoChange())},this.SetStyle=function(t){rtl.neSet(this.FStyle,t)&&(this.FStyle=rtl.refSet(t),this.DoChange())},this.DoChange=function(){null!=this.FOnChange&&this.FOnChange(this)},this.Assign=function(e){t.TFont.isPrototypeOf(e)?(this.FName=rtl.as(e,t.TFont).FName,this.FColor=rtl.as(e,t.TFont).FColor,this.FSize=rtl.as(e,t.TFont).FSize,this.FStyle=rtl.refSet(rtl.as(e,t.TFont).FStyle),this.DoChange()):pas.Classes.TPersistent.Assign.apply(this,arguments)},this.Create$1=function(){return pas.System.TObject.Create.call(this),this.FName=t.WEBDEFAULTFONT,this.FSize=8,this.FHeight=-11,this.FStyle={},this.FColor=0,this};var e=this.$rtti;e.addProperty("Charset",0,t.$rtti.TFontCharset,"FCharset","FCharset"),e.addProperty("Name",2,pas.UITypes.$rtti.TFontName,"FName","SetName"),e.addProperty("Height",2,rtl.longint,"FHeight","SetHeight"),e.addProperty("Style",2,t.$rtti.TFontStyles,"FStyle","SetStyle"),e.addProperty("Color",2,t.$rtti.TColor,"FColor","SetColor"),e.addProperty("Size",2,rtl.longint,"FSize","SetSize")})),rtl.recNewT(this,"TMatrix",(function(){this.m11=0,this.m12=0,this.m13=0,this.m21=0,this.m22=0,this.m23=0,this.m31=0,this.m32=0,this.m33=0,this.$eq=function(t){return this.m11===t.m11&&this.m12===t.m12&&this.m13===t.m13&&this.m21===t.m21&&this.m22===t.m22&&this.m23===t.m23&&this.m31===t.m31&&this.m32===t.m32&&this.m33===t.m33},this.$assign=function(t){return this.m11=t.m11,this.m12=t.m12,this.m13=t.m13,this.m21=t.m21,this.m22=t.m22,this.m23=t.m23,this.m31=t.m31,this.m32=t.m32,this.m33=t.m33,this}})),rtl.createClass(this,"TCanvas",pas.System.TObject,(function(){this.$init=function(){pas.System.TObject.$init.call(this),this.FElementCanvas=null,this.FContext=null,this.FPen=null,this.FBrush=null,this.FFont=null,this.FPathOpen=!1,this.FApplyPixelRatio=!1},this.$final=function(){this.FElementCanvas=void 0,this.FContext=void 0,this.FPen=void 0,this.FBrush=void 0,this.FFont=void 0,pas.System.TObject.$final.call(this)},this.Create$1=function(e){return this.FElementCanvas=e,-1!==navigator.userAgent.indexOf("Safari")&&-1===navigator.userAgent.indexOf("Chrome")?this.FContext=e.getContext("2d"):this.FContext=e.getContext("2d",{willReadFrequently:!0}),this.FPen=t.TPen.$create("Create$1"),this.FBrush=t.TBrush.$create("Create$1"),this.FPathOpen=!1,this.FFont=t.TFont.$create("Create$1"),this.FApplyPixelRatio=!1,this},this.Destroy=function(){pas.System.TObject.Destroy.call(this)},this.SetTransform=function(i,s,n,r,a,o){var l=t.TMatrix.$new(),h=0;null!=this.FContext&&(l.$assign(e.MatrixIdentity()),l.m11=i,l.m12=s,l.m21=n,l.m22=r,l.m31=a,l.m32=o,this.FApplyPixelRatio&&(h=e.GetPixelRatio(this),l.$assign(e.MatrixMultiply(l,e.MatrixCreateScaling(h,h)))),this.FContext.setTransform(l.m11,l.m12,l.m21,l.m22,l.m31,l.m32))},this.Clear=function(){null!=this.FContext&&null!=this.FElementCanvas&&this.FContext.clearRect(0,0,this.FElementCanvas.width,this.FElementCanvas.height)}})),rtl.createClass(this,"TURLPicture",pas.Classes.TPersistent,(function(){this.$init=function(){pas.Classes.TPersistent.$init.call(this),this.FOnChange=null,this.FFilename="",this.FData="",this.FOnDataChange=null},this.$final=function(){this.FOnChange=void 0,this.FOnDataChange=void 0,pas.Classes.TPersistent.$final.call(this)},this.SetData=function(t){this.FData!==t&&(this.FData=t,this.DataChanged())},this.GetData=function(){return this.FData},this.Changed=function(){null!=this.FOnChange&&this.FOnChange(this)},this.DataChanged=function(){null!=this.FOnDataChange&&this.FOnDataChange(this)},this.LoadFromFile=function(t){this.FFilename=t,this.Changed()},this.Assign=function(e){t.TURLPicture.isPrototypeOf(e)?(this.FFilename=rtl.as(e,t.TURLPicture).FFilename,this.Changed()):pas.Classes.TPersistent.Assign.apply(this,arguments)};var e=this.$rtti;e.addProperty("OnChange",0,pas.Classes.$rtti.TNotifyEvent,"FOnChange","FOnChange"),e.addProperty("Data",3,t.$rtti.TBinaryString,"GetData","SetData")})),this.ColorToRGB=function(t){return t},this.ColorToHex=function(t){var e="";for(e=t.toString(16);e.length<6;)e="0"+e;return pas.System.Copy(e,5,2)+pas.System.Copy(e,3,2)+pas.System.Copy(e,1,2)},this.ColorToHTML=function(e){return-1==(4294967295&e)?"#00000000":0!=(4278190080&e)?"#"+t.ColorToHex(16777215&e)+pas.SysUtils.IntToHex(255&Math.floor((4278190080&e)/16777216),2):"#"+t.ColorToHex(e)},this.RGB=function(t,e,i){return t|e<<8|i<<16},t.$implcode=function(){rtl.createClass(e,"TGraphicCacheList",pas.contnrs.TObjectList,(function(){})),e.FCache=null,e.FQueue=null,e.MatrixIdentity=function(){var e=t.TMatrix.$new();return e.m11=1,e.m12=0,e.m13=0,e.m21=0,e.m22=1,e.m23=0,e.m31=0,e.m32=0,e.m33=1,e},e.GetPixelRatio=function(t){var e=t.FContext;return(window.devicePixelRatio||1)/(e.webkitBackingStorePixelRatio||e.mozBackingStorePixelRatio||e.msBackingStorePixelRatio||e.oBackingStorePixelRatio||e.backingStorePixelRatio||1)},e.MatrixCreateScaling=function(i,s){var n=t.TMatrix.$new();return n.$assign(e.MatrixIdentity()),n.m11=i,n.m22=s,n},e.MatrixMultiply=function(e,i){var s=t.TMatrix.$new();return s.m11=e.m11*i.m11+e.m12*i.m21+e.m13*i.m31,s.m12=e.m11*i.m12+e.m12*i.m22+e.m13*i.m32,s.m13=e.m11*i.m13+e.m12*i.m23+e.m13*i.m33,s.m21=e.m21*i.m11+e.m22*i.m21+e.m23*i.m31,s.m22=e.m21*i.m12+e.m22*i.m22+e.m23*i.m32,s.m23=e.m21*i.m13+e.m22*i.m23+e.m23*i.m33,s.m31=e.m31*i.m11+e.m32*i.m21+e.m33*i.m31,s.m32=e.m31*i.m12+e.m32*i.m22+e.m33*i.m32,s.m33=e.m31*i.m13+e.m32*i.m23+e.m33*i.m33,s}},t.$init=function(){e.FCache=e.TGraphicCacheList.$create("Create$2"),e.FQueue=pas.Classes.TStringList.$create("Create$1")}}),["WEBLib.Forms","WEBLib.WebTools","Math","SysUtils","contnrs"]),rtl.module("WEBLib.Modules",["System","Classes"],(function(){"use strict";rtl.createClass(this,"TDataModule",pas.Classes.TComponent,(function(){this.$init=function(){pas.Classes.TComponent.$init.call(this),this.FHeight=0,this.FOldCreateOrder=!1,this.FOnCreate=null,this.FOnDestroy=null,this.FWidth=0},this.$final=function(){this.FOnCreate=void 0,this.FOnDestroy=void 0,pas.Classes.TComponent.$final.call(this)},this.DoCreate=function(){this.LoadDFMValues(),null!=this.FOnCreate&&this.FOnCreate(this)},this.DoDestroy=function(){null!=this.FOnDestroy&&this.FOnDestroy(this)},this.LoadDFMValues=function(){},this.AfterConstruction=function(){pas.System.TObject.AfterConstruction.call(this),this.FOldCreateOrder||this.DoCreate()},this.BeforeDestruction=function(){pas.Classes.TComponent.BeforeDestruction.call(this),this.FOldCreateOrder||this.DoDestroy()},rtl.addIntf(this,pas.System.IUnknown);var t=this.$rtti;t.addProperty("OnCreate",0,pas.Classes.$rtti.TNotifyEvent,"FOnCreate","FOnCreate"),t.addProperty("OnDestroy",0,pas.Classes.$rtti.TNotifyEvent,"FOnDestroy","FOnDestroy")}))})),rtl.module("WEBLib.Lang",["System"],(function(){"use strict";this.TUILanguage={0:"lNone",lNone:0,1:"lAfar",lAfar:1,2:"lAbkhazian",lAbkhazian:2,3:"lAvestan",lAvestan:3,4:"lAfrikaans",lAfrikaans:4,5:"lAkan",lAkan:5,6:"lAmharic",lAmharic:6,7:"lAragonese",lAragonese:7,8:"lArabic",lArabic:8,9:"lAssamese",lAssamese:9,10:"lAvaric",lAvaric:10,11:"lAymara",lAymara:11,12:"lAzerbaijani",lAzerbaijani:12,13:"lBashkir",lBashkir:13,14:"lBelarusian",lBelarusian:14,15:"lBulgarian",lBulgarian:15,16:"lBihari",lBihari:16,17:"lBislama",lBislama:17,18:"lBambara",lBambara:18,19:"lBengali",lBengali:19,20:"lTibetan",lTibetan:20,21:"lBreton",lBreton:21,22:"lBosnian",lBosnian:22,23:"lCatalan",lCatalan:23,24:"lChechen",lChechen:24,25:"lChamorro",lChamorro:25,26:"lCorsican",lCorsican:26,27:"lCree",lCree:27,28:"lCzech",lCzech:28,29:"lOldSlavic",lOldSlavic:29,30:"lChuvash",lChuvash:30,31:"lWelsh",lWelsh:31,32:"lDanish",lDanish:32,33:"lGerman",lGerman:33,34:"lDivehi",lDivehi:34,35:"lDzongkha",lDzongkha:35,36:"lEwe",lEwe:36,37:"lEnglish",lEnglish:37,38:"lEsperanto",lEsperanto:38,39:"lSpanish",lSpanish:39,40:"lEstonian",lEstonian:40,41:"lBasque",lBasque:41,42:"lPersian",lPersian:42,43:"lFulah",lFulah:43,44:"lFinnish",lFinnish:44,45:"lFijian",lFijian:45,46:"lFaroese",lFaroese:46,47:"lFrench",lFrench:47,48:"lWesternFrisian",lWesternFrisian:48,49:"lIrish",lIrish:49,50:"lGaelic",lGaelic:50,51:"lGalician",lGalician:51,52:"lGuarani",lGuarani:52,53:"lGujarati",lGujarati:53,54:"lManx",lManx:54,55:"lHausa",lHausa:55,56:"lHebrew",lHebrew:56,57:"lHindi",lHindi:57,58:"lHiriMotu",lHiriMotu:58,59:"lCroatian",lCroatian:59,60:"lHaitian",lHaitian:60,61:"lHungarian",lHungarian:61,62:"lArmenian",lArmenian:62,63:"lHerero",lHerero:63,64:"lInterlingua",lInterlingua:64,65:"lIndonesian",lIndonesian:65,66:"lInterlingue",lInterlingue:66,67:"lIgbo",lIgbo:67,68:"lSichuanYi",lSichuanYi:68,69:"lInupiaq",lInupiaq:69,70:"lIdo",lIdo:70,71:"lIcelandic",lIcelandic:71,72:"lItalian",lItalian:72,73:"lInuktitut",lInuktitut:73,74:"lJapanese",lJapanese:74,75:"lJavanese",lJavanese:75,76:"lGeorgian",lGeorgian:76,77:"lKongo",lKongo:77,78:"lKikuyu",lKikuyu:78,79:"lKuanyama",lKuanyama:79,80:"lKazakh",lKazakh:80,81:"lKalaallisut",lKalaallisut:81,82:"lCentralKhmer",lCentralKhmer:82,83:"lKannada",lKannada:83,84:"lKorean",lKorean:84,85:"lKanuri",lKanuri:85,86:"lKashmiri",lKashmiri:86,87:"lKurdish",lKurdish:87,88:"lKomi",lKomi:88,89:"lCornish",lCornish:89,90:"lKirghiz",lKirghiz:90,91:"lLatin",lLatin:91,92:"lLuxembourgish",lLuxembourgish:92,93:"lGanda",lGanda:93,94:"lLimburgan",lLimburgan:94,95:"lLingala",lLingala:95,96:"lLao",lLao:96,97:"lLithuanian",lLithuanian:97,98:"lLubaKatanga",lLubaKatanga:98,99:"lLatvian",lLatvian:99,100:"lMalagasy",lMalagasy:100,101:"lMarshallese",lMarshallese:101,102:"lMaori",lMaori:102,103:"lMacedonian",lMacedonian:103,104:"lMalayalam",lMalayalam:104,105:"lMongolian",lMongolian:105,106:"lMarathi",lMarathi:106,107:"lMalay",lMalay:107,108:"lMaltese",lMaltese:108,109:"lBurmese",lBurmese:109,110:"lNauru",lNauru:110,111:"lNdebele",lNdebele:111,112:"lNepali",lNepali:112,113:"lNdonga",lNdonga:113,114:"lDutch",lDutch:114,115:"lNorwegian",lNorwegian:115,116:"lNavajo",lNavajo:116,117:"lChichewa",lChichewa:117,118:"lOccitan",lOccitan:118,119:"lOjibwa",lOjibwa:119,120:"lOromo",lOromo:120,121:"lOriya",lOriya:121,122:"lOssetian",lOssetian:122,123:"lPanjabi",lPanjabi:123,124:"lPali",lPali:124,125:"lPolish",lPolish:125,126:"lPushto",lPushto:126,127:"lPortuguese",lPortuguese:127,128:"lQuechua",lQuechua:128,129:"lRomansh",lRomansh:129,130:"lRundi",lRundi:130,131:"lRomanian",lRomanian:131,132:"lRussian",lRussian:132,133:"lKinyarwanda",lKinyarwanda:133,134:"lSanskrit",lSanskrit:134,135:"lSardinian",lSardinian:135,136:"lSindhi",lSindhi:136,137:"lNorthernSami",lNorthernSami:137,138:"lSango",lSango:138,139:"lSinhala",lSinhala:139,140:"lSlovak",lSlovak:140,141:"lSlovenian",lSlovenian:141,142:"lSamoan",lSamoan:142,143:"lShona",lShona:143,144:"lSomali",lSomali:144,145:"lAlbanian",lAlbanian:145,146:"lSerbian",lSerbian:146,147:"lSwati",lSwati:147,148:"lSotho",lSotho:148,149:"lSundanese",lSundanese:149,150:"lSwedish",lSwedish:150,151:"lSwahili",lSwahili:151,152:"lTamil",lTamil:152,153:"lTelugu",lTelugu:153,154:"lTajik",lTajik:154,155:"lThai",lThai:155,156:"lTigrinya",lTigrinya:156,157:"lTurkmen",lTurkmen:157,158:"lTagalog",lTagalog:158,159:"lTswana",lTswana:159,160:"lTonga",lTonga:160,161:"lTurkish",lTurkish:161,162:"lTsonga",lTsonga:162,163:"lTatar",lTatar:163,164:"lTwi",lTwi:164,165:"lTahitian",lTahitian:165,166:"lUighur",lUighur:166,167:"lUkrainian",lUkrainian:167,168:"lUrdu",lUrdu:168,169:"lUzbek",lUzbek:169,170:"lVenda",lVenda:170,171:"lVietnamese",lVietnamese:171,172:"lWalloon",lWalloon:172,173:"lWolof",lWolof:173,174:"lXhosa",lXhosa:174,175:"lYiddish",lYiddish:175,176:"lYoruba",lYoruba:176,177:"lZhuang",lZhuang:177,178:"lChinese",lChinese:178,179:"lZulu",lZulu:179},this.GetLanguageISO639_1Code=function(t){var e="";return 0===t?e="":1===t?e="aa":2===t?e="ab":3===t?e="ae":4===t?e="af":5===t?e="ak":6===t?e="am":7===t?e="an":8===t?e="ar":9===t?e="as":10===t?e="av":11===t?e="ay":12===t?e="az":13===t?e="ba":14===t?e="be":15===t?e="bg":16===t?e="bh":17===t?e="bi":18===t?e="bm":19===t?e="bn":20===t?e="bo":21===t?e="br":22===t?e="bd":23===t?e="ca":24===t?e="ce":25===t?e="ch":26===t?e="co":27===t?e="cr":28===t?e="cs":29===t?e="cu":30===t?e="cv":31===t?e="cy":32===t?e="da":33===t?e="de":34===t?e="dv":35===t?e="dz":36===t?e="ee":37===t?e="en":38===t?e="eo":39===t?e="es":40===t?e="et":41===t?e="eu":42===t?e="fa":43===t?e="ff":44===t?e="fi":45===t?e="fj":46===t?e="fo":47===t?e="fr":48===t?e="fy":49===t?e="ga":50===t?e="gd":51===t?e="gl":52===t?e="gn":53===t?e="gu":54===t?e="gv":55===t?e="ha":56===t?e="he":57===t?e="hi":58===t?e="ho":59===t?e="hr":60===t?e="ht":61===t?e="hu":62===t?e="hy":63===t?e="hz":64===t?e="ia":65===t?e="id":66===t?e="ie":67===t?e="ig":68===t?e="ii":69===t?e="ik":70===t?e="id":71===t?e="is":72===t?e="it":73===t?e="iu":74===t?e="ja":75===t?e="jv":76===t?e="ka":77===t?e="kg":78===t?e="ki":79===t?e="kj":80===t?e="kk":81===t?e="kl":82===t?e="km":83===t?e="kn":84===t?e="ko":85===t?e="kr":86===t?e="ks":87===t?e="ku":88===t?e="kv":89===t?e="kw":90===t?e="ky":91===t?e="la":92===t?e="lb":93===t?e="lg":94===t?e="li":95===t?e="ln":96===t?e="lo":97===t?e="lt":98===t?e="lu":99===t?e="lv":100===t?e="mg":101===t?e="mh":102===t?e="mi":103===t?e="mk":104===t?e="ml":105===t?e="mn":106===t?e="mr":107===t?e="ms":108===t?e="mt":109===t?e="my":110===t?e="na":111===t?e="nb":112===t?e="nd":113===t?e="ng":114===t?e="nl":115===t?e="no":116===t?e="nv":117===t?e="ny":118===t?e="oc":119===t?e="oj":120===t?e="om":121===t?e="or":122===t?e="os":123===t?e="pa":124===t?e="pi":125===t?e="pl":126===t?e="ps":127===t?e="pt":128===t?e="qu":129===t?e="rm":130===t?e="rn":131===t?e="ro":132===t?e="ru":133===t?e="rw":134===t?e="sa":135===t?e="sc":136===t?e="sd":137===t?e="se":138===t?e="sg":139===t?e="si":140===t?e="sk":141===t?e="sl":142===t?e="sm":143===t?e="sn":144===t?e="so":145===t?e="sq":146===t?e="sr":147===t?e="ss":148===t?e="st":149===t?e="su":150===t?e="sv":151===t?e="sw":152===t?e="ta":153===t?e="te":154===t?e="tg":155===t?e="th":156===t?e="ti":157===t?e="tk":158===t?e="tl":159===t?e="tn":160===t?e="to":161===t?e="tr":162===t?e="ts":163===t?e="tt":164===t?e="tw":165===t?e="ty":166===t?e="ug":167===t?e="uk":168===t?e="ur":169===t?e="uz":170===t?e="ve":171===t?e="vi":172===t?e="wa":173===t?e="wo":174===t?e="xh":175===t?e="yi":176===t?e="yo":177===t?e="za":178===t?e="zh":179===t&&(e="zu"),e}})),rtl.module("WEBLib.Menus",["System","Classes","SysUtils","WEBLib.Controls","WEBLib.Graphics","Web"],(function(){"use strict";var t=this,e=t.$impl;this.$rtti.$Class("TMainMenu"),this.$rtti.$Class("TMenuItem"),this.$rtti.$Class("TCustomMainMenu"),this.TMenuItemAutoFlag={0:"maAutomatic",maAutomatic:0,1:"maManual",maManual:1,2:"maParent",maParent:2},this.$rtti.$Enum("TMenuItemAutoFlag",{minvalue:0,maxvalue:2,ordtype:1,enumtype:this.TMenuItemAutoFlag}),this.TMenuBreak={0:"mbNone",mbNone:0,1:"mbBreak",mbBreak:1,2:"mbBarBreak",mbBarBreak:2},this.$rtti.$Enum("TMenuBreak",{minvalue:0,maxvalue:2,ordtype:1,enumtype:this.TMenuBreak}),this.$rtti.$Int("THelpContext",{minvalue:-2147483647,maxvalue:2147483647,ordtype:4}),this.$rtti.$inherited("TShortCut",rtl.word,{}),this.TMainMenuHamburgerMenuVisible={0:"hmAlways",hmAlways:0,1:"hmNever",hmNever:1,2:"hmResponsive",hmResponsive:2},this.$rtti.$Enum("TMainMenuHamburgerMenuVisible",{minvalue:0,maxvalue:2,ordtype:1,enumtype:this.TMainMenuHamburgerMenuVisible}),this.$rtti.$MethodVar("TMainMenuChangeEvent",{procsig:rtl.newTIProcSig([["Sender",pas.System.$rtti.TObject],["Source",this.$rtti.TMenuItem],["Rebuild",rtl.boolean]]),methodkind:0}),rtl.createClass(this,"TMenuItemList",pas.Classes.TList,(function(){this.GetItem=function(t){return rtl.getObject(this.Get(t))}})),rtl.createClass(this,"TMenuItem",pas.Classes.TComponent,(function(){this.$init=function(){pas.Classes.TComponent.$init.call(this),this.FOwner$1=null,this.FCaption="",this.FItems=null,this.FParentItem=null,this.FOnClick=null,this.FChecked=!1,this.FEnabled=!1,this.FDefault=!1,this.FAutoCheck=!1,this.FHint="",this.FAutoHotkeys=0,this.FRadioItem=!1,this.FGroupIndex=0,this.FVisible=!1,this.FShortCut=0,this.FBreak=0,this.FImageIndex=0,this.FAutoLineReduction=0,this.FHelpContext=0,this.FElementClassName="",this.FParentMenu=null},this.$final=function(){this.FOwner$1=void 0,this.FItems=void 0,this.FParentItem=void 0,this.FOnClick=void 0,this.FParentMenu=void 0,pas.Classes.TComponent.$final.call(this)},this.SetChecked=function(e){var i=null,s=null,n=null,r=null,a=0;if(this.FChecked!==e){if(this.FChecked=e,null!=(r=this.FParentMenu)){if(t.TMenuItem.isPrototypeOf(r)&&e)for(var o=0,l=(s=r).FItems.GetCount()-1;o<=l;o++)a=o,(n=s.FItems.GetItem(a)).FRadioItem&&n!==this&&n.SetChecked(!1);for(;!t.TCustomMainMenu.isPrototypeOf(r)&&null!=r;)r=r.FOwner}null!=(i=this.GetParentMenu())&&i.UpdateElement()}},this.SetCaption=function(t){var e=null;this.FCaption=t,null!=(e=this.GetParentMenu())&&e.UpdateElement()},this.SetImageIndex=function(t){var e=null;this.FImageIndex=t,null!=(e=this.GetParentMenu())&&e.UpdateElement()},this.SetEnabled=function(t){this.FEnabled!==t&&(this.FEnabled=t,this.GetParentMenu().UpdateElement())},this.GetCount=function(){return null===this.FItems?0:this.FItems.GetCount()},this.Create$1=function(e){return this.FParentMenu=null,t.TMainMenu.isPrototypeOf(e)&&(this.FParentMenu=e),pas.Classes.TComponent.Create$1.call(this,e),this.FAutoHotkeys=2,this.FAutoLineReduction=2,this.FImageIndex=-1,this.FHint="",this.FCaption="MenuItem",this.FChecked=!1,this.FEnabled=!0,this.FDefault=!1,this.FRadioItem=!1,this.FVisible=!0,this.FOwner$1=e,this},this.Destroy=function(){var t=0,e=null,i=null;if(e=this.GetParentMenu(),null!=this.FParentItem&&null!=e){e.BeginUpdate();for(var s=this.FParentItem.FItems.GetCount()-1;s>=0;s--)t=s,this.FParentItem.FItems.GetItem(t)===this&&this.FParentItem.FItems.Delete(t);e.EndUpdate()}if(null!=this.FItems)for(var n=this.FItems.GetCount()-1;n>=0;n--)t=n,(i=this.FItems.GetItem(t)).FParentItem=null,i=rtl.freeLoc(i),this.FItems.Delete(t);pas.Classes.TComponent.Destroy.call(this)},this.Assign=function(e){var i=0,s=null,n=null,r=null;if(t.TMenuItem.isPrototypeOf(e)&&(s=rtl.as(e,t.TMenuItem),this.FAutoCheck=s.FAutoCheck,this.FAutoHotkeys=s.FAutoHotkeys,this.FAutoLineReduction=s.FAutoLineReduction,this.FBreak=s.FBreak,this.FCaption=s.FCaption,this.FChecked=s.FChecked,this.FDefault=s.FDefault,this.FEnabled=s.FEnabled,this.FGroupIndex=s.FGroupIndex,this.FHelpContext=s.FHelpContext,this.FHint=s.FHint,this.FImageIndex=s.FImageIndex,this.FRadioItem=s.FRadioItem,this.FShortCut=s.FShortCut,this.FVisible=s.FVisible,this.FElementClassName=s.FElementClassName,r=this.GetParentMenu(),null!=this.FParentItem&&this.SetName(r.GetUniqueName(s.FCaption)),null!=s.FItems)){if(null!=this.FItems){for(var a=this.FItems.GetCount()-1;a>=0;a--)i=a,this.RemoveItem(this.GetParentMenu().FParent,this.FItems.GetItem(i));this.FItems.Clear()}else this.FItems=t.TMenuItemList.$create("Create$1");for(var o=0,l=s.FItems.GetCount()-1;o<=l;o++)i=o,(n=t.TMenuItem.$create("Create$1",[r.FOwner])).FParentMenu=r,n.FParentItem=this,n.Assign(s.FItems.GetItem(i)),this.FItems.Add(n)}},this.SetParentComponent=function(e){pas.Classes.TComponent.SetParentComponent.apply(this,arguments),this.FParentMenu=e,null!==e&&(t.TCustomMainMenu.isPrototypeOf(e)?e.FItems.IsChild(this)||e.FItems.Add(this):t.TMenuItem.isPrototypeOf(e)&&(e.IsChild(this)||e.Add(this)))},this.Add=function(t){this.Insert$1(this.GetCount(),t)},this.Insert$1=function(e,i){null===this.FItems&&(this.FItems=t.TMenuItemList.$create("Create$1")),this.FItems.Insert(e,i),i.FParentItem=this,null!=i.GetParentMenu()&&i.GetParentMenu().UpdateElement()},this.IsChild=function(t){var e=!1,i=0;if(e=!1,null==this.FItems)return e;for(var s=0,n=this.FItems.GetCount()-1;s<=n;s++)i=s,this.FItems.GetItem(i)===t&&(e=!0);return e},this.GetOwner=function(){return this.FOwner$1},this.GetParentMenu=function(){var e=null,i=null;for(e=null,i=this.FParentMenu;null!=i&&t.TMenuItem.isPrototypeOf(i);)i=i.FParentMenu;return null!=i&&(e=i),e},this.RemoveItem=function(t,e){var i=0;if(null!=e.FItems)for(var s=e.FItems.GetCount()-1;s>=0;s--)i=s,this.RemoveItem(t,e.FItems.GetItem(i));t.RemoveComponent(e)},this.Click=function(){var t=null;null!=this.FOnClick&&this.FOnClick(this),(t=this.GetParentMenu()).FIsPopupMenu&&null!=t.FLayer$1&&null==t.FContainer$1&&(t.FLayer$1.parentElement.removeChild(t.FLayer$1),t.FLayer$1=null)},rtl.addIntf(this,pas.System.IUnknown);var e=this.$rtti;e.addProperty("AutoCheck",0,rtl.boolean,"FAutoCheck","FAutoCheck",4,{Default:!1}),e.addProperty("AutoHotkeys",0,t.$rtti.TMenuItemAutoFlag,"FAutoHotkeys","FAutoHotkeys",4,{Default:t.TMenuItemAutoFlag.maParent}),e.addProperty("AutoLineReduction",0,t.$rtti.TMenuItemAutoFlag,"FAutoLineReduction","FAutoLineReduction",4,{Default:t.TMenuItemAutoFlag.maParent}),e.addProperty("Break",0,t.$rtti.TMenuBreak,"FBreak","FBreak",4,{Default:t.TMenuBreak.mbNone}),e.addProperty("Caption",2,rtl.string,"FCaption","SetCaption"),e.addProperty("Checked",2,rtl.boolean,"FChecked","SetChecked",4,{Default:!1}),e.addProperty("Default",0,rtl.boolean,"FDefault","FDefault",4,{Default:!1}),e.addProperty("Enabled",2,rtl.boolean,"FEnabled","SetEnabled",4,{Default:!0}),e.addProperty("GroupIndex",0,rtl.byte,"FGroupIndex","FGroupIndex",4,{Default:0}),e.addProperty("HelpContext",0,t.$rtti.THelpContext,"FHelpContext","FHelpContext",4,{Default:0}),e.addProperty("Hint",0,rtl.string,"FHint","FHint"),e.addProperty("ImageIndex",2,rtl.longint,"FImageIndex","SetImageIndex",4,{Default:-1}),e.addProperty("RadioItem",0,rtl.boolean,"FRadioItem","FRadioItem",4,{Default:!1}),e.addProperty("ShortCut",0,t.$rtti.TShortCut,"FShortCut","FShortCut",4,{Default:0}),e.addProperty("Visible",0,rtl.boolean,"FVisible","FVisible",4,{Default:!0}),e.addProperty("ElementClassName",0,pas["WEBLib.Controls"].$rtti.TElementClassName,"FElementClassName","FElementClassName"),e.addProperty("OnClick",0,pas["WEBLib.Controls"].$rtti.TNotifyEvent,"FOnClick","FOnClick")})),this.$rtti.$Class("TMainMenuAppearance"),rtl.createClass(this,"THamburgerMenu",pas.Classes.TPersistent,(function(){this.$init=function(){pas.Classes.TPersistent.$init.call(this),this.FOwner=null,this.FVisible=0,this.FCaption="",this.FBackgroundColor=0,this.FCaptionColor=0,this.FResponsiveMaxWidth=0},this.$final=function(){this.FOwner=void 0,pas.Classes.TPersistent.$final.call(this)},this.SetVisible=function(t){this.FVisible!==t&&(this.FVisible=t,this.FOwner.FOwner.UpdateElement())},this.SetBackgroundColor=function(t){this.FBackgroundColor!==t&&(this.FBackgroundColor=t,this.FOwner.FOwner.UpdateElement())},this.SetCaption=function(t){this.FCaption!==t&&(this.FCaption=t,this.FOwner.FOwner.UpdateElement())},this.SetCaptionColor=function(t){this.FCaptionColor!==t&&(this.FCaptionColor=t,this.FOwner.FOwner.UpdateElement())},this.SetResponsiveMaxWidth=function(t){this.FResponsiveMaxWidth!==t&&(this.FResponsiveMaxWidth=t,this.FOwner.FOwner.UpdateElement())},this.Create$1=function(t){return this.FBackgroundColor=12632256,this.FCaption="Menu",this.FCaptionColor=16777215,this.FVisible=2,this.FResponsiveMaxWidth=768,this.FOwner=t,this},this.Destroy=function(){pas.System.TObject.Destroy.call(this)},this.Assign=function(e){pas.Classes.TPersistent.Assign.apply(this,arguments),t.THamburgerMenu.isPrototypeOf(e)&&(this.FBackgroundColor=rtl.as(e,t.THamburgerMenu).FBackgroundColor,this.FCaption=rtl.as(e,t.THamburgerMenu).FCaption,this.FCaptionColor=rtl.as(e,t.THamburgerMenu).FCaptionColor,this.FVisible=rtl.as(e,t.THamburgerMenu).FVisible,this.FResponsiveMaxWidth=rtl.as(e,t.THamburgerMenu).FResponsiveMaxWidth)},this.GetOwner=function(){return this.FOwner};var e=this.$rtti;e.addProperty("Caption",2,rtl.string,"FCaption","SetCaption"),e.addProperty("CaptionColor",2,pas["WEBLib.Graphics"].$rtti.TColor,"FCaptionColor","SetCaptionColor",4,{Default:16777215}),e.addProperty("BackgroundColor",2,pas["WEBLib.Graphics"].$rtti.TColor,"FBackgroundColor","SetBackgroundColor",4,{Default:12632256}),e.addProperty("Visible",2,t.$rtti.TMainMenuHamburgerMenuVisible,"FVisible","SetVisible",4,{Default:t.TMainMenuHamburgerMenuVisible.hmResponsive}),e.addProperty("ResponsiveMaxWidth",2,rtl.longint,"FResponsiveMaxWidth","SetResponsiveMaxWidth",4,{Default:768})})),rtl.createClass(this,"TMainMenuAppearance",pas.Classes.TPersistent,(function(){this.$init=function(){pas.Classes.TPersistent.$init.call(this),this.FOwner=null,this.FBackgroundColor=0,this.FHoverFontColor=0,this.FHoverColor=0,this.FImageURLs=null,this.FHamburgerMenu=null,this.FImageSize=0,this.FSubmenuIndicator=""},this.$final=function(){this.FOwner=void 0,this.FImageURLs=void 0,this.FHamburgerMenu=void 0,pas.Classes.TPersistent.$final.call(this)},this.SetBackgroundColor=function(t){this.FBackgroundColor!==t&&(this.FBackgroundColor=t,this.FOwner.UpdateElement())},this.SetHoverColor=function(t){this.FHoverColor!==t&&(this.FHoverColor=t,this.FOwner.UpdateElement())},this.SetHoverFontColor=function(t){this.FHoverFontColor!==t&&(this.FHoverFontColor=t,this.FOwner.UpdateElement())},this.SetImageURLs=function(t){this.FImageURLs.Assign(t)},this.SetImageSize=function(t){this.FImageSize!==t&&(this.FImageSize=t,this.FOwner.UpdateElement())},this.SetSubmenuIndicator=function(t){this.FSubmenuIndicator!==t&&(this.FSubmenuIndicator=t,this.FOwner.UpdateElement())},this.HandleImageURLsChanged=function(t){this.FOwner.UpdateElement()},this.Create$1=function(e){return this.FBackgroundColor=15790320,this.FHoverColor=14120960,this.FHoverFontColor=197379,this.FHamburgerMenu=t.THamburgerMenu.$create("Create$1",[this]),this.FImageURLs=pas.Classes.TStringList.$create("Create$1"),this.FImageURLs.SetSkipLastLineBreak(!0),this.FImageURLs.FOnChange=rtl.createCallback(this,"HandleImageURLsChanged"),this.FImageSize=16,this.FSubmenuIndicator="&#9658;",this.FOwner=e,this},this.Destroy=function(){rtl.free(this,"FHamburgerMenu"),rtl.free(this,"FImageURLs"),pas.System.TObject.Destroy.call(this)},this.Assign=function(e){pas.Classes.TPersistent.Assign.apply(this,arguments),t.TMainMenuAppearance.isPrototypeOf(e)&&(this.FBackgroundColor=rtl.as(e,t.TMainMenuAppearance).FBackgroundColor,this.FHoverColor=rtl.as(e,t.TMainMenuAppearance).FHoverColor,this.FHoverFontColor=rtl.as(e,t.TMainMenuAppearance).FHoverFontColor,this.FHamburgerMenu.Assign(rtl.as(e,t.TMainMenuAppearance).FHamburgerMenu),this.FImageURLs.Assign(rtl.as(e,t.TMainMenuAppearance).FImageURLs),this.FImageSize=rtl.as(e,t.TMainMenuAppearance).FImageSize,this.FSubmenuIndicator=rtl.as(e,t.TMainMenuAppearance).FSubmenuIndicator)},this.GetOwner=function(){return this.FOwner};var e=this.$rtti;e.addProperty("BackgroundColor",2,pas["WEBLib.Graphics"].$rtti.TColor,"FBackgroundColor","SetBackgroundColor",4,{Default:15790320}),e.addProperty("HamburgerMenu",0,t.$rtti.THamburgerMenu,"FHamburgerMenu","FHamburgerMenu"),e.addProperty("HoverColor",2,pas["WEBLib.Graphics"].$rtti.TColor,"FHoverColor","SetHoverColor",4,{Default:14120960}),e.addProperty("HoverFontColor",2,pas["WEBLib.Graphics"].$rtti.TColor,"FHoverFontColor","SetHoverFontColor",4,{Default:197379}),e.addProperty("ImageURLs",2,pas.Classes.$rtti.TStringList,"FImageURLs","SetImageURLs"),e.addProperty("ImageSize",2,rtl.longint,"FImageSize","SetImageSize",4,{Default:16}),e.addProperty("SubmenuIndicator",2,rtl.string,"FSubmenuIndicator","SetSubmenuIndicator")})),rtl.createClass(this,"TCustomMainMenu",pas["WEBLib.Controls"].TCustomControl,(function(){this.$init=function(){pas["WEBLib.Controls"].TCustomControl.$init.call(this),this.FItems=null,this.FOnChange=null},this.$final=function(){this.FItems=void 0,this.FOnChange=void 0,pas["WEBLib.Controls"].TCustomControl.$final.call(this)},this.Loaded=function(){pas["WEBLib.Controls"].TCustomControl.Loaded.call(this),this.IsUpdating()||null!=this.GetElementHandle()&&this.UpdateElement()},this.UpdateElement=function(){pas["WEBLib.Controls"].TControl.UpdateElement.call(this),this.IsUpdating()},this.GetUniqueName=function(t){var i="",s=0,n=0,r=!1;n=1,""===t&&(t=this.FName+"item"),t=e.MakeValidName(t);do{i=t+pas.SysUtils.IntToStr(n),r=!0;for(var a=0,o=this.FOwner.GetComponentCount()-1;a<=o;a++)if(s=a,this.FOwner.GetComponent(s).FName===i){r=!1,n+=1;break}}while(!r);return i},this.SetName=function(t){pas["WEBLib.Controls"].TCustomControl.SetName.apply(this,arguments),this.IsUpdating()||0 in this.FComponentState||this.UpdateElement()},this.CreateInitialize=function(){pas["WEBLib.Controls"].TCustomControl.CreateInitialize.call(this),this.FItems=t.TMenuItem.$create("Create$1",[this]),this.FItems.FParentMenu=this,this.SetWidthStyle(2),this.SetHeight(30)},this.Destroy=function(){rtl.free(this,"FItems"),pas["WEBLib.Controls"].TCustomControl.Destroy.call(this)},rtl.addIntf(this,pas["WEBLib.Controls"].IControl),rtl.addIntf(this,pas.System.IUnknown);var i=this.$rtti;i.addProperty("Items",0,t.$rtti.TMenuItem,"FItems",""),i.addProperty("OnChange",0,t.$rtti.TMainMenuChangeEvent,"FOnChange","FOnChange")})),rtl.createClass(this,"TMainMenu",this.TCustomMainMenu,(function(){this.$init=function(){t.TCustomMainMenu.$init.call(this),this.FMenu=null,this.FMainMenu=!1,this.FMenuIndex=0,this.FAppearance=null,this.FContainer$1=null,this.FIsPopupMenu=!1,this.FShowPopup=!1,this.FZIndex="",this.FElementItemClassName="",this.FDocClickPtr=null,this.FLayer$1=null},this.$final=function(){this.FMenu=void 0,this.FAppearance=void 0,this.FContainer$1=void 0,this.FLayer$1=void 0,t.TCustomMainMenu.$final.call(this)},this.HandleChange=function(t){var e=null,i=null;return!0,this.FIsPopupMenu&&(this.FShowPopup=!1,this.UpdateElement()),(e=t.target).hasAttribute("id")||(e=e.parentElement),null!=(i=this.GetItemByName(this.FItems,e.id))&&(i.FAutoCheck&&i.SetChecked(!i.FChecked),null!=this.FOnChange&&this.FOnChange(this,i,!1),i.Click()),!0},this.HandleDocClick=function(t){var e=null;return!0,this.FIsPopupMenu&&(null!=(e=this.GetElementHandle().getElementsByClassName("popup-menu"))&&null!=e.item(0)&&setTimeout((function(){e[0].style.display="none"}),25),null!=this.FLayer$1&&(this.FLayer$1.parentElement.removeChild(this.FLayer$1),this.FLayer$1=null)),!0},this.Loaded=function(){t.TCustomMainMenu.Loaded.call(this),this.IsUpdating()||(null==this.FContainer$1&&pas["WEBLib.Forms"].TCustomForm.isPrototypeOf(this.FParent)&&rtl.as(this.FParent,pas["WEBLib.Forms"].TCustomForm).FMenu===this&&(this.FContainer$1=this.FParent),null!=this.GetElementHandle()&&this.UpdateElement())},this.UpdateElement=function(){var e,i="",s="",n="",r="",a="",o=null,l=null,h=null,d=null,u=null,c=null,F=null;t.TCustomMainMenu.UpdateElement.call(this),this.IsUpdating()||null==this.GetElementHandle()&&null==this.FContainer$1||(null!=this.FContainer$1?(o=this.FContainer$1.GetElementHandle(),this.SetVisible(!1)):((o=this.GetElementHandle()).style.setProperty("top",pas.SysUtils.IntToStr(this.GetTop())+"px"),o.style.setProperty("left",pas.SysUtils.IntToStr(this.GetLeft())+"px"),4 in this.FComponentState&&null==this.FContainer$1&&this.GetElementHandle().style.setProperty("background-color","silver")),null!=this.FMenu&&this.FMenu.parentElement.removeChild(this.FMenu),3 in this.FComponentState||(this.FMenu=document.createElement("NAV"),this.FMenu.setAttribute("id",this.GetID()+"menu"),this.FMenu.innerHTML="",null!=this.FContainer$1&&(this.FMenu.style.setProperty("top","0"),this.FMenu.style.setProperty("left","0"),this.FMenu.style.setProperty("position","absolute"),this.FMenu.style.setProperty("width","100%"),this.FMenu.style.setProperty("z-index",this.FZIndex)),o.style.setProperty("overflow","visible"),0!==this.FAppearance.FHamburgerMenu.FVisible&&(a=this.FShowPopup?"block":"none",n="  #"+this.GetID()+"menu .main-menu {\r    display: block;\r  }\r  #"+this.GetID()+"menu #toggle-menu {\r    display: none;\r  }\r  #"+this.GetID()+"menu ul span.drop-label {\r    display: inline-block;\r  }\r  #"+this.GetID()+"menu li {\r    float: left;\r    border-width: 0 1px 0 0;\r  }\r  #"+this.GetID()+"menu .popup-menu li, \r  #"+this.GetID()+"menu .sub-menu li {\r    float: none;\r  }\r  #"+this.GetID()+"menu .sub-menu {\r    top: 100%;\r  }\r  #"+this.GetID()+"menu .popup-menu { \r    top: 0;\r  }\r  #"+this.GetID()+"menu .popup-menu, \r  #"+this.GetID()+"menu .sub-menu {\r    border-width: 0;\r    margin: 0;\r    position: absolute;\r    left: 0;\r    min-width: 12em;\r    z-index: 9999999;\r\t   white-space: nowrap;\r  }\r  #"+this.GetID()+"menu .sub-menu {\r    top: 100%;\r  }\r  #"+this.GetID()+"menu .popup-menu { \r    display: "+a+";\r  }\r  #"+this.GetID()+"menu .sub-menu,\r  #"+this.GetID()+'menu input[type="checkbox"]:checked + .popup-menu,\r  #'+this.GetID()+'menu input[type="checkbox"]:checked + .sub-menu {\r    display: none;\r  }\r  #'+this.GetID()+"menu .popup-menu li, \r  #"+this.GetID()+"menu .sub-menu li {\r    border-width: 1px;\r  }\r  #"+this.GetID()+"menu .popup-menu .sub-menu, \r  #"+this.GetID()+"menu .sub-menu .sub-menu {\r    top: 0;\r    left: 100%;\r  }\r  #"+this.GetID()+'menu li:hover > input[type="checkbox"] + .popup-menu, \r  #'+this.GetID()+'menu li:hover > input[type="checkbox"] + .sub-menu {\r    display: block;\r  }\r',2===this.FAppearance.FHamburgerMenu.FVisible&&(n="@media only screen and (min-width: "+pas.SysUtils.IntToStr(this.FAppearance.FHamburgerMenu.FResponsiveMaxWidth)+"px) {\r"+n+"}")),this.FAppearance.FImageSize>0&&(r="  width: "+pas.SysUtils.IntToStr(this.FAppearance.FImageSize)+"px;\r  height: "+pas.SysUtils.IntToStr(this.FAppearance.FImageSize)+"px;\r"),i="#"+this.GetID()+"menu ul {\r  margin: 0;\r  padding: 0;\r}\r#"+this.GetID()+"menu .main-menu {\r  display: none;\r}\r#"+this.GetID()+"menu .popup-menu {\r  display: block;\r}\r#"+this.GetID()+"menu label img.icon,#"+this.GetID()+"menu label span.checked {\r"+r+"  margin-right: 10px;\r  pointer-events: none;\r}\r#"+this.GetID()+"tm:checked + .main-menu {\r  display: block;\r}\r#"+this.GetID()+'menu input[type="checkbox"],\r#'+this.GetID()+"menu ul span.drop-label {\r  display: none;\r}\r#"+this.GetID()+"menu li,\r#"+this.GetID()+"menu #toggle-menu,\r#"+this.GetID()+"menu .popup-menu,\r#"+this.GetID()+"menu .sub-menu {\r  border-width: 1px;\r  border-style: solid;\r  border-color: rgba(0, 0, 0, .05);\r  border-bottom: 0px;\r  border-top: 0px;\r}\r#"+this.GetID()+"menu li,\r#"+this.GetID()+"menu #toggle-menu {\r  border-width: 0 0 3px;\r}\r#"+this.GetID()+"menu .popup-menu,\r#"+this.GetID()+"menu .sub-menu {\r  border-width: 1px 1px 0;\r  margin: 0 1em;\r}\r#"+this.GetID()+"menu .popup-menu li:first-child,\r#"+this.GetID()+"menu .sub-menu li:first-child {\r  border-top: 1px solid;\r  border-color: rgba(0, 0, 0, .05);\r}\r#"+this.GetID()+"menu .popup-menu li:last-child,\r#"+this.GetID()+"menu .sub-menu li:last-child {\r  border-bottom: 1px solid;\r  border-color: rgba(0, 0, 0, .05);\r}\r#"+this.GetID()+"menu li,\r#"+this.GetID()+"menu #toggle-menu,\r#"+this.GetID()+"menu li label {\r  position: relative;\r  display: block;\r}\r#"+this.GetID()+"menu #toggle-menu,\r#"+this.GetID()+"menu li label { \r  padding: 0.75em 1.5em;\r  text-decoration: none;\r}\r#"+this.GetID()+"menu li span.menu-separator { \r  display: block;\r  width: 100%;\r  height: 1px;\r  background-color: rgba(0, 0, 0, .05);\r}\r#"+this.GetID()+"menu .popup-menu, \r#"+this.GetID()+"menu .sub-menu {\r  display: none;\r}\r#"+this.GetID()+'menu input[type="checkbox"]:checked + .popup-menu,\r#'+this.GetID()+'menu input[type="checkbox"]:checked + .sub-menu {\r  display: block;\r  z-index: 3000;\r}\r#'+this.GetID()+"menu span.drop-icon {\r  margin-left: 10px;}\r#"+this.GetID()+"menu span.hamburger-icon {\r  float: right;\r  padding: 0;\r  margin: 0;\r  font-weight: 900;\r}\r@media only screen and (max-width: 64em) and (min-width: 52.01em) {\r  #"+this.GetID()+"menu li {\r    width: auto;\r  }\r  #"+this.GetID()+"menu .sub-menu li {\r    width: auto;\r  }\r}\r",s="",""===this.FElementClassName&&(s="#"+this.GetID()+"menu .popup-menu, \r#"+this.GetID()+"menu .sub-menu {\r  background-color: "+pas["WEBLib.Graphics"].ColorToHTML(this.FAppearance.FBackgroundColor)+";\r}\r@media only screen and (max-width: 64em) and (min-width: 52.01em) {\r#"+this.GetID()+"menu .sub-menu {\r  background-color: "+pas["WEBLib.Graphics"].ColorToHTML(this.FAppearance.FHamburgerMenu.FBackgroundColor)+";\r}\r}\r#"+this.GetID()+"menu li,\r#"+this.GetID()+"menu #toggle-menu,\r#"+this.GetID()+"menu li label {\r}\r#"+this.GetID()+"menu #toggle-menu {\r  background-color: "+pas["WEBLib.Graphics"].ColorToHTML(this.FAppearance.FHamburgerMenu.FBackgroundColor)+";\r  color: "+pas["WEBLib.Graphics"].ColorToHTML(this.FAppearance.FHamburgerMenu.FCaptionColor)+";\r}\r#"+this.GetID()+"menu .main-menu li label {\r  background-color: "+pas["WEBLib.Graphics"].ColorToHTML(this.FAppearance.FBackgroundColor)+";\r}\r#"+this.GetID()+"menu li label:hover {\r  background-color: "+pas["WEBLib.Graphics"].ColorToHTML(this.FAppearance.FHoverColor)+";\r  color: "+pas["WEBLib.Graphics"].ColorToHTML(this.FAppearance.FHoverFontColor)+";\r}\r#"+this.GetID()+"menu .popup-menu label:hover, \r#"+this.GetID()+"menu .sub-menu label:hover {\r  background-color: "+pas["WEBLib.Graphics"].ColorToHTML(this.FAppearance.FHoverColor)+";\r  color: "+pas["WEBLib.Graphics"].ColorToHTML(this.FAppearance.FHoverFontColor)+";\r}\r"),i=i+s+n,this.FMainMenu=!0,this.FMenuIndex=0,(c=document.createElement("STYLE")).innerHTML=i,(F=document.createElement("SCRIPT")).innerHTML="function "+this.GetID()+'MenuClick(ctrl){  el = ctrl.parentElement.parentElement;  el.style.display = "none";  setTimeout(function(){el.style.removeProperty("display")}, 25);}function '+this.GetID()+'MenuOut(ctrl){  menuel = document.getElementById("'+this.GetID()+'");  if(menuel) {     popupel = menuel.getElementsByClassName("popup-menu");    if(popupel)       setTimeout(function(){popupel[0].style.display = "none"}, 25);  }}',(l=document.createElement("LABEL")).setAttribute("for",this.GetID()+"tm"),l.setAttribute("id","toggle-menu"),l.innerHTML=this.FAppearance.FHamburgerMenu.FCaption,h=document.createElement("SPAN"),""!==this.FElementItemClassName?h.setAttribute("class",this.FElementItemClassName):h.setAttribute("class","drop-label"),l.appendChild(h),(d=document.createElement("SPAN")).setAttribute("class","hamburger-icon"),d.innerHTML="&#9776;",h.appendChild(d),(u=document.createElement("INPUT")).setAttribute("type","checkbox"),u.setAttribute("id",this.GetID()+"tm"),this.FMenu.appendChild(c),this.FMenu.appendChild(F),this.FMenu.appendChild(l),this.FMenu.appendChild(u),null!==(e=this.GetMenuSource(this.FItems))&&this.FMenu.appendChild(e),o.appendChild(this.FMenu)))},this.GetMenuSource=function(t){var i=null,s=0,n=null,r="",a=null,o=null,l=null,h=null,d=0,u="";if(i=null,null!=t.FItems&&t.FItems.GetCount()>0){i=document.createElement("UL"),this.FMainMenu?(this.FMainMenu=!1,r=this.FIsPopupMenu?"popup-menu":"main-menu"):r="sub-menu",this.FMenuIndex=this.FMenuIndex+1,i.setAttribute("class",r);for(var c=0,F=t.FItems.GetCount()-1;c<=F;c++)s=c,d+=1,""===(n=t.FItems.GetItem(s)).FName&&(u=pas.SysUtils.StringReplace(n.FCaption," ","",rtl.createSet(0)),""===(u=e.MakeValidName(u))&&(u="MenuItem"+pas.SysUtils.IntToStr(d)),n.SetName(u+pas.SysUtils.IntToStr(d))),n.FVisible&&(a=document.createElement("LI"),"-"!==n.FCaption?(o=document.createElement("LABEL"),""!==this.FElementItemClassName?o.setAttribute("class",this.FElementItemClassName):o.setAttribute("class","drop-label"),o.setAttribute("title",n.FHint),n.FImageIndex>=0&&this.FAppearance.FImageURLs.GetCount()>n.FImageIndex?o.innerHTML='<img class="icon" src="'+this.FAppearance.FImageURLs.Get(n.FImageIndex)+'">':n.FChecked&&(n.FRadioItem?o.innerHTML='<span class="checked">&#9679;</span>':o.innerHTML='<span class="checked">&#10004;</span>'),o.innerHTML=o.innerHTML+n.FCaption):((o=document.createElement("SPAN")).setAttribute("class","menu-separator"),o.innerHTML=""),null!=n.FItems&&n.FItems.GetCount()>0?((h=document.createElement("SPAN")).setAttribute("class","drop-icon"),h.innerHTML=this.FAppearance.FSubmenuIndicator,o.setAttribute("for","sm"+pas.SysUtils.IntToStr(this.FMenuIndex)),o.appendChild(h),n.FEnabled||o.style.setProperty("color","gray"),(l=document.createElement("INPUT")).setAttribute("type","checkbox"),l.setAttribute("id","sm"+pas.SysUtils.IntToStr(this.FMenuIndex)),a.appendChild(o),a.appendChild(l),n.FEnabled&&a.appendChild(this.GetMenuSource(n))):(o.setAttribute("for",this.GetID()+"tm"),o.setAttribute("id",n.FName),n.FEnabled?("sub-menu"===r&&n.FEnabled&&o.setAttribute("onMouseUp",this.GetID()+"MenuClick(this);"),o.addEventListener("click",rtl.createSafeCallback(this,"HandleChange"))):o.style.setProperty("color","gray"),a.appendChild(o)),i.appendChild(a))}return i},this.GetItemByName=function(t,e){var i=null,s=0,n=null;if(i=null,null!=t.FItems)for(var r=0,a=t.FItems.GetCount()-1;r<=a;r++){if(s=r,(n=t.FItems.GetItem(s)).FName===e)return i=n,null!=n.FOnClick&&(i.FOnClick=n.FOnClick),i;null==i&&(i=this.GetItemByName(n,e))}return i},this.ClearMethodPointers=function(){pas["WEBLib.Controls"].TControl.ClearMethodPointers.call(this),this.FDocClickPtr=null},this.CreateInitialize=function(){t.TCustomMainMenu.CreateInitialize.call(this),this.FAppearance=t.TMainMenuAppearance.$create("Create$1",[this]),this.FContainer$1=null,this.FMainMenu=!0,this.FMenuIndex=0,this.FIsPopupMenu=!1,this.FShowPopup=!1,this.SetTop(0),this.SetLeft(0),this.SetWidth(100),4 in this.FComponentState&&(this.SetElementPosition(1),this.SetWidthPercent(100),this.SetWidthStyle(0))},this.CreateElement=function(){var t=null,e=null;return 4 in this.FComponentState?(t=document.createElement("DIV"),(e=document.createElement("DIV")).innerHTML="TWebMainMenu",this.SetBorderStyle(1),e.setAttribute("align","center"),e.style.setProperty("border","1px solid gray"),e.style.setProperty("vertical-align","middle"),e.style.setProperty("display","table-cell"),t.appendChild(e)):(t=document.createElement("DIV"),this.FIsPopupMenu&&(this.FDocClickPtr=rtl.createCallback(this,"HandleDocClick"))),this.FZIndex=pas["WEBLib.Forms"].Application.MaxZIndexStr(),pas["WEBLib.Forms"].Application.ChangeMaxZIndex(1),t},this.Destroy=function(){rtl.free(this,"FAppearance"),t.TCustomMainMenu.Destroy.call(this)},rtl.addIntf(this,pas["WEBLib.Controls"].IControl),rtl.addIntf(this,pas.System.IUnknown);var i=this.$rtti;i.addProperty("Appearance",0,t.$rtti.TMainMenuAppearance,"FAppearance","FAppearance"),i.addProperty("Container",0,pas["WEBLib.Controls"].$rtti.TControl,"FContainer$1","FContainer$1"),i.addProperty("ElementFont",2,pas["WEBLib.Controls"].$rtti.TElementFont,"FElementFont","SetElementFont",4,{Default:pas["WEBLib.Controls"].TElementFont.efProperty}),i.addProperty("ElementClassName",2,pas["WEBLib.Controls"].$rtti.TElementClassName,"FElementClassName","SetElementClassName"),i.addProperty("ElementItemClassName",0,pas["WEBLib.Controls"].$rtti.TElementClassName,"FElementItemClassName","FElementItemClassName"),i.addProperty("Font",2,pas["WEBLib.Graphics"].$rtti.TFont,"FFont","SetFont"),i.addProperty("ParentFont",2,rtl.boolean,"FParentFont","SetParentFont",4,{Default:!0})})),rtl.createClass(this,"TPopupMenu",this.TMainMenu,(function(){this.$init=function(){t.TMainMenu.$init.call(this),this.FOnPopup=null},this.$final=function(){this.FOnPopup=void 0,t.TMainMenu.$final.call(this)},this.Create$1=function(t){return pas["WEBLib.Controls"].TControl.Create$1.apply(this,arguments),pas["WEBLib.Controls"].TControl.isPrototypeOf(t)&&this.SetParent(t),this},this.CreateInitialize=function(){t.TMainMenu.CreateInitialize.call(this),this.FAppearance.FHamburgerMenu.SetVisible(1),this.FIsPopupMenu=!0},this.Popup=function(t,e){var i=null,s=null,n=!1;null!=this.FOnPopup&&this.FOnPopup(this),this.SetTop(e),this.SetLeft(t),null!=(i=pas["WEBLib.Forms"].GetParentForm(this))&&(this.FLayer$1=i.CreateLayer(),i.FPopup?i.GetElementHandle().appendChild(this.FLayer$1):(n=!1,""!==i.FFormContainer&&null!=(s=document.getElementById(i.FFormContainer))&&(s.appendChild(this.FLayer$1),n=!0),n||null!=this.FContainer$1||document.body.appendChild(this.FLayer$1)),this.FLayer$1.style.setProperty("z-index",pas.SysUtils.IntToStr(pas["WEBLib.Forms"].Application.FMaxZIndex-1)),this.FLayer$1.addEventListener("click",this.FDocClickPtr)),this.FShowPopup=!0,this.GetElementHandle().style.setProperty("z-index",pas.SysUtils.IntToStr(pas["WEBLib.Forms"].Application.FMaxZIndex)),this.UpdateElement(),this.FShowPopup=!1},rtl.addIntf(this,pas["WEBLib.Controls"].IControl),rtl.addIntf(this,pas.System.IUnknown),this.$rtti.addProperty("OnPopup",0,pas["WEBLib.Controls"].$rtti.TNotifyEvent,"FOnPopup","FOnPopup")})),rtl.createClass(this,"TWebCustomControl",pas["WEBLib.Controls"].TCustomControl,(function(){this.$init=function(){pas["WEBLib.Controls"].TCustomControl.$init.call(this),this.FPopupMenu=null},this.$final=function(){this.FPopupMenu=void 0,pas["WEBLib.Controls"].TCustomControl.$final.call(this)},this.HandleDoContextMenu=function(t){var e=!1,i=pas.Types.TPoint.$new(),s=null;return pas["WEBLib.Controls"].TControl.HandleDoContextMenu.apply(this,arguments),null!=this.FPopupMenu&&(t.stopPropagation(),t.preventDefault(),i.$assign(pas.Types.Point(Math.round(t.clientX),Math.round(t.clientY))),null!=this.FPopupMenu.FOwner&&null!=this.FPopupMenu.FOwner.GetContainer()&&(s=this.FPopupMenu.FOwner.GetContainer().getBoundingClientRect(),i.x=i.x-Math.round(s.left),i.y=i.y-Math.round(s.top)),this.FPopupMenu.Popup(i.x,i.y),e=!0),e},this.Notification=function(t,e){pas.Classes.TComponent.Notification.apply(this,arguments),1===e&&t===this.FPopupMenu&&(this.FPopupMenu=null)},rtl.addIntf(this,pas["WEBLib.Controls"].IControl),rtl.addIntf(this,pas.System.IUnknown)})),t.$implcode=function(){rtl.createClass(e,"TCrackedApplication",pas["WEBLib.Forms"].TApplication,(function(){rtl.addIntf(this,pas["WEBLib.Controls"].IControl),rtl.addIntf(this,pas.System.IUnknown)})),rtl.createClass(e,"TCrackedForm",pas["WEBLib.Forms"].TForm,(function(){rtl.addIntf(this,pas["WEBLib.Controls"].IControl),rtl.addIntf(this,pas.System.IUnknown)}));var t=rtl.createSet(null,65,90,null,97,122,95),i=rtl.unionSet(t,rtl.createSet(null,48,57));e.MakeValidName=function(t){var e="",s=0;e="";for(var n=1,r=t.length;n<=r;n++)s=n,t.charCodeAt(s-1)in i&&(e+=t.charAt(s-1));return e}}}),["Types","WEBLib.Forms"]),rtl.module("Rtl.BrowserLoadHelper",["System","Classes","SysUtils","JS","Web"],(function(){"use strict";var t=this;rtl.createClass(this,"TBrowserLoadHelper",pas.Classes.TLoadHelper,(function(){})),t.$init=function(){pas.Classes.SetLoadHelperClass(t.TBrowserLoadHelper)}})),rtl.module("WEBLib.Forms",["System","Classes","Types","SysUtils","WEBLib.Graphics","WEBLib.Controls","WEBLib.Modules","WEBLib.Lang","WEBLib.Menus","Web","JS","Rtl.BrowserLoadHelper"],(function(){"use strict";var t=this,e=t.$impl;this.idOK=1,this.idCancel=2,this.idAbort=3,this.idRetry=4,this.idIgnore=5,this.idYes=6,this.idNo=7,this.idClose=8,this.idHelp=9,this.idContinue=11,this.mrNone=0,this.mrOk=1,this.mrCancel=2,this.mrAbort=3,this.mrRetry=4,this.mrIgnore=5,this.mrYes=6,this.mrNo=7,this.mrClose=8,this.mrHelp=9,this.mrContinue=11,this.mrAll=12,this.mrNoToAll=13,this.mrYesToAll=14,this.rgiFirst=-1024,this.igiLast=511,this.clTMSBlue=14917120,this.$rtti.$Int("TConstraintSize",{minvalue:0,maxvalue:2147483647,ordtype:5}),this.TCloseAction={0:"caNone",caNone:0,1:"caHide",caHide:1,2:"caFree",caFree:2,3:"caMinimize",caMinimize:3},this.$rtti.$Enum("TCloseAction",{minvalue:0,maxvalue:3,ordtype:1,enumtype:this.TCloseAction}),this.TFormStyle={0:"fsNormal",fsNormal:0,1:"fsStayOnTop",fsStayOnTop:1},this.$rtti.$Enum("TFormStyle",{minvalue:0,maxvalue:1,ordtype:1,enumtype:this.TFormStyle}),this.TNavigationTarget={0:"ntBlank",ntBlank:0,1:"ntPage",ntPage:1},this.$rtti.$Int("TGestureID",{minvalue:-1024,maxvalue:511,ordtype:2}),this.TInteractiveGestureFlag={0:"gfBegin",gfBegin:0,1:"gfInertia",gfInertia:1,2:"gfEnd",gfEnd:2},this.$rtti.$Enum("TInteractiveGestureFlag",{minvalue:0,maxvalue:2,ordtype:1,enumtype:this.TInteractiveGestureFlag}),this.$rtti.$Set("TInteractiveGestureFlags",{comptype:this.$rtti.TInteractiveGestureFlag}),this.TMouseActivate={0:"maDefault",maDefault:0,1:"maActivate",maActivate:1,2:"maActivateAndEat",maActivateAndEat:2,3:"maNoActivate",maNoActivate:3,4:"maNoActivateAndEat",maNoActivateAndEat:4},this.$rtti.$Enum("TMouseActivate",{minvalue:0,maxvalue:4,ordtype:1,enumtype:this.TMouseActivate}),this.TScreenOrientation={0:"soPortrait",soPortrait:0,1:"soLandscape",soLandscape:1},this.$rtti.$Enum("TScreenOrientation",{minvalue:0,maxvalue:1,ordtype:1,enumtype:this.TScreenOrientation}),this.TApplicationColorScheme={0:"csNoScheme",csNoScheme:0,1:"csLight",csLight:1,2:"csDark",csDark:2},rtl.recNewT(this,"TSmallPoint",(function(){this.x=0,this.y=0,this.$eq=function(t){return this.x===t.x&&this.y===t.y},this.$assign=function(t){return this.x=t.x,this.y=t.y,this};var e=t.$rtti.$Record("TSmallPoint",{},this);e.addField("x",rtl.smallint),e.addField("y",rtl.smallint)})),rtl.recNewT(this,"TAlignInfo",(function(){this.AlignList=null,this.ControlIndex=0,this.Align=0,this.Scratch=0,this.$eq=function(t){return this.AlignList===t.AlignList&&this.ControlIndex===t.ControlIndex&&this.Align===t.Align&&this.Scratch===t.Scratch},this.$assign=function(t){return this.AlignList=t.AlignList,this.ControlIndex=t.ControlIndex,this.Align=t.Align,this.Scratch=t.Scratch,this};var e=t.$rtti.$Record("TAlignInfo",{},this);e.addField("AlignList",pas.Classes.$rtti.TList),e.addField("ControlIndex",rtl.longint),e.addField("Align",pas["WEBLib.Controls"].$rtti.TAlign),e.addField("Scratch",rtl.longint)})),rtl.recNewT(this,"TGestureEventInfo",(function(){this.GestureID=0,this.Angle=0,this.Distance=0,this.$new=function(){var e=Object.create(this);return e.Location=pas.Types.TPoint.$new(),e.Flags={},e.InertiaVector=t.TSmallPoint.$new(),e.TapLocation=t.TSmallPoint.$new(),e},this.$eq=function(t){return this.GestureID===t.GestureID&&this.Location.$eq(t.Location)&&rtl.eqSet(this.Flags,t.Flags)&&this.Angle===t.Angle&&this.InertiaVector.$eq(t.InertiaVector)&&this.Distance===t.Distance&&this.TapLocation.$eq(t.TapLocation)},this.$assign=function(t){return this.GestureID=t.GestureID,this.Location.$assign(t.Location),this.Flags=rtl.refSet(t.Flags),this.Angle=t.Angle,this.InertiaVector.$assign(t.InertiaVector),this.Distance=t.Distance,this.TapLocation.$assign(t.TapLocation),this};var e=t.$rtti.$Record("TGestureEventInfo",{},this);e.addField("GestureID",t.$rtti.TGestureID),e.addField("Location",pas.Types.$rtti.TPoint),e.addField("Flags",t.$rtti.TInteractiveGestureFlags),e.addField("Angle",rtl.double),e.addField("InertiaVector",t.$rtti.TSmallPoint),e.addField("Distance",rtl.longint),e.addField("TapLocation",t.$rtti.TSmallPoint)})),this.$rtti.$MethodVar("TCloseEvent",{procsig:rtl.newTIProcSig([["Sender",pas.System.$rtti.TObject],["Action",this.$rtti.TCloseAction,1]]),methodkind:0}),this.$rtti.$MethodVar("TCloseQueryEvent",{procsig:rtl.newTIProcSig([["Sender",pas.System.$rtti.TObject],["CanClose",rtl.boolean,1]]),methodkind:0}),this.$rtti.$MethodVar("TOrientationChangeEvent",{procsig:rtl.newTIProcSig([["Sender",pas.System.$rtti.TObject],["AOrientation",this.$rtti.TScreenOrientation]]),methodkind:0}),this.$rtti.$MethodVar("TBeforeUnloadEvent",{procsig:rtl.newTIProcSig([["Sender",pas.System.$rtti.TObject],["AMessage",rtl.string,1]]),methodkind:0}),this.$rtti.$MethodVar("TAlignInsertBeforeEvent",{procsig:rtl.newTIProcSig([["Sender",pas["WEBLib.Controls"].$rtti.TWinControl],["C1",pas["WEBLib.Controls"].$rtti.TControl],["C2",pas["WEBLib.Controls"].$rtti.TControl]],rtl.boolean),methodkind:1}),this.$rtti.$MethodVar("TAlignPositionEvent",{procsig:rtl.newTIProcSig([["Sender",pas["WEBLib.Controls"].$rtti.TWinControl],["Control",pas["WEBLib.Controls"].$rtti.TControl],["NewLeft",rtl.longint,1],["NewTop",rtl.longint,1],["NewWidth",rtl.longint,1],["NewHeight",rtl.longint,1],["AlignRect",pas.Types.$rtti.TRect,1],["AlignInfo",this.$rtti.TAlignInfo]]),methodkind:0}),this.$rtti.$MethodVar("TCanResizeEvent",{procsig:rtl.newTIProcSig([["Sender",pas.System.$rtti.TObject],["NewWidth",rtl.longint,1],["NewHeight",rtl.longint,1],["Resize",rtl.boolean,1]]),methodkind:0}),this.$rtti.$MethodVar("TConstrainedResizeEvent",{procsig:rtl.newTIProcSig([["Sender",pas.System.$rtti.TObject],["MinWidth",rtl.longint,1],["MinHeight",rtl.longint,1],["MaxWidth",rtl.longint,1],["MaxHeight",rtl.longint,1]]),methodkind:0}),this.$rtti.$MethodVar("TContextPopupEvent",{procsig:rtl.newTIProcSig([["Sender",pas.System.$rtti.TObject],["MousePos",pas.Types.$rtti.TPoint],["Handled",rtl.boolean,1]]),methodkind:0}),this.$rtti.$MethodVar("TDockDropEvent",{procsig:rtl.newTIProcSig([["Sender",pas.System.$rtti.TObject],["Source",this.$rtti.TDragDockObject],["X",rtl.longint],["Y",rtl.longint]]),methodkind:0}),this.$rtti.$MethodVar("TDockOverEvent",{procsig:rtl.newTIProcSig([["Sender",pas.System.$rtti.TObject],["Source",this.$rtti.TDragDockObject],["X",rtl.longint],["Y",rtl.longint],["State",pas["WEBLib.Controls"].$rtti.TDragState],["Accept",rtl.boolean,1]]),methodkind:0}),this.$rtti.$MethodVar("TGestureEvent",{procsig:rtl.newTIProcSig([["Sender",pas.System.$rtti.TObject],["EventInfo",this.$rtti.TGestureEventInfo,2],["Handled",rtl.boolean,1]]),methodkind:0}),this.$rtti.$MethodVar("TGetSiteInfoEvent",{procsig:rtl.newTIProcSig([["Sender",pas.System.$rtti.TObject],["DockClient",pas["WEBLib.Controls"].$rtti.TControl],["InfluenceRect",pas.Types.$rtti.TRect,1],["MousePos",pas.Types.$rtti.TPoint],["CanDock",rtl.boolean,1]]),methodkind:0}),this.$rtti.$MethodVar("TMouseActivateEvent",{procsig:rtl.newTIProcSig([["Sender",pas.System.$rtti.TObject],["Button",pas["WEBLib.Controls"].$rtti.TMouseButton],["Shift",pas.Classes.$rtti.TShiftState],["X",rtl.longint],["Y",rtl.longint],["HitTest",rtl.longint],["MouseActivate",this.$rtti.TMouseActivate,1]]),methodkind:0}),this.$rtti.$MethodVar("TMouseWheelUpDownEvent",{procsig:rtl.newTIProcSig([["Sender",pas.System.$rtti.TObject],["Shift",pas.Classes.$rtti.TShiftState],["MousePos",pas.Types.$rtti.TPoint],["Handled",rtl.boolean,1]]),methodkind:0}),this.$rtti.$MethodVar("TStartDockEvent",{procsig:rtl.newTIProcSig([["Sender",pas.System.$rtti.TObject],["DragObject",this.$rtti.TDragDockObject,1]]),methodkind:0}),this.$rtti.$MethodVar("TUnDockEvent",{procsig:rtl.newTIProcSig([["Sender",pas.System.$rtti.TObject],["Client",pas["WEBLib.Controls"].$rtti.TControl],["NewTarget",pas["WEBLib.Controls"].$rtti.TWinControl],["Allow",rtl.boolean,1]]),methodkind:0}),this.$rtti.$MethodVar("THashChangeEvent",{procsig:rtl.newTIProcSig([["Sender",pas.System.$rtti.TObject],["oldURL",rtl.string],["newURL",rtl.string]]),methodkind:0}),this.TPopupMode={0:"pmNone",pmNone:0,1:"pmAuto",pmAuto:1,2:"pmExplicit",pmExplicit:2},this.TPopupClose={0:"pcOnDeactivate",pcOnDeactivate:0,1:"pcNever",pcNever:1},this.TPosition={0:"poDesigned",poDesigned:0,1:"poDefault",poDefault:1,2:"poDefaultPosOnly",poDefaultPosOnly:2,3:"poDefaultSizeOnly",poDefaultSizeOnly:3,4:"poScreenCenter",poScreenCenter:4,5:"poDesktopCenter",poDesktopCenter:5,6:"poMainFormCenter",poMainFormCenter:6,7:"poOwnerFormCenter",poOwnerFormCenter:7},this.TApplicationErrorType={0:"aeSilent",aeSilent:0,1:"aeDialog",aeDialog:1,2:"aeAlert",aeAlert:2,3:"aeFooter",aeFooter:3},this.TFormBorderStyle={0:"fbNone",fbNone:0,1:"fbSingle",fbSingle:1,2:"fbSizeable",fbSizeable:2,3:"fbDialog",fbDialog:3,4:"fbDialogSizeable",fbDialogSizeable:4},this.TBootstrapVersion={0:"bv3",bv3:0,1:"bv4",bv4:1,2:"bv5",bv5:2},rtl.createClass(this,"TCustomSizeConstraints",pas.Classes.TPersistent,(function(){this.$init=function(){pas.Classes.TPersistent.$init.call(this),this.FControl=null,this.FMaxHeight=0,this.FMaxWidth=0,this.FMinHeight=0,this.FMinWidth=0,this.FOnChange=null},this.$final=function(){this.FControl=void 0,this.FOnChange=void 0,pas.Classes.TPersistent.$final.call(this)},this.SetConstraints=function(t,e){var i=t;0===i?e!==this.FMaxHeight&&(this.FMaxHeight=e,e>0&&e<this.FMinHeight&&(this.FMinHeight=e),this.Change()):1===i?e!==this.FMaxWidth&&(this.FMaxWidth=e,e>0&&e<this.FMinWidth&&(this.FMinWidth=e),this.Change()):2===i?e!==this.FMinHeight&&(this.FMinHeight=e,this.FMaxHeight>0&&e>this.FMaxHeight&&(this.FMaxHeight=e),this.Change()):3===i&&e!==this.FMinWidth&&(this.FMinWidth=e,this.FMaxWidth>0&&e>this.FMaxWidth&&(this.FMaxWidth=e),this.Change())},this.Change=function(){null!=this.FOnChange&&this.FOnChange(this)},this.AssignTo=function(e){t.TCustomSizeConstraints.isPrototypeOf(e)?(e.FMinHeight=this.FMinHeight,e.FMaxHeight=this.FMaxHeight,e.FMinWidth=this.FMinWidth,e.FMaxWidth=this.FMaxWidth,e.Change()):pas.Classes.TPersistent.AssignTo.call(this,e)},this.Create$1=function(t){return pas.System.TObject.Create.call(this),this.FControl=t,this}})),rtl.createClass(this,"TSizeConstraints",this.TCustomSizeConstraints,(function(){var e=this.$rtti;e.addProperty("MaxHeight",18,t.$rtti.TConstraintSize,"FMaxHeight","SetConstraints",4,{index:0,Default:0}),e.addProperty("MaxWidth",18,t.$rtti.TConstraintSize,"FMaxWidth","SetConstraints",4,{index:1,Default:0}),e.addProperty("MinHeight",18,t.$rtti.TConstraintSize,"FMinHeight","SetConstraints",4,{index:2,Default:0}),e.addProperty("MinWidth",18,t.$rtti.TConstraintSize,"FMinWidth","SetConstraints",4,{index:3,Default:0})})),rtl.createClass(this,"TDragDockObject",pas.System.TObject,(function(){this.$init=function(){pas.System.TObject.$init.call(this),this.FBrush=null},this.$final=function(){this.FBrush=void 0,pas.System.TObject.$final.call(this)},this.Destroy=function(){rtl.free(this,"FBrush"),pas.System.TObject.Destroy.call(this)}})),rtl.createClass(this,"TCustomForm",pas["WEBLib.Controls"].TWinControl,(function(){this.$init=function(){pas["WEBLib.Controls"].TWinControl.$init.call(this),this.FDesignContainer=null,this.FLayer$1=null,this.FPopup=!1,this.FPopupElement=null,this.FFormFileName="",this.FFormContainer="",this.FFormElement="",this.FFormStyle=0,this.FOnCreate=null,this.FOnShow=null,this.FModalResult=0,this.FOnPaint=null,this.FOnDeactivate=null,this.FOnCloseQuery=null,this.FOnClose=null,this.FModalProc=null,this.FCreatedProc=null,this.FCaption="",this.FIsResizing$1=!1,this.FOnScroll=null,this.FOnUnload=null,this.FOnBeforeUnload=null,this.FPopupMode=0,this.FPopupClose=0,this.FPosition=0,this.FMdx=0,this.FMdy=0,this.FDlgX=0,this.FDlgY=0,this.FCaptured$1=!1,this.FDown=!1,this.FHasCaption=!1,this.FMoveSpan=null,this.FCaptionElement=null,this.FCaptionCloseElement=null,this.FBorder=0,this.FShadow=!1,this.FTimerID=0,this.FOldWidth=0,this.FOldHeight=0,this.FOnDestroy=null,this.FPopupOpacity=0,this.FCreating=!1,this.FCreated=!1,this.FShown=!1,this.FLoadedPtr=null,this.FDOMContentLoadedPtr=null,this.FUnloadPtr=null,this.FBeforeUnloadPtr=null,this.FResizePtr=null,this.FScrollPtr=null,this.FDocMouseUpPtr=null,this.FDocMouseMovePtr=null,this.FTitleDownPtr=null,this.FTitleTouchStartPtr=null,this.FDocTouchMovePtr=null,this.FDocTouchEndPtr=null,this.FDoClickPtr=null,this.FKeyDownPtr$1=null,this.FOrientationChangePtr=null,this.FHashChangePtr=null,this.FCSSLibrary=0,this.FNoHTML=!1,this.FPrevActiveForm=null,this.FElementCaptionClassName="",this.FElementPopupClassName="",this.FMenu=null,this.FResizeObserver=null,this.FOnOrientationChange=null,this.FOnDOMContentLoaded=null,this.FShowClose=!1,this.FOnHashChange=null,this.FDefaultCloseAction=0},this.$final=function(){this.FDesignContainer=void 0,this.FLayer$1=void 0,this.FPopupElement=void 0,this.FOnCreate=void 0,this.FOnShow=void 0,this.FOnPaint=void 0,this.FOnDeactivate=void 0,this.FOnCloseQuery=void 0,this.FOnClose=void 0,this.FModalProc=void 0,this.FCreatedProc=void 0,this.FOnScroll=void 0,this.FOnUnload=void 0,this.FOnBeforeUnload=void 0,this.FMoveSpan=void 0,this.FCaptionElement=void 0,this.FCaptionCloseElement=void 0,this.FOnDestroy=void 0,this.FPrevActiveForm=void 0,this.FMenu=void 0,this.FResizeObserver=void 0,this.FOnOrientationChange=void 0,this.FOnDOMContentLoaded=void 0,this.FOnHashChange=void 0,pas["WEBLib.Controls"].TWinControl.$final.call(this)},this.SetModalResult=function(t){this.FModalResult=t,0!==this.FModalResult&&this.Close()},this.GetFormStyle=function(){return this.FFormStyle},this.SetFormStyle=function(t){this.FFormStyle=t},this.SetCaption=function(t){this.FCaption!==t&&(this.FCaption=t,this.UpdateElement())},this.SetShadow=function(t){this.FShadow!==t&&(this.FShadow=t,this.UpdateElement())},this.SetFormContainer=function(t){var e,i=null,s=0;if(e=this.GetContainer(),4 in this.FComponentState?this.FFormContainer=t:"BODY"===pas.SysUtils.UpperCase(t)?this.FFormContainer="":this.FFormContainer=t,(!(0 in this.FComponentState)||4 in this.FComponentState)&&(null!=this.FLayer$1?i=this.FLayer$1:(""===t||null==(i=document.getElementById(t)))&&(i=document.body),null!=i&&(this.FContainer=i,null!=e)))for(var n=0,r=this.GetControlsCount()-1;n<=r;n++)s=n,this.GetControls(s).FParentElement===e&&(this.GetControls(s).FParentElement=i),null!=this.GetControls(s).GetElementHandle()&&this.GetControls(s).GetElementHandle().parentElement===e&&i.appendChild(this.GetControls(s).GetElementHandle())},this.SetWidth=function(t){var e=null;0 in this.FComponentState&&""!==this.FFormContainer||!this.FPopup&&null==this.GetElementHandle()?this.SetWidthInt(t):(pas["WEBLib.Controls"].TControl.SetWidth.apply(this,arguments),this.FPopup&&null!=(e=this.FPopupElement)&&e.style.setProperty("width",pas.SysUtils.IntToStr(t)+"px"))},this.SetHeight=function(t){var e=null;if(0 in this.FComponentState&&""!==this.FFormContainer||!this.FPopup&&null==this.GetElementHandle())return this.SetHeightInt(t),void(null!=this.FormContainerElement()&&("BODY"===pas.SysUtils.UpperCase(this.FormContainerElement().tagName)||this.GetIsLinked()||this.FormContainerElement().style.setProperty("height",pas.SysUtils.IntToStr(t)+"px")));pas["WEBLib.Controls"].TControl.SetHeight.apply(this,arguments),""!==this.FFormContainer&&null!=this.FormContainerElement()&&"BODY"!==pas.SysUtils.UpperCase(this.FormContainerElement().tagName)&&(this.FormContainerElement().style.setProperty("height",pas.SysUtils.IntToStr(t)+"px"),this.Realign()),this.FPopup&&null!=(e=this.FPopupElement)&&e.style.setProperty("height",pas.SysUtils.IntToStr(t)+"px")},this.GetClientHeight=function(){return this.FBorder in rtl.createSet(3,4)?this.GetHeight():pas["WEBLib.Controls"].TControl.GetClientHeight.call(this)},this.HandleHashChange=function(e){var i,s,n="",r=null,a=null;return i=e.oldURL,s=e.newURL,null!=this.FOnHashChange&&this.FOnHashChange(this,i,s),t.Application.FRouting&&(n=pas.System.Copy(s,pas.System.Pos("#",s)+1,s.length),null!=(r=pas.Classes.GetClass("T"+this.FName))&&t.LastHash!==n&&(0!==pas.System.Pos("#"+this.FName+"?",i+"?")&&0===pas.System.Pos("#"+this.FName+"?",s+"?")&&this.Close(),this.FPopup||null!=(r=pas.Classes.GetClass("T"+n))&&t.Application.AutoCreateForm(r,{get:function(){return a},set:function(t){a=t}}))),!0,!0},this.HandleLoaded=function(t){return this.Resize$1(),this.InitAnchoring(),!0,!0},this.HandleDOMContentLoaded=function(t){return null!=this.FOnDOMContentLoaded&&this.FOnDOMContentLoaded(this),!0,!0},this.HandleScroll=function(t){return null!=this.FOnScroll&&this.FOnScroll(this),!0,!0},this.HandleUnload=function(t){return null!=this.FOnUnload&&this.FOnUnload(this),!0,!0},this.HandleBeforeUnload=function(t){var e="";return e="",null!=this.FOnBeforeUnload&&this.FOnBeforeUnload(this,{get:function(){return e},set:function(t){e=t}}),""!==e?(t.returnValue=e,e):(!0,!0)},this.HandleObserver=function(){return this.Resize$1(),!0,!0},this.HandleResize=function(t){return this.FVisible&&!(3 in this.FComponentState)&&(null==this.GetContainer()&&this.CreateControl(),this.Resize$1(),this.GetElementHandle()===document.body&&window.setTimeout(rtl.createSafeCallback(this,"Resize$1"),25)),!0,!0},this.HandleDocMouseMove=function(t){var e=0,i=0,s=null,n=0,r=0;return this.FDown&&null!=this.GetContainer()&&(e=t.clientX-this.FMdx,i=t.clientY-this.FMdy,(s=this.FHasCaption&&""!==this.FFormFileName?this.GetContainer().parentNode:this.GetContainer()).style.setProperty("transform",""),s.style.setProperty("position","absolute"),n=Math.round(this.FDlgX+e),r=Math.round(this.FDlgY+i),s.style.setProperty("left",pas.SysUtils.IntToStr(n)+"px"),s.style.setProperty("top",pas.SysUtils.IntToStr(r)+"px"),this.FLeft=n,this.FTop=r),!0,!0},this.HandleDocMouseUp=function(t){return this.FDown&&(this.FCaptured$1=!1,this.FDown=!1,document.body.removeEventListener("mousemove",this.FDocMouseMovePtr),document.body.removeEventListener("mouseup",this.FDocMouseUpPtr),null!=this.FMoveSpan&&document.body.removeChild(this.FMoveSpan),this.FEventStopPropagation=rtl.unionSet(this.FEventStopPropagation,rtl.createSet(3,2)),this.FMoveSpan=null),!0,!0},this.HandleTitleDown=function(t){var e=null;return t.stopPropagation(),t.preventDefault(),this.FPopupClose=1,this.FMdx=Math.round(t.clientX),this.FMdy=Math.round(t.clientY),e=this.FHasCaption&&""!==this.FFormFileName?this.GetContainer().parentNode.getBoundingClientRect():this.GetContainer().getBoundingClientRect(),this.FDlgX=Math.round(pas.System.Int(e.left)),this.FDlgY=Math.round(pas.System.Int(e.top)),this.FDown=!0,this.FCaptured$1||(this.FCaptured$1=!0,this.FMoveSpan=document.createElement("SPAN"),this.FMoveSpan.style.setProperty("top","0"),this.FMoveSpan.style.setProperty("left","0"),this.FMoveSpan.style.setProperty("right","0"),this.FMoveSpan.style.setProperty("bottom","0"),this.FMoveSpan.style.setProperty("position","absolute"),document.body.appendChild(this.FMoveSpan),this.FEventStopPropagation=rtl.diffSet(this.FEventStopPropagation,rtl.createSet(3,2)),document.body.addEventListener("mousemove",this.FDocMouseMovePtr),document.body.addEventListener("mouseup",this.FDocMouseUpPtr)),!0,!0},this.HandleTouchStart=function(t){var e=!1,i=null;return 0===t.touches.length?e:(t.stopPropagation(),t.preventDefault(),this.FPopupClose=1,this.FMdx=Math.round(t.touches.item(0).clientX),this.FMdy=Math.round(t.touches.item(0).clientY),i=this.FHasCaption&&""!==this.FFormFileName?this.GetContainer().parentNode.getBoundingClientRect():this.GetContainer().getBoundingClientRect(),this.FDlgX=Math.round(pas.System.Int(i.left)),this.FDlgY=Math.round(pas.System.Int(i.top)),this.FDown=!0,this.FCaptured$1||(this.FCaptured$1=!0,this.FMoveSpan=document.createElement("SPAN"),this.FMoveSpan.style.setProperty("top","0"),this.FMoveSpan.style.setProperty("left","0"),this.FMoveSpan.style.setProperty("right","0"),this.FMoveSpan.style.setProperty("bottom","0"),this.FMoveSpan.style.setProperty("position","absolute"),document.body.appendChild(this.FMoveSpan),this.FEventStopPropagation=rtl.diffSet(this.FEventStopPropagation,rtl.createSet(9,10)),document.body.addEventListener("touchmove",this.FDocTouchMovePtr),document.body.addEventListener("touchend",this.FDocTouchEndPtr)),e=!0)},this.HandleDocTouchMove=function(t){var e=!1,i=0,s=0,n=null,r=0,a=0;if(this.FDown&&null!=this.GetContainer()){if(0===t.touches.length)return e;i=t.touches.item(0).clientX-this.FMdx,s=t.touches.item(0).clientY-this.FMdy,(n=this.FHasCaption&&""!==this.FFormFileName?this.GetContainer().parentNode:this.GetContainer()).style.setProperty("transform",""),n.style.setProperty("position","absolute"),r=Math.round(this.FDlgX+i),a=Math.round(this.FDlgY+s),n.style.setProperty("left",pas.SysUtils.IntToStr(r)+"px"),n.style.setProperty("top",pas.SysUtils.IntToStr(a)+"px"),this.FLeft=r,this.FTop=a}return e=!0},this.HandleDocTouchEnd=function(t){return this.FDown&&(this.FCaptured$1=!1,this.FDown=!1,document.body.removeEventListener("touchmove",this.FDocTouchMovePtr),document.body.removeEventListener("touchend",this.FDocTouchEndPtr),null!=this.FMoveSpan&&document.body.removeChild(this.FMoveSpan),this.FEventStopPropagation=rtl.unionSet(this.FEventStopPropagation,rtl.createSet(9,10)),this.FMoveSpan=null),!0,!0},this.HandleCloseClick=function(t){var e=!1;return e=!0,null!=this.FOnCloseQuery&&this.FOnCloseQuery(this,{get:function(){return e},set:function(t){e=t}}),e&&this.Close(),!0,!0},this.SetLeft=function(t){var e=null;pas["WEBLib.Controls"].TControl.SetLeft.apply(this,arguments),this.FPopup&&null!=(e=this.FPopupElement)&&e.style.setProperty("left",pas.SysUtils.IntToStr(t)+"px")},this.SetTop=function(t){var e=null;pas["WEBLib.Controls"].TControl.SetTop.apply(this,arguments),this.FPopup&&null!=(e=this.FPopupElement)&&e.style.setProperty("top",pas.SysUtils.IntToStr(t)+"px")},this.ClearMethodPointers=function(){pas["WEBLib.Controls"].TControl.ClearMethodPointers.call(this),this.FLoadedPtr=null,this.FDOMContentLoadedPtr=null,this.FUnloadPtr=null,this.FBeforeUnloadPtr=null,this.FResizePtr=null,this.FScrollPtr=null,this.FDocMouseUpPtr=null,this.FDocMouseMovePtr=null,this.FTitleDownPtr=null,this.FDocTouchMovePtr=null,this.FDocTouchEndPtr=null,this.FTitleTouchStartPtr=null,this.FDoClickPtr=null,this.FKeyDownPtr$1=null,this.FOrientationChangePtr=null,this.FHashChangePtr=null},this.GetMethodPointers=function(){pas["WEBLib.Controls"].TControl.GetMethodPointers.call(this),null===this.FLoadedPtr&&(this.FLoadedPtr=rtl.createCallback(this,"HandleLoaded"),this.FDOMContentLoadedPtr=rtl.createCallback(this,"HandleDOMContentLoaded"),this.FUnloadPtr=rtl.createCallback(this,"HandleUnload"),this.FBeforeUnloadPtr=rtl.createCallback(this,"HandleBeforeUnload"),this.FResizePtr=rtl.createCallback(this,"HandleResize"),this.FScrollPtr=rtl.createCallback(this,"HandleScroll"),this.FDocMouseUpPtr=rtl.createCallback(this,"HandleDocMouseUp"),this.FDocMouseMovePtr=rtl.createCallback(this,"HandleDocMouseMove"),this.FTitleDownPtr=rtl.createCallback(this,"HandleTitleDown"),this.FDoClickPtr=rtl.createCallback(this,"HandleDoClick$1"),this.FKeyDownPtr$1=rtl.createCallback(this,"HandleKeyDown"),this.FOrientationChangePtr=rtl.createCallback(this,"HandleOrientationChange"),this.FHashChangePtr=rtl.createCallback(this,"HandleHashChange"),this.FTitleTouchStartPtr=rtl.createCallback(this,"HandleTouchStart"),this.FDocTouchMovePtr=rtl.createCallback(this,"HandleDocTouchMove"),this.FDocTouchEndPtr=rtl.createCallback(this,"HandleDocTouchEnd"))},this.VisibleChanged=function(){var t=!1;pas["WEBLib.Controls"].TControl.VisibleChanged.call(this),null!=this.FLayer$1?this.FVisible?this.FLayer$1.style.setProperty("display",""):this.FLayer$1.style.setProperty("display","none"):(t=pas.SysUtils.LowerCase(this.GetID())===pas["WEBLib.WebTools"].cBodyTag,null==this.GetContainer()||""===this.FFormContainer||t||(this.FVisible?this.GetContainer().style.setProperty("display",""):this.GetContainer().style.setProperty("display","none")))},this.Resize$1=function(){var t=0,e=0,i=0,s=0,n=null;if(!(3 in this.FComponentState)&&(this.FIsResizing$1=!0,this.FPopup&&null!=this.FPopupElement?(n=this.FPopupElement.getBoundingClientRect(),i=Math.round(n.right-n.left-2),this.FBorder in rtl.createSet(3,4)?(e=this.GetCaptionHeight(),s=Math.round(n.bottom-n.top-e-2)):s=Math.round(n.bottom-n.top-2)):(i=window.innerWidth,s=window.innerHeight),this.UpdateControlSize(i,s),pas["WEBLib.Controls"].IsAndroid()&&"INPUT"===document.activeElement.tagName||this.AlignControl(this),this.DoResize(),this.FIsResizing$1=!1,!this.IsUpdating())){-1===this.FOrigRect.Left&&-1===this.FOrigRect.Top&&this.InitAnchoring();for(var r=0,a=this.GetControlsCount()-1;r<=a;r++)t=r,this.GetControls(t).UpdateAnchoring()}},this.CreateControl=function(){var t="";if(this.FVisible||this.FPopup){if(pas["WEBLib.Controls"].TControl.CreateControl.call(this),t="","undefined"!=typeof CONTAINERID)try{t=CONTAINERID}catch(t){}""!==t&&this.SetFormContainer(t),this.UpdateSize()}},this.DoClose=function(t){null!=this.FModalProc&&0!==t.get()&&(this.FModalProc(this.FModalResult),this.FModalProc=null)},this.BindEvents=function(){var e="";pas["WEBLib.Controls"].TControl.BindEvents.call(this),"loading"!==document.readyState&&null!=this.FOnDOMContentLoaded&&this.FOnDOMContentLoaded(this),window.addEventListener("resize",this.FResizePtr),window.addEventListener("load",this.FLoadedPtr),window.addEventListener("DOMContentLoaded",this.FDOMContentLoadedPtr),document.addEventListener("scroll",this.FScrollPtr),window.addEventListener("unload",this.FUnloadPtr),window.addEventListener("beforeunload",this.FBeforeUnloadPtr),window.addEventListener("keydown",this.FKeyDownPtr$1),window.addEventListener("orientationchange",this.FOrientationChangePtr),window.addEventListener("hashchange",this.FHashChangePtr),null!=pas.Classes.GetClass(this.$classname)&&!this.FPopup&&t.Application.FRouting&&(e=this.$classname,pas.System.Delete({get:function(){return e},set:function(t){e=t}},1,1),t.LastHash=e,window.location.hash=e)},this.UnbindEvents=function(){pas["WEBLib.Controls"].TControl.UnbindEvents.call(this),null!=this.FLayer$1&&0===this.FPopupClose&&this.FLayer$1.removeEventListener("click",this.FDoClickPtr),null!=this.FResizeObserver&&this.FResizeObserver.disconnect(),window.removeEventListener("resize",this.FResizePtr),window.removeEventListener("load",this.FLoadedPtr),window.removeEventListener("DOMContentLoaded",this.FDOMContentLoadedPtr),document.removeEventListener("scroll",this.FScrollPtr),window.removeEventListener("unload",this.FUnloadPtr),window.removeEventListener("beforeunload",this.FBeforeUnloadPtr),window.removeEventListener("keydown",this.FKeyDownPtr$1),window.removeEventListener("orientationchange",this.FOrientationChangePtr),window.removeEventListener("hashchange",this.FHashChangePtr)},this.DoCreate=function(){this.BeginUpdate(),this.LoadDFMValues(),this.Loaded(),null!=this.FOnCreate&&this.FOnCreate(this),this.FCreating=!1,this.EndUpdate(),this.UpdateChildren(this),this.Realign(),this.DoResize()},this.Realign=function(){var t=null,e=null,i=pas.Types.TRect.$new();""!==this.FFormContainer&&0!==this.FAlign&&null!=(t=document.getElementById(this.FFormContainer))&&(0===(e=t.getBoundingClientRect()).width&&0===e.height&&"absolute"===t.style.getPropertyValue("position")?i.$assign(pas["WEBLib.Controls"].GetHTMLElementAbsoluteRect(t)):i.$assign(pas.Types.Rect(Math.round(e.left),Math.round(e.top),Math.round(e.right),Math.round(e.bottom))),this.SetBoundsInt(i.Left,i.Top,i.Right-i.Left,i.Bottom-i.Top)),pas["WEBLib.Controls"].TControl.Realign.call(this)},this.DoResize=function(){var t,e;t=this.GetWidth(),e=this.GetHeight(),t===this.FOldWidth&&e===this.FOldHeight||(this.FOldWidth=t,this.FOldHeight=e,null!=this.FOnResize&&this.FOnResize(this))},this.DoShow=function(){this.DoAutoFocus(),null==this.FOnShow||this.FShown||(this.FShown=!0,this.FOnShow(this))},this.DoAutoFocus=function(){for(var t=0,e=0,i=this.GetControlsCount()-1;e<=i;e++)t=e,0===this.GetControls(t).FTabOrder&&this.GetControls(t).FTabStop&&this.GetControls(t).SetFocus()},this.HandleDoClick$1=function(t){return t.stopPropagation(),0===this.FPopupClose&&this.Close(),!0,!0},this.HandleKeyDown=function(t){var e,i=!1;return e=this.GetKeyCode(t.key,!0),pas.System.Assigned(e)?(27===e&&!(4 in this.FComponentState)&&this.FPopup&&this.Close(),i=!0):i},this.HandleOrientationChange=function(t){var e=0;(this.Resize$1(),this.Realign(),!0,null!=this.FOnOrientationChange)&&(e=window.matchMedia("(orientation: portrait)").matches?1:0,this.FOnOrientationChange(this,e));return null!=this.FOnResize&&this.FOnResize(this),!0},this.KeyPreview=function(e,i){var s=0,n=0,r=0,a=0,o=0;n=-1,r=65535;for(var l=0,h=this.GetControlsCount()-1;l<=h;l++)s=l,!this.GetControls(s).FVisible&&this.GetControls(s).FEnabled||(this.GetControls(s).FTabOrder<r&&(r=this.GetControls(s).FTabOrder,o=s),this.GetControls(s).FTabOrder>n&&(n=this.GetControls(s).FTabOrder,a=s),13!==e.get()&&27!==e.get()||this.GetControls(s).HandleKeyPreview(e.get()));t.Application.FMainForm!==this&&(9===e.get()&&!(0 in i)&&a<this.GetControlsCount()&&o>=0&&o!==a&&this.GetControls(a).Focused()&&(this.GetControls(o).SetFocus(),e.set(0)),9===e.get()&&0 in i&&o>=0&&a<this.GetControlsCount()&&o!==a&&this.GetControls(o).Focused()&&(this.GetControls(a).SetFocus(),e.set(0)))},this.GetWidth=function(){var t=0,e=null,i=null;return""!==this.FFormElement&&null!=(i=document.getElementById(this.FFormElement))?(e=i.getBoundingClientRect(),t=Math.round(e.right-e.left)):(this.GetElementHandle()===document.body?(e=document.documentElement.getBoundingClientRect(),(t=Math.round(e.width))>window.innerWidth&&(t=window.innerWidth)):this.FPopup?t=pas["WEBLib.Controls"].TControl.GetWidth.call(this):0===(t=Math.round(this.GetElementHandle().offsetWidth))&&(t=""!==this.FFormContainer?pas["WEBLib.Controls"].TControl.GetWidth.call(this):window.innerWidth),t)},this.GetHeight=function(){var t=0,e=0,i="",s=null,n=null;return""!==this.FFormElement&&null!=(s=document.getElementById(this.FFormElement))?(n=s.getBoundingClientRect(),t=Math.round(n.bottom-n.top)):(this.GetElementHandle()===document.body?(i=window.getComputedStyle(this.GetElementHandle()).getPropertyValue("margin-top"),i=pas.System.Copy(i,1,i.length-2),e=Math.round(pas.SysUtils.StrToFloat$1(i,pas.SysUtils.TFormatSettings.Invariant())-2),n=document.documentElement.getBoundingClientRect(),(t=Math.round(n.height))>window.innerHeight&&(t=window.innerHeight-Math.max(0,e))):this.FPopup?t=pas["WEBLib.Controls"].TControl.GetHeight.call(this):0===(t=Math.round(this.GetElementHandle().offsetHeight))&&(t=""!==this.FFormContainer?pas["WEBLib.Controls"].TControl.GetHeight.call(this):window.innerHeight),t)},this.GetLeft=function(){var t=0,e=null,i=null;return this.FPopup?t=pas["WEBLib.Controls"].TControl.GetLeft.call(this):""!==this.FFormElement?null!=(e=document.getElementById(this.FFormElement))&&(i=e.getBoundingClientRect(),t=Math.round(i.left)):(e=null,""!==this.FFormContainer&&(e=document.getElementById(this.FFormContainer)),null==e&&(e=this.GetElementHandle()),t=Math.round(e.offsetLeft)),t},this.GetTop=function(){var t=0,e=null,i=null;return this.FPopup?t=pas["WEBLib.Controls"].TControl.GetTop.call(this):""!==this.FFormElement?null!=(e=document.getElementById(this.FFormElement))&&(i=e.getBoundingClientRect(),t=Math.round(i.top)):(e=null,""!==this.FFormContainer&&(e=document.getElementById(this.FFormContainer)),null==e&&(e=this.GetElementHandle()),t=Math.round(e.offsetTop)),t},this.GetClientRect=function(){var t=pas.Types.TRect.$new();return t.$assign(pas["WEBLib.Controls"].TControl.GetClientRect.call(this)),t},this.CreateElement=function(){var e=null,i=null,s=null;return this.FPopup||null==this.FormContainerElement()?(e=document.createElement("DIV"),this.FLayer$1=this.CreateLayer(),document.body.appendChild(this.FLayer$1),i=this.FLayer$1,0===this.FPopupClose&&(this.GetMethodPointers(),i.addEventListener("click",this.FDoClickPtr)),i.style.setProperty(pas["WEBLib.Controls"].CSSZIndex,t.Application.MaxZIndexStr()),2===this.FBorder&&(e.style.setProperty("resize","both"),e.style.setProperty("overflow","auto")),this.FHasCaption=!1,this.FBorder in rtl.createSet(2,3,4)&&(s=this.CreateCaption(),e.appendChild(s)),e):e=this.FormContainerElement()},this.UpdateElement=function(){var t="",e=null;this.FCreating||(pas["WEBLib.Controls"].TControl.UpdateElement.call(this),this.IsUpdating()||(null==this.GetElementHandle()&&null==this.GetContainer()||""!==this.FCaption&&(this.FPopup?null!=this.FCaptionElement&&(null!=(e=this.FCaptionElement.childNodes.item(0))&&(e.nodeValue=this.FCaption),this.FShowClose&&null==this.FCaptionCloseElement&&(this.FCaptionCloseElement=document.createElement("SPAN"),this.FCaptionCloseElement.style.setProperty("float","right"),this.FCaptionCloseElement.style.setProperty("cursor","default"),this.FCaptionCloseElement.style.setProperty("margin-right","8px"),this.FCaptionCloseElement.innerHTML="&#x2716;",this.FCaptionElement.appendChild(this.FCaptionCloseElement),this.FCaptionCloseElement.addEventListener("click",rtl.createSafeCallback(this,"HandleCloseClick")),this.FCaptionCloseElement.addEventListener("touchstart",rtl.createSafeCallback(this,"HandleCloseClick"))),pas["WEBLib.Controls"].SetHTMLElementFont(this.FCaptionElement,this.FFont,!(""===this.FElementCaptionClassName&&0===this.FElementFont))):window.document.title=this.FCaption),null!=this.GetContainer()&&(t=pas["WEBLib.Graphics"].ColorToHTML(this.FColor),null!=this.GetContainer()&&(-1===this.FColor||16777215===this.FColor||this.FPopup||""!==this.FElementClassName||this.GetContainer().style.setProperty(pas["WEBLib.Controls"].CSSBackground,t),this.FPopup||0===this.FCSSLibrary||document.body.style.removeProperty(pas["WEBLib.Controls"].CSSBackground),(""!==this.FElementClassName||-1===this.FColor||16777215===this.FColor&&!this.FPopup)&&this.GetContainer().style.removeProperty(pas["WEBLib.Controls"].CSSBackground),""!==this.FElementClassName||this.FPopup||document.documentElement.style.setProperty("height","100%"),pas["WEBLib.Controls"].SetHTMLElementFont(this.GetContainer(),this.FFont,!(""===this.FElementClassName&&0===this.FElementFont))),this.FPopup?(null==this.FPopupElement&&(this.FPopupElement=this.GetContainer()),""!==this.FElementPopupClassName?(this.GetContainer().style.removeProperty("border"),this.FPopupElement.setAttribute("class",this.FElementPopupClassName)):(this.FShadow?this.FPopupElement.style.setProperty("box-shadow","3px 3px 3px silver"):this.FPopupElement.style.removeProperty("box-shadow"),this.FPopupElement.style.setProperty("border","1px solid gray")),1===this.FCSSLibrary&&""===this.FElementClassName&&(this.FPopupElement.setAttribute("class","card"),this.FPopupElement.style.setProperty("display","block"),this.GetContainer().style.removeProperty("box-shadow"))):this.GetContainer().style.removeProperty("box-shadow"))))},this.ContainerElement=function(){return this.FormContainerElement()},this.FormContainerElement=function(){var t=null;return 4 in this.FComponentState&&null!=this.FDesignContainer&&(t=this.FDesignContainer),""!==this.FFormContainer?null==(t=document.getElementById(this.FFormContainer))&&(t=document.body):t=document.body,t},this.GetElementBindHandle=function(){return 4 in this.FComponentState||""!==this.FFormContainer?window:this.FPopup?pas["WEBLib.Controls"].TControl.GetElementBindHandle.call(this):window},this.GetElementHandle=function(){var t=null;return this.FPopup?null==(t=pas["WEBLib.Controls"].TControl.GetElementHandle.call(this))&&(t=this.FPopupElement):t=this.FormContainerElement(),t},this.SetElementClassName=function(t){pas["WEBLib.Controls"].TControl.SetElementClassName.apply(this,arguments),this.FPopup&&null!=this.FPopupElement&&this.FPopupElement.setAttribute("class",t)},this.CloseQuery=function(){var t=!1;return t=!0,null!=this.FOnCloseQuery&&this.FOnCloseQuery(this,{get:function(){return t},set:function(e){t=e}}),t},this.LoadDFMValues=function(){},this.Init=function(){},this.CreateLayer=function(){var e=null;return(e=document.createElement("SPAN")).style.setProperty("top","0"),e.style.setProperty("left","0"),e.style.setProperty("right","0"),e.style.setProperty("bottom","0"),e.style.setProperty("webkit-user-select","none"),e.style.setProperty("moz-user-select","none"),e.style.setProperty("khtml-user-select","none"),e.style.setProperty("ms-user-select","none"),e.style.setProperty("user-select","none"),e.style.setProperty("position","absolute"),e.style.setProperty("z-index",t.Application.MaxZIndexStr()),e},this.CreateCaption=function(){var e;return e=pas.SysUtils.IntToStr(t.Application.FFormCaptionHeight),this.FCaptionElement=document.createElement("DIV"),this.FCaptionElement.innerHTML=this.FCaption,this.FCaptionElement.style.setProperty(pas["WEBLib.Controls"].CSSBackground,pas["WEBLib.Graphics"].ColorToHTML(t.Application.FThemeColor)),this.FCaptionElement.style.setProperty("color",pas["WEBLib.Graphics"].ColorToHTML(t.Application.FThemeTextColor)),this.FCaptionElement.style.setProperty("cursor","move"),this.FCaptionElement.style.setProperty("height",e+"px"),this.FCaptionElement.style.setProperty("line-height",e+"px"),this.FCaptionElement.style.setProperty("border-bottom","1px solid black"),this.FCaptionElement.style.setProperty("padding-left","4px"),this.FCaptionElement.style.setProperty("-moz-user-select","none"),this.FCaptionElement.style.setProperty("-webkit-user-select","none"),this.FCaptionElement.style.setProperty("-ms-user-select","none"),this.FCaptionElement.style.setProperty("user-select","none"),this.FCaptionElement.style.setProperty("-o-user-select","none"),""!==this.FElementCaptionClassName&&this.FCaptionElement.setAttribute("class",this.FElementCaptionClassName),pas["WEBLib.Controls"].SetHTMLElementFont(this.FCaptionElement,this.FFont,!(""===this.FElementCaptionClassName&&0===this.FElementFont)),null==this.FTitleDownPtr&&this.GetMethodPointers(),this.FCaptionElement.innerHTML=this.FCaption,this.FCaptionElement.addEventListener("mousedown",this.FTitleDownPtr),this.FCaptionElement.addEventListener("touchstart",this.FTitleTouchStartPtr),this.FHasCaption=!0,this.FCaptionElement},this.GetCaptionHeight=function(){var t=0,e=null;return t=0,null!=this.FCaptionElement&&this.FBorder in rtl.createSet(3,4)&&(e=this.FCaptionElement.getBoundingClientRect(),t=Math.round(e.bottom-e.top)),t},this.SetColorScheme=function(e){var i="";if(t.Application.FThemed){var s=e;2===s?(this.SetColor(2105636),i="label,option,td,table,ul,li {background-color: #202124; color: #BEC1C6;}\r\nbody,input,textarea,select,fieldset {background-color: #202124; color: #BEC1C6; border: 1px solid gray;}\r\ninput:focus, textarea:focus, select:focus, span:focus { border: 1px solid silver; outline: none !important;}",this.AddCSS("appscheme",i)):1===s&&(this.SetColor(16777215),this.RemoveCSS("appscheme"))}},this.SetCSSLibrary=function(t){this.FCSSLibrary=t,1===t&&4 in this.FComponentState&&!(0 in this.FComponentState)&&this.SetElementFont(1)},this.GetHTMLFileName=function(e){return e?"":this.$module.$name+t.Application.GetFormExtension()},this.LoadedDone=function(){t.Application.TriggerNotification()},this.Loaded=function(){var t=null;pas["WEBLib.Controls"].TControl.Loaded.call(this),""!==this.FFormContainer&&""!==this.FElementClassName&&null!=(t=this.FormContainerElement())&&t.setAttribute("class",this.FElementClassName),this.LoadedDone()},this.ColorChanging=function(){pas["WEBLib.Controls"].TControl.ColorChanging.call(this),null!=this.GetContainer()&&this.GetContainer().style.setProperty(pas["WEBLib.Controls"].CSSBackground,pas["WEBLib.Graphics"].ColorToHTML(this.FColor))},this.CreateInitialize=function(){pas["WEBLib.Controls"].TControl.CreateInitialize.call(this),this.FAllowTouch=!0,this.FModalResult=0,this.FFormStyle=0,this.FBorder=2,this.FShadow=!0,this.FShowClose=!0,this.FDefaultCloseAction=1,this.FTimerID=-1,this.FCaptionElement=null,this.FColor=16777215,window.addEventListener("load",this.FLoadedPtr)},this.Create$2=function(t){return this.FNoHTML=!1,this.FCreating=!0,this.FFormContainer=t,""===t?pas["WEBLib.Controls"].TControl.Create$2.call(this,pas["WEBLib.WebTools"].cBodyTag):pas["WEBLib.Controls"].TControl.Create$2.call(this,t),this.FFormElement="",this.FModalResult=0,this.FFormStyle=0,this.FDefaultCloseAction=1,this.DoCreate(),this},this.Create$5=function(t,e){return this.FCreating=!0,this.FFormContainer=t,pas["WEBLib.Controls"].TControl.Create$2.call(this,t),e.set(this),this.FFormElement="",this.FModalResult=0,this.FFormStyle=0,this.FDefaultCloseAction=1,this.DoCreate(),this},this.Create$1=function(t){return this.FNoHTML=!1,this.FCreating=!0,this.FResizeObserver=null,pas["WEBLib.Controls"].TControl.Create$1.apply(this,arguments),this.FBorder=1,this.FFormFileName="",this.FPopupMode=0,this.FPopupClose=0,this.FPopup=!0,this.FPosition=4,this.FPopupOpacity=1,this.FCreated=!0,this},this.CreateNew$2=function(){var e;return this.FCreating=!0,e=this.$class.GetHTMLFileName(!1),pas["WEBLib.Controls"].TControl.Create$2.call(this,pas["WEBLib.WebTools"].cBodyTag),this.FFormFileName=e,""!==this.FFormFileName&&t.Application.LoadForm(this,e),this},this.CreateNew$3=function(t){return this.FCreatedProc=t,this.CreateNew$2(),this},this.CreateNew$4=function(t,e){return this.CreateNew$5(t,"",e),this},this.CreateNew$5=function(e,i,s){return this.FCreating=!0,this.FFormContainer=e,pas["WEBLib.Controls"].TControl.Create$2.call(this,e),this.FCreatedProc=s,this.FFormElement=e,""===i&&(i=this.$class.GetHTMLFileName(!1)),""!==i?t.Application.LoadForm(this,i):null!=this.FCreatedProc&&this.FCreatedProc(this),this},this.Destroy=function(){this.FVisible&&this.Close(),null!=this.FOnDestroy&&this.FOnDestroy(this),pas["WEBLib.Controls"].TControl.Destroy.call(this),null!=this.FLayer$1&&(this.FormContainerElement()===this.FLayer$1.parentNode&&this.FormContainerElement().removeChild(this.FLayer$1),this.FLayer$1=null)},this.Close=function(){var i=0,s=null;this.CloseQuery()&&(this.UnbindEvents(),i=this.FDefaultCloseAction,-1!==this.FTimerID&&(window.clearInterval(this.FTimerID),this.FTimerID=-1),null!=this.FOnClose&&this.FOnClose(this,{get:function(){return i},set:function(t){i=t}}),0!==i&&(null!=this.FLayer$1&&(this.GetContainer().parentNode===this.FLayer$1?this.FLayer$1.removeChild(this.GetContainer()):this.GetContainer().parentNode.parentNode===this.FLayer$1&&this.FLayer$1.removeChild(this.GetContainer().parentNode),this.FContainer=null,this.FormContainerElement()===this.FLayer$1.parentNode&&(this.FormContainerElement().removeChild(this.FLayer$1),t.Application.ChangeMaxZIndex(-1)),this.FLayer$1=null),""===this.FFormFileName?""!==this.FFormElement&&null!=this.GetContainer()?(this.GetContainer().innerHTML="",this.FContainer=null):null!=this.GetContainer()&&(this.FormContainerElement()===this.GetContainer().parentNode&&this.FormContainerElement().removeChild(this.GetContainer()),this.FContainer=null):""!==this.FFormElement&&(this.GetContainer().innerHTML="",this.FContainer=null),this.FFormElement!==this.FFormContainer&&""!==this.FFormElement&&null!=(s=document.getElementById(this.FFormElement))&&(s.innerHTML=""),this.DoClose({get:function(){return i},set:function(t){i=t}}),2!==i||3 in this.FComponentState||(this.SetVisible(!1),e.ReleaseForm(this),t.Application.FMainForm===this&&(t.Application.FMainForm=null)),t.Application.FActiveForm=this.FPrevActiveForm,this.FShown=!1,this.SetVisible(!1)))},this.IsMiletus=function(){var t=!1,e=null;e=this.$class.ClassType(),t=!1;do{if(null!=(e=e.$ancestor)&&"TMiletusForm"===e.$classname){t=!0;break}}while(null!=e&&"TForm"!==e.$classname);return t},this.AddCSS=function(t,e){var i,s,n;i=t,s=e,(n=document.getElementById(i))?n.innerHTML=s:((n=document.createElement("style")).type="text/css",n.id=i,n.innerHTML=s,document.getElementsByTagName("head")[0].appendChild(n))},this.RemoveCSS=function(t){var e;null!=(e=document.getElementById(t))&&document.head.removeChild(e)},rtl.addIntf(this,pas["WEBLib.Controls"].IControl),rtl.addIntf(this,pas.System.IUnknown)})),rtl.createClass(this,"TForm",this.TCustomForm,(function(){rtl.addIntf(this,pas["WEBLib.Controls"].IControl),rtl.addIntf(this,pas.System.IUnknown);var e=this.$rtti;e.addProperty("Align",2,pas["WEBLib.Controls"].$rtti.TAlign,"FAlign","SetAlign",4,{Default:pas["WEBLib.Controls"].TAlign.alNone}),e.addProperty("Caption",2,rtl.string,"FCaption","SetCaption"),e.addProperty("Color",2,pas["WEBLib.Graphics"].$rtti.TColor,"FColor","SetColor"),e.addProperty("CSSLibrary",2,pas["WEBLib.Controls"].$rtti.TCSSLibrary,"FCSSLibrary","SetCSSLibrary",4,{Default:pas["WEBLib.Controls"].TCSSLibrary.cssNone}),e.addProperty("ElementClassName",2,pas["WEBLib.Controls"].$rtti.TElementClassName,"FElementClassName","SetElementClassName"),e.addProperty("ElementFont",2,pas["WEBLib.Controls"].$rtti.TElementFont,"FElementFont","SetElementFont",4,{Default:pas["WEBLib.Controls"].TElementFont.efProperty}),e.addProperty("ElementPosition",2,pas["WEBLib.Controls"].$rtti.TElementPosition,"FElementPosition","SetElementPosition",4,{Default:pas["WEBLib.Controls"].TElementPosition.epAbsolute}),e.addProperty("Font",2,pas["WEBLib.Graphics"].$rtti.TFont,"FFont","SetFont"),e.addProperty("FormContainer",2,pas["WEBLib.Controls"].$rtti.TElementID,"FFormContainer","SetFormContainer"),e.addProperty("FormStyle",3,t.$rtti.TFormStyle,"GetFormStyle","SetFormStyle"),e.addProperty("Menu",0,pas["WEBLib.Controls"].$rtti.TCustomControl,"FMenu","FMenu"),e.addProperty("ParentFont",2,rtl.boolean,"FParentFont","SetParentFont",4,{Default:!0}),e.addProperty("Shadow",2,rtl.boolean,"FShadow","SetShadow",4,{Default:!0}),e.addProperty("ShowClose",0,rtl.boolean,"FShowClose","FShowClose",4,{Default:!0}),e.addProperty("TabOrder",2,rtl.longint,"FTabOrder","SetTabOrder"),e.addProperty("TabStop",2,rtl.boolean,"FTabStop","SetTabStop",4,{Default:!0}),e.addProperty("OnBeforeUnload",0,t.$rtti.TBeforeUnloadEvent,"FOnBeforeUnload","FOnBeforeUnload"),e.addProperty("OnClick",0,pas["WEBLib.Controls"].$rtti.TNotifyEvent,"FOnClick","FOnClick"),e.addProperty("OnClose",0,t.$rtti.TCloseEvent,"FOnClose","FOnClose"),e.addProperty("OnCloseQuery",0,t.$rtti.TCloseQueryEvent,"FOnCloseQuery","FOnCloseQuery"),e.addProperty("OnCreate",0,pas["WEBLib.Controls"].$rtti.TNotifyEvent,"FOnCreate","FOnCreate"),e.addProperty("OnDblClick",0,pas["WEBLib.Controls"].$rtti.TNotifyEvent,"FOnDblClick","FOnDblClick"),e.addProperty("OnDeactivate",0,pas["WEBLib.Controls"].$rtti.TNotifyEvent,"FOnDeactivate","FOnDeactivate"),e.addProperty("OnDestroy",0,pas["WEBLib.Controls"].$rtti.TNotifyEvent,"FOnDestroy","FOnDestroy"),e.addProperty("OnDOMContentLoaded",0,pas["WEBLib.Controls"].$rtti.TNotifyEvent,"FOnDOMContentLoaded","FOnDOMContentLoaded"),e.addProperty("OnHashChange",0,t.$rtti.THashChangeEvent,"FOnHashChange","FOnHashChange"),e.addProperty("OnResize",0,pas["WEBLib.Controls"].$rtti.TNotifyEvent,"FOnResize","FOnResize"),e.addProperty("OnShow",0,pas["WEBLib.Controls"].$rtti.TNotifyEvent,"FOnShow","FOnShow"),e.addProperty("OnScroll",0,pas["WEBLib.Controls"].$rtti.TNotifyEvent,"FOnScroll","FOnScroll"),e.addProperty("OnOrientationChange",0,t.$rtti.TOrientationChangeEvent,"FOnOrientationChange","FOnOrientationChange"),e.addProperty("OnPaint",0,pas["WEBLib.Controls"].$rtti.TNotifyEvent,"FOnPaint","FOnPaint"),e.addProperty("OnTouchStart",0,pas["WEBLib.Controls"].$rtti.TTouchEvent,"FOnTouchStart","FOnTouchStart"),e.addProperty("OnTouchMove",0,pas["WEBLib.Controls"].$rtti.TTouchEvent,"FOnTouchMove","FOnTouchMove"),e.addProperty("OnTouchEnd",0,pas["WEBLib.Controls"].$rtti.TTouchEvent,"FOnTouchEnd","FOnTouchEnd"),e.addProperty("OnUnload",0,pas["WEBLib.Controls"].$rtti.TNotifyEvent,"FOnUnload","FOnUnload")})),rtl.createClass(this,"TCustomFrame",pas["WEBLib.Controls"].TCustomHTMLDiv,(function(){this.$init=function(){pas["WEBLib.Controls"].TCustomHTMLDiv.$init.call(this),this.FAutoScroll=!1,this.FAutoSize=!1,this.FBiDiMode$1=0,this.FConstraints=null,this.FCtl3D$1=!1,this.FDockSite=!1,this.FDragCursor=0,this.FDragKind=0,this.FDragMode$1=0,this.FOnAlignInsertBefore=null,this.FOnAlignPosition=null,this.FOnCanResize=null,this.FOnConstrainedResize=null,this.FOnContextPopup=null,this.FOnDockDrop=null,this.FOnDockOver=null,this.FOnEndDock=null,this.FOnGesture=null,this.FOnGetSiteInfo=null,this.FOnMouseActivate=null,this.FOnMouseWheelDown$1=null,this.FOnMouseWheelUp$1=null,this.FOnStartDock=null,this.FOnUnDock=null,this.FPadding=null,this.FParentBackground=!1,this.FParentCtl3D$1=!1,this.FPopupMenu=null},this.$final=function(){this.FConstraints=void 0,this.FOnAlignInsertBefore=void 0,this.FOnAlignPosition=void 0,this.FOnCanResize=void 0,this.FOnConstrainedResize=void 0,this.FOnContextPopup=void 0,this.FOnDockDrop=void 0,this.FOnDockOver=void 0,this.FOnEndDock=void 0,this.FOnGesture=void 0,this.FOnGetSiteInfo=void 0,this.FOnMouseActivate=void 0,this.FOnMouseWheelDown$1=void 0,this.FOnMouseWheelUp$1=void 0,this.FOnStartDock=void 0,this.FOnUnDock=void 0,this.FPadding=void 0,this.FPopupMenu=void 0,pas["WEBLib.Controls"].TCustomHTMLDiv.$final.call(this)};this.LoadHTMLFile=function(t){var e,i=null;""!==(e=this.$class.GetHTMLFileName())&&((i=new XMLHttpRequest).addEventListener("load",rtl.createSafeCallback(null,(function(e){var i;return null!==e&&(i=e.target.responseText,document.getElementById(t).innerHTML=i,!0,!0)}))),i.open("GET",e),i.send())},this.SetConstraints=function(t){this.FConstraints.Assign(t)},this.SetPopupMenu=function(t){this.FPopupMenu=t},this.SetPadding=function(t){this.FPadding.Assign(t)},this.GetHTMLFileName=function(){return this.$module.$name+t.Application.GetFormExtension()},this.UpdateElement=function(){var t;pas["WEBLib.Controls"].TControl.UpdateElement.call(this),t=this.FColor in rtl.createSet(15790320,-1,16777215,16711422),null!=this.GetElementHandle()&&!this.IsUpdating()&&4 in this.FComponentState&&t&&this.GetElementHandle().style.setProperty("background-color",pas["WEBLib.Graphics"].ColorToHTML(15790320))},this.Create$2=function(t){return pas["WEBLib.Controls"].TControl.Create$2.call(this,t),this.FPadding=pas["WEBLib.Controls"].TPadding.$create("Create$1"),this.LoadHTMLFile(t),this},this.Create$1=function(e){return pas["WEBLib.Controls"].TControl.Create$1.call(this,e),this.FPadding=pas["WEBLib.Controls"].TPadding.$create("Create$1"),this.FConstraints=t.TSizeConstraints.$create("Create$1",[this]),this},this.Destroy=function(){rtl.free(this,"FConstraints"),rtl.free(this,"FPadding"),pas["WEBLib.Controls"].TCustomControl.Destroy.call(this)},rtl.addIntf(this,pas["WEBLib.Controls"].IControl),rtl.addIntf(this,pas.System.IUnknown)})),rtl.createClass(this,"TFrame",this.TCustomFrame,(function(){rtl.addIntf(this,pas["WEBLib.Controls"].IControl),rtl.addIntf(this,pas.System.IUnknown);var e=this.$rtti;e.addProperty("Align",2,pas["WEBLib.Controls"].$rtti.TAlign,"FAlign","SetAlign",4,{Default:pas["WEBLib.Controls"].TAlign.alNone}),e.addProperty("Anchors",2,pas["WEBLib.Controls"].$rtti.TAnchors,"FAnchors","SetAnchors",4,{Default:rtl.createSet(0,1)}),e.addProperty("AutoScroll",0,rtl.boolean,"FAutoScroll","FAutoScroll",4,{Default:!1}),e.addProperty("AutoSize",0,rtl.boolean,"FAutoSize","FAutoSize",4,{Default:!1}),e.addProperty("BiDiMode",4,pas["WEBLib.Controls"].$rtti.TBiDiMode,"FBiDiMode$1","FBiDiMode$1"),e.addProperty("Constraints",2,t.$rtti.TSizeConstraints,"FConstraints","SetConstraints"),e.addProperty("DockSite",0,rtl.boolean,"FDockSite","FDockSite",4,{Default:!1}),e.addProperty("DoubleBuffered",0,rtl.boolean,"FDoubleBuffered","FDoubleBuffered",4,{Default:!1}),e.addProperty("DragCursor",0,pas["WEBLib.Controls"].$rtti.TCursor,"FDragCursor","FDragCursor",4,{Default:12}),e.addProperty("DragKind",0,pas["WEBLib.Controls"].$rtti.TDragKind,"FDragKind","FDragKind",4,{Default:pas["WEBLib.Controls"].TDragKind.dkDrag}),e.addProperty("DragMode",0,pas["WEBLib.Controls"].$rtti.TDragMode,"FDragMode$1","FDragMode$1",4,{Default:pas["WEBLib.Controls"].TDragMode.dmManual}),e.addProperty("Enabled",2,rtl.boolean,"FEnabled","SetEnabled",4,{Default:!0}),e.addProperty("Color",2,pas["WEBLib.Graphics"].$rtti.TColor,"FColor","SetColor"),e.addProperty("Ctl3D",4,rtl.boolean,"FCtl3D$1","FCtl3D$1"),e.addProperty("Font",2,pas["WEBLib.Graphics"].$rtti.TFont,"FFont","SetFont"),e.addProperty("Padding",2,pas["WEBLib.Controls"].$rtti.TPadding,"FPadding","SetPadding"),e.addProperty("ParentBackground",0,rtl.boolean,"FParentBackground","FParentBackground",4,{Default:!0}),e.addProperty("ParentBiDiMode",0,rtl.boolean,"FParentBiDiMode","FParentBiDiMode",4,{Default:!0}),e.addProperty("ParentColor",2,rtl.boolean,"FParentColor","SetParentColor",4,{Default:!1}),e.addProperty("ParentCtl3D",0,rtl.boolean,"FParentCtl3D$1","FParentCtl3D$1",4,{Default:!0}),e.addProperty("ParentDoubleBuffered",0,rtl.boolean,"FParentDoubleBuffered","FParentDoubleBuffered",4,{Default:!0}),e.addProperty("ParentFont",2,rtl.boolean,"FParentFont","SetParentFont",4,{Default:!0}),e.addProperty("ParentShowHint",0,rtl.boolean,"FParentShowHint","FParentShowHint"),e.addProperty("PopupMenu",2,pas["WEBLib.Menus"].$rtti.TPopupMenu,"FPopupMenu","SetPopupMenu"),e.addProperty("ShowHint",2,rtl.boolean,"FShowHint","SetShowHint",4,{Default:!1}),e.addProperty("TabOrder",2,rtl.longint,"FTabOrder","SetTabOrder"),e.addProperty("TabStop",2,rtl.boolean,"FTabStop","SetTabStop",4,{Default:!0}),e.addProperty("Visible",2,rtl.boolean,"FVisible","SetVisible",4,{Default:!0}),e.addProperty("OnAlignInsertBefore",0,t.$rtti.TAlignInsertBeforeEvent,"FOnAlignInsertBefore","FOnAlignInsertBefore"),e.addProperty("OnAlignPosition",0,t.$rtti.TAlignPositionEvent,"FOnAlignPosition","FOnAlignPosition"),e.addProperty("OnCanResize",0,t.$rtti.TCanResizeEvent,"FOnCanResize","FOnCanResize"),e.addProperty("OnClick",0,pas["WEBLib.Controls"].$rtti.TNotifyEvent,"FOnClick","FOnClick"),e.addProperty("OnConstrainedResize",0,t.$rtti.TConstrainedResizeEvent,"FOnConstrainedResize","FOnConstrainedResize"),e.addProperty("OnContextPopup",0,t.$rtti.TContextPopupEvent,"FOnContextPopup","FOnContextPopup"),e.addProperty("OnDblClick",0,pas["WEBLib.Controls"].$rtti.TNotifyEvent,"FOnDblClick","FOnDblClick"),e.addProperty("OnDockDrop",0,t.$rtti.TDockDropEvent,"FOnDockDrop","FOnDockDrop"),e.addProperty("OnDockOver",0,t.$rtti.TDockOverEvent,"FOnDockOver","FOnDockOver"),e.addProperty("OnDragDrop",0,pas["WEBLib.Controls"].$rtti.TDragDropEvent,"FOnDragDrop","FOnDragDrop"),e.addProperty("OnDragOver",0,pas["WEBLib.Controls"].$rtti.TDragOverEvent,"FOnDragOver","FOnDragOver"),e.addProperty("OnEndDock",0,pas["WEBLib.Controls"].$rtti.TEndDragEvent,"FOnEndDock","FOnEndDock"),e.addProperty("OnEndDrag",0,pas["WEBLib.Controls"].$rtti.TEndDragEvent,"FonEndDrag","FonEndDrag"),e.addProperty("OnEnter",0,pas["WEBLib.Controls"].$rtti.TNotifyEvent,"FOnEnter","FOnEnter"),e.addProperty("OnExit",0,pas["WEBLib.Controls"].$rtti.TNotifyEvent,"FOnExit","FOnExit"),e.addProperty("OnGesture",0,t.$rtti.TGestureEvent,"FOnGesture","FOnGesture"),e.addProperty("OnGetSiteInfo",0,t.$rtti.TGetSiteInfoEvent,"FOnGetSiteInfo","FOnGetSiteInfo"),e.addProperty("OnMouseActivate",0,t.$rtti.TMouseActivateEvent,"FOnMouseActivate","FOnMouseActivate"),e.addProperty("OnMouseDown",0,pas["WEBLib.Controls"].$rtti.TMouseEvent,"FOnMouseDown","FOnMouseDown"),e.addProperty("OnMouseEnter",0,pas["WEBLib.Controls"].$rtti.TNotifyEvent,"FOnMouseEnter","FOnMouseEnter"),e.addProperty("OnMouseLeave",0,pas["WEBLib.Controls"].$rtti.TNotifyEvent,"FOnMouseLeave","FOnMouseLeave"),e.addProperty("OnMouseMove",0,pas["WEBLib.Controls"].$rtti.TMouseMoveEvent,"FOnMouseMove","FOnMouseMove"),e.addProperty("OnMouseUp",0,pas["WEBLib.Controls"].$rtti.TMouseEvent,"FOnMouseUp","FOnMouseUp"),e.addProperty("OnMouseWheel",0,pas["WEBLib.Controls"].$rtti.TMouseWheelEvent,"FOnMouseWheel","FOnMouseWheel"),e.addProperty("OnMouseWheelDown",0,t.$rtti.TMouseWheelUpDownEvent,"FOnMouseWheelDown$1","FOnMouseWheelDown$1"),e.addProperty("OnMouseWheelUp",0,t.$rtti.TMouseWheelUpDownEvent,"FOnMouseWheelUp$1","FOnMouseWheelUp$1"),e.addProperty("OnResize",0,pas["WEBLib.Controls"].$rtti.TNotifyEvent,"FOnResize","FOnResize"),e.addProperty("OnStartDock",0,t.$rtti.TStartDockEvent,"FOnStartDock","FOnStartDock"),e.addProperty("OnStartDrag",0,pas["WEBLib.Controls"].$rtti.TStartDragEvent,"FOnStartDrag","FOnStartDrag"),e.addProperty("OnUnDock",0,t.$rtti.TUnDockEvent,"FOnUnDock","FOnUnDock")})),rtl.recNewT(this,"TApplicationError",(function(){this.AMessage="",this.AFile="",this.ALineNumber=0,this.AColNumber=0,this.AStack="",this.AError=null,this.$eq=function(t){return this.AMessage===t.AMessage&&this.AFile===t.AFile&&this.ALineNumber===t.ALineNumber&&this.AColNumber===t.AColNumber&&this.AStack===t.AStack&&this.AError===t.AError},this.$assign=function(t){return this.AMessage=t.AMessage,this.AFile=t.AFile,this.ALineNumber=t.ALineNumber,this.AColNumber=t.AColNumber,this.AStack=t.AStack,this.AError=t.AError,this}})),this.THintPosition={0:"hpLeft",hpLeft:0,1:"hpTop",hpTop:1,2:"hpRight",hpRight:2,3:"hpBottom",hpBottom:3},this.TOnlineStatus={0:"osOnline",osOnline:0,1:"osOffline",osOffline:1},rtl.createClass(this,"TApplication",pas["WEBLib.Controls"].TControl,(function(){this.$init=function(){pas["WEBLib.Controls"].TControl.$init.call(this),this.FAppContainer="",this.FMainFormOnTaskBar=!1,this.FCanCreateForm=!1,this.FAppInitializing=!1,this.FLastReq=null,this.FFormCaptionHeight=0,this.FActiveForm=null,this.FMainForm=null,this.FLoadForm=null,this.FInitFormClassName="",this.FFormStack=null,this.FParameters=null,this.FIsRedirect=!1,this.FLanguage=0,this.FOnError=null,this.FOnHashChange=null,this.FAutoFormRoute=!1,this.FErrorType=0,this.FOnOnlineChange=null,this.FOnActivate=null,this.FThemeTextColor=0,this.FThemeColor=0,this.FThemed=!1,this.FThemeButtonClassName="",this.FOnOAuthToken=null,this.FOnOAuthCallBack=null,this.FOnPopState=null,this.FMaxZIndex=0,this.FCreatedProc=null,this.FHandleOAuth=!1,this.FHintPause=0,this.FHintHidePause=0,this.FHintPosition=0,this.FHintClassName="",this.FOnExit$1=null,this.FOnException=null,this.FOnAutoCreateForm=null,this.FRouting=!1,this.FSBW=0},this.$final=function(){this.FLastReq=void 0,this.FActiveForm=void 0,this.FMainForm=void 0,this.FLoadForm=void 0,this.FFormStack=void 0,this.FParameters=void 0,this.FOnError=void 0,this.FOnHashChange=void 0,this.FOnOnlineChange=void 0,this.FOnActivate=void 0,this.FOnOAuthToken=void 0,this.FOnOAuthCallBack=void 0,this.FOnPopState=void 0,this.FCreatedProc=void 0,this.FOnExit$1=void 0,this.FOnException=void 0,this.FOnAutoCreateForm=void 0,pas["WEBLib.Controls"].TControl.$final.call(this)},this.DoFormLoad=function(t){var e;return e=t.target.responseText,this.CreateNewForm(this.FLoadForm,e),null!=this.FCreatedProc&&(this.FCreatedProc(this),this.FCreatedProc=null),!0,!0},this.DoFormAbort=function(t){return pas["WEBLib.Dialogs"].ShowMessage("Failed to load form HTML template file"),!0,!0},this.DoHandleError=function(e){var i,s=!1,n=t.TApplicationError.$new(),r=null,a=null,o=null,l="",h="",d="",u=!1,c=!1,F=void 0,p=null;if(u=!0,c=!1,F=null,n.AFile="",n.ALineNumber=0,n.AColNumber=0,n.AError=null,null==e.message&&(u=!1,e instanceof PromiseRejectionEvent&&(u=!0,c=!0,l=e.reason.FMessage,h=e.reason.FStack,F=e.reason)),!c&&"ResizeObserver loop limit exceeded"===e.message)return s;if(!c&&"ResizeObserver loop completed with undelivered notifications."===e.message)return s;if(!u)return n.AMessage="Undefined JavaScript exception",n.AFile="",n.ALineNumber=0,n.AColNumber=0,n.AError=null,null!=this.FOnError&&this.FOnError(this,t.TApplicationError.$clone(n),{get:function(){return s},set:function(t){s=t}}),s;if(c?(n.AMessage=l,n.AStack=h,n.AError=F):(n.AMessage=e.message,n.AFile=e.filename,n.ALineNumber=e.lineno,n.AColNumber=e.colno,n.AError=e.error,n.AStack=""),d="",null!=e.error){e.error.stack&&(n.AStack=e.error.stack),e.error.fMessage&&(n.AMessage=e.error.fMessage),e.error.hasOwnProperty("FJSError")&&(F=e.error.FJSError),d=function(t){var e="";for(var i in t)t.hasOwnProperty(i)&&(e+=i+"::"+t[i]+"\n");return e}(e.error)}pas.System.Assigned(F)&&(p=n.AError,null!=this.FOnException&&this.FOnException(this,p)),s=!1,i="ERROR<br>"+n.AMessage+" | "+d+n.AStack+"<BR> at "+n.AFile+" ["+pas.SysUtils.IntToStr(n.ALineNumber)+":"+pas.SysUtils.IntToStr(n.AColNumber)+"]";var S=this.FErrorType;return 3===S?null!=(r=document.getElementById("tmserrormessage"))?rtl.asExt(r.firstChild,HTMLElement).innerHTML=i:((r=document.createElement("DIV")).setAttribute("id","tmserrormessage"),r.style.setProperty("position","absolute"),r.style.setProperty("font-family","Courier"),r.style.setProperty("font-size","8pt"),r.style.setProperty("bottom","0"),r.style.setProperty("width","100%"),r.style.setProperty("height","100px"),r.style.setProperty("background","#ff0000"),r.style.setProperty("color","#ffffff"),document.body.style.setProperty("padding","0"),document.body.style.setProperty("margin","0"),(a=document.createElement("SPAN")).style.setProperty("margin-left","4px"),a.style.setProperty("float","left"),a.style.setProperty("overflow","hidden"),a.style.setProperty("display","block"),a.innerHTML=i,r.appendChild(a),(o=document.createElement("SPAN")).style.setProperty("font-family","Courier"),o.style.setProperty("font-size","8pt"),o.style.setProperty("font-weight","bold"),o.style.setProperty("position","absolute"),o.style.setProperty("width","20px"),o.style.setProperty("vertical-align","top"),o.style.setProperty("cursor","pointer"),o.style.setProperty("text-align","right"),o.style.setProperty("right","4px"),o.style.setProperty("display","block"),o.innerHTML="X",o.onclick=rtl.createSafeCallback(this,"DoErrorClose"),r.appendChild(o),document.body.appendChild(r)):2===S?window.alert(i):1===S&&(this.AddControlLink("googlematerial","https://fonts.googleapis.com/icon?family=Material+Icons"),pas["WEBLib.Dialogs"].MessageDlg(i,1,rtl.createSet(2),null)),null!=this.FOnError&&this.FOnError(this,t.TApplicationError.$clone(n),{get:function(){return s},set:function(t){s=t}}),s},this.DoHandleExit=function(t){return!0,null!=this.FOnExit$1&&this.FOnExit$1(this),!0},this.DoHashChange=function(t){var e="",i=null,s=null,n=null,r=!1;return!0,!this.FAutoFormRoute||(e=location.hash,pas.System.Delete({get:function(){return e},set:function(t){e=t}},1,1),r=!1,null!=this.FOnHashChange&&this.FOnHashChange(this,e,{get:function(){return r},set:function(t){r=t}}),r||(""===e&&(e=this.FInitFormClassName),""!==e&&(""===this.FInitFormClassName&&(this.FInitFormClassName=this.FActiveForm.$classname),null!=(i=pas.Classes.GetClass(e))&&(n=document.body,this.CreateForm$6(i,n,{get:function(){return s},set:function(t){s=t}})))),!0)},this.DoPopState=function(t){return null!=this.FOnPopState&&this.FOnPopState(this,t.state),!0,!0},this.DoErrorClose=function(t){return document.body.removeChild(t.target.parentElement),!0,!0},this.DoUpdateOnlineStatus=function(t){return!0,null!=this.FOnOnlineChange&&(window.navigator.onLine?this.FOnOnlineChange(this,0):this.FOnOnlineChange(this,1)),!0},this.DoVisibilityChange=function(t){var e;return!0,e="visible"===document.visibilityState,null!=this.FOnActivate&&this.FOnActivate(this,e),!0},this.CreateNewForm=function(e,i){var s=null,n=null,r=null,a=null,o=null,l=0,h=0,d=0,u=0,c=null,F=null,p=0,S=null;if(null===this.FMainForm&&(this.FMainForm=e),r=null,o=null,p=0,e.FPopup||""===e.FFormElement){if(e.ClearControls(),e.FLayer$1=e.CreateLayer(),document.body.appendChild(e.FLayer$1),s=e.FLayer$1,e.FPopup&&e.FPopupOpacity<1&&((n=e.CreateLayer()).style.setProperty(pas["WEBLib.Controls"].CSSBackground,"black"),n.style.setProperty("opacity",pas["WEBLib.WebTools"].DoubleToHTML(e.FPopupOpacity)),n.style.setProperty(pas["WEBLib.Controls"].CSSZIndex,t.Application.MaxZIndexStr()),s.appendChild(n)),t.Application.ChangeMaxZIndex(1),(r=document.createElement("DIV")).style.setProperty(pas["WEBLib.Controls"].CSSZIndex,t.Application.MaxZIndexStr()),e.FPopupElement=r,e.FBorder in rtl.createSet(3,4)){r.style.setProperty("resize","both"),r.style.setProperty("overflow","auto"),S=null;try{var m=e;(S=new ResizeObserver((function(t){window.requestAnimationFrame(()=>{Array.isArray(t)&&t.length&&t.forEach((function(t){m.HandleObserver()}))})}))).observe(r)}catch(t){r.style.removeProperty("resize"),r.style.removeProperty("overflow")}e.FResizeObserver=S}""!==e.FElementClassName&&r.setAttribute("class",e.FElementClassName),e.FShadow&&e.FPopup&&r.style.setProperty("box-shadow","3px 3px 3px silver"),s.appendChild(r),e.GetMethodPointers(),e.FBorder in rtl.createSet(3,4)?(F=e.CreateCaption(),r.appendChild(F),(a=document.createElement("DIV")).style.setProperty("position","absolute"),a.style.setProperty("width","100%"),a.setAttribute("id","childspan"),r.appendChild(a),o=a,p=t.Application.FFormCaptionHeight):o=r,o.innerHTML=i,e.FContainer=o}else e.FLayer$1=null,null!=(s=document.getElementById(e.FFormElement))&&(s.innerHTML=i,""===e.FElementClassName&&0===e.FCSSLibrary&&s.style.setProperty(pas["WEBLib.Controls"].CSSBackground,pas["WEBLib.Graphics"].ColorToHTML(e.FColor)));e.Init(),e.LoadDFMValues(),e.FBorder in rtl.createSet(3,4)&&""!==e.FElementCaptionClassName&&(F.classList.add(e.FElementCaptionClassName),F.style.removeProperty("background-color"),F.style.removeProperty("color")),null!=e.FLayer$1&&(e.FPopup||(""===e.FElementClassName?-1!==e.FColor?s.style.setProperty(pas["WEBLib.Controls"].CSSBackground,pas["WEBLib.Graphics"].ColorToHTML(e.FColor)):s.style.setProperty(pas["WEBLib.Controls"].CSSBackground,"white"):s.setAttribute("class",e.FElementClassName),1===e.FCSSLibrary&&""===e.FElementClassName&&(s.setAttribute("class","card"),s.style.removeProperty("background-color"),s.style.setProperty("display","block")))),null!=r&&""===e.FFormContainer&&e.FPopup&&4===e.FPosition&&(r.style.setProperty("position","absolute"),l=Math.max(0,Math.round((t.WinWidth()-e.GetWidth())/2))+window.scrollX,h=Math.max(0,Math.round((t.WinHeight()-e.GetHeight())/2))+window.scrollY,d=e.GetWidth(),u=e.GetClientHeight()+p,e.FTop=h,e.FLeft=l,e.SetWidthInt(d),e.SetHeightInt(u),""===e.FElementClassName&&0===e.FCSSLibrary&&(r.style.setProperty(pas["WEBLib.Controls"].CSSBackground,pas["WEBLib.Graphics"].ColorToHTML(e.FColor)),r.style.setProperty("border","1px Black solid")),r.style.setProperty("top",pas.SysUtils.IntToStr(h)+"px"),r.style.setProperty("left",pas.SysUtils.IntToStr(l)+"px"),r.style.setProperty("width",pas.SysUtils.IntToStr(d)+"px"),r.style.setProperty("height",pas.SysUtils.IntToStr(u)+"px")),null!=o&&this.ActivateChildScripts(o),null!=e.FOnCreate&&e.FOnCreate(e),null!=e.FCreatedProc&&(c=e.FCreatedProc,e.FCreatedProc=null,c(e)),e.Loaded(),e.InitAnchoring(),e.UpdateChildAnchoring(),e.FCreating=!1,e.UpdateElement(),e.EventsBound()||e.BindEvents(),e.Resize$1(),e.DoShow()},this.GetFormExtension=function(){return 0!==this.FLanguage?"_"+pas["WEBLib.Lang"].GetLanguageISO639_1Code(this.FLanguage)+pas["WEBLib.WebTools"].cHTMLExt:pas["WEBLib.WebTools"].cHTMLExt};this.GetAuthorizationPageHTML=function(t){function e(t,e){var i=0,s="";s='<!doctype html>\r\n<html lang="en">\r\n<head>\r\n  <title>Authentication Result</title>\r\n  <meta name="viewport" content="width=device-width, initial-scale=1">\r\n</head>\r\n<body>\r\n<style>\r\n  hr\r\n  {\r\n    border: none;\r\n    height: 1px;\r\n    background-color: rgb(171, 171, 171);\r\n  }\r\n  div.container\r\n  {\r\n    position: fixed;\r\n    font-family: Arial;\r\n    font-size: 12pt;\r\n    max-width: 100%;\r\n    max-height: 100%;\r\n    top: 50%;\r\n    left: 50%;\r\n    transform: translate(-50%, -50%);\r\n  }\r\n  div.section\r\n  {\r\n    display: inline-block;\r\n    margin: 15px;\r\n    padding: 5px;\r\n    float: left;\r\n  }\r\n  div.image img\r\n  {\r\n    height: 100%;\r\n  }\r\n  div.text\r\n  {\r\n    padding-top: 15px;\r\n  }\r\n  div.text2\r\n  {\r\n    font-size: 18pt;\r\n    color: #PLACEHOLDERCOLOR#;\r\n  }\r\n  span.title\r\n  {\r\n    font-size: 26px;\r\n  }\r\n</style>\r\n  <div class="container">\r\n  <div class="section image">\r\n    <img src="#PLACEHOLDERIMAGE#">\r\n  </div>\r\n  <div class="section text">\r\n  #PLACEHOLDERTEXT#\r\n  </div>\r\n  </div>\r\n </body>\r\n</html>';for(var n=0,r=rtl.length(t)-1;n<=r;n++)i=n,s=pas.SysUtils.StringReplace(s,t[i],e[i],rtl.createSet(0));return s}return e(["#PLACEHOLDERIMAGE#","#PLACEHOLDERTEXT#","#PLACEHOLDERCOLOR#"],t?["data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAAEAAAABACAYAAACqaXHeAAAACXBIWXMAAA7DAAAOwwHHb6hkAAACC0lEQVR4nO2Zv3GDMBSHv+QyQEbICM4EOW+Q9BS4o2QTU9LZBQNkg6zgETyCR0iRkOMIAv3Xk0+/zsiI931nI3iCkpKSkpKSkpKSkpJ7SDN0x2bo3nW//xCymNhphu4E1MAN2PdVe9k6524ETODHXIHXvmpva+c9BqwpWhbgAV6Ar61zsxeggB+z+x1XJmsBG/Bj6mboWtVgtvcATfhpPvqq/ZwfzFKABTwoVobsBFjCj7kyWxmyugc4wsPCypCNAA/wY/L7C3iEP/dVe5geEC8gJDwIFxAaHgQLiAEPQgXEggeBAmLCgzABseFBkIAU8CBEQCp4ECAgJTwYChibCzYXWpmv9jCVFTwYCJgVa31BxXwucapFS4CiWOsLS4EHDQEbxRoXIAkeNgRoFqtdiDR4WBFgWOxmQRLhQdEQsSi2bobuqBqUCg8LvwDHYg991Z49zjeNd3iYCfBU7J8E6fAAT7PPOw9znpqhA3hDODz8F7Dnp2vqKmJ1O8ogQeFh+R7wjB8JrgkOD4plUICEKPCw/hyQSkI0eNh+EowtISo86L0LxJIQHR703wZDS0gCD2b9gFASksGDeUfIt4Sk8GDRE/QoITk8WDZFPUgQAQ8OXWEHCWLgwbEtbiFBFDx42BcwkCAOHjxtjGhIEAkPHneGViSIhQfPW2MLEkTDQ4C9wYmEi3T4kpKSkm+5ax+YhPsUTQAAAABJRU5ErkJggg==",'<div class="text2">Application succesfully authorized</div>You can close this browser window',"rgb(104, 164, 144)"]:["data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAAEAAAABACAYAAACqaXHeAAAACXBIWXMAAA7DAAAOwwHHb6hkAAABtElEQVR4nO2bUY7CMAxEhz0NB+EgrDjXCg6yB+E4+9NKCAiN7XHcjf1+ED+Z6ahNHScFiqIoBNwvp+v9crpG+3hG6+sgFQFwXv7ejj+/31JBDyy+ugN4ElkJD8HqqyuAhohYjA3D12YAGyIiMSYsXx8D6BTpFmPB9NUMQCjSJcaA7ettAEqRTTErHr5eAjCKfBSz4OXryzhgizOzWCJd/Fs8HoFHzHeCtxf2JNgt3MMID8zXoMpAtDarEDIbidJklMJUQ6MDty6GNDSNRdxtluWwhReDUfONKADAx2jkZCsOAOAaXn4pY2let6oAAN/qTIG61lAHAOwmBFO1aQoACA/BXGqbAwDCQqCsOCkBAMNDoC23aQEAw0Kg9hqoAQDuIdAbLfQAALcQXFptLgEA9BDc+oxeLbF/Qz0C7AFTT4KpX4OpC6HUpXDqxVDq5fBOLn5lbEMkdUssdVM0dVs89cZI6q2x1JujqbfHUx+Q2MPFj/LidUqsKajB05NXS4y6Zl/GurHGe6QOSpLF5jgqqxSb67C0UGzO4/KdYnN/MLEhluOTmYZY+MWvDPU122dzRVHk5g+X6Lw5aVkK9AAAAABJRU5ErkJggg==",'<div class="text2">Application authorization failed</div><br/>Please try again.',"rgb(216, 99, 68)"])},this.GetColorScheme=function(){var t=0;return t=0,"not all"!==window.matchMedia("(prefers-color-scheme)").media&&(t=window.matchMedia("(prefers-color-scheme: dark)").matches?2:1),t},this.GetBootstrapVersion=function(){var t=0,e="";return e="","undefined"!=typeof bootstrap&&(e=bootstrap.Tooltip.VERSION),t=0,1===pas.System.Pos("4.",e)?t=1:1===pas.System.Pos("5.",e)&&(t=2),t},this.ActivateChildScripts=function(t){!function t(e){if(!0===function(t){return"SCRIPT"===t.tagName}(e))e.parentNode.replaceChild(function(t){var e=document.createElement("script");e.async=!1,e.text=t.innerHTML;for(var i=t.attributes.length-1;i>=0;i--)e.setAttribute(t.attributes[i].name,t.attributes[i].value);return e}(e),e);else for(var i=0,s=e.childNodes;i<s.length;)t(s[i++]);return e}(t)},this.ChangeMaxZIndex=function(t){this.FMaxZIndex=this.FMaxZIndex+t},this.TriggerNotification=function(){},this.AutoCreateForm=function(t,e){null!=this.FOnAutoCreateForm?this.FOnAutoCreateForm(this,t,e):this.CreateForm(t,e)},this.LockForm=function(t){for(var e=0,i=0,s=t.GetControlsCount()-1;i<=s;i++)e=i,t.GetControls(e).DisableTab()},this.UnLockForm=function(t){for(var e=0,i=0,s=t.GetControlsCount()-1;i<=s;i++)e=i,t.GetControls(e).EnableTab()},this.Create$1=function(t){return this.FFormStack=pas.Classes.TList.$create("Create$1"),this.FParameters=pas.Classes.TStringList.$create("Create$1"),this.FAppContainer=pas["WEBLib.WebTools"].cBodyTag,this.FMainForm=null,this.FActiveForm=null,this.FInitFormClassName="",this.FIsRedirect=!1,this.FAutoFormRoute=!1,this.FThemed=!1,this.FThemeColor=14917120,this.FThemeTextColor=16777215,this.FFormCaptionHeight=22,this.FMaxZIndex=998,this.FHandleOAuth=!0,this.FHintPause=200,this.FHintHidePause=250,this.FHintPosition=1,this.FHintClassName="",this.FSBW=-1,window.addEventListener("error",rtl.createCallback(this,"DoHandleError")),window.addEventListener("unhandledrejection",rtl.createCallback(this,"DoHandleError")),window.addEventListener("beforeunload",rtl.createSafeCallback(this,"DoHandleExit")),this.FErrorType=0,this},this.Destroy=function(){rtl.free(this,"FFormStack"),rtl.free(this,"FParameters"),pas["WEBLib.Controls"].TControl.Destroy.call(this)},this.MaxZIndexStr=function(){return pas.SysUtils.IntToStr(this.FMaxZIndex)},this.CalcScrollBarWidth=function(){var t=0;if(-1!==this.FSBW)return this.FSBW;return function(){const e=document.createElement("div");e.style.overflow="scroll",e.style.position="absolute",e.style.top="-9999px",e.style.width="100px",e.style.height="100px",document.body.appendChild(e);const i=e.offsetWidth-e.clientWidth;document.body.removeChild(e),t=i}(),this.FSBW=t,this.FSBW},this.CreateForm=function(t,e){this.CreateForm$2(t,this.FAppContainer,e,null)},this.CreateForm$2=function(t,e,i,s){this.CreateForm$3(t,e,i,s,!0)},this.CreateForm$3=function(e,i,s,n,r){var a=this,o="";function l(r){var l,h=null,d=null,u="",c=!1;return(l=null!=r)?(u=r.target.responseText,(h=(c=pas.SysUtils.LowerCase(i)===pas["WEBLib.WebTools"].cBodyTag)?document.body:document.getElementById(i)).innerHTML=u):h=document.body,(d=e.$create("Create$5",[i,s])).FFormFileName=o,""===d.FFormContainer&&d.SetFormContainer(i),c||(d.FFormElement=i,d.FContainer=h),d.CreateControl(),d.Init(),d.SetColorScheme(t.Application.GetColorScheme()),d.FPrevActiveForm=a.FActiveForm,a.FActiveForm=d,null===a.FMainForm&&(a.FMainForm=d),null!=n&&n(d),!0,l&&a.ActivateChildScripts(h),a.FActiveForm.DoShow(),a.FActiveForm.Resize$1(),!0}if(!this.FIsRedirect){if(this.FAppInitializing){if(!this.FCanCreateForm)return;this.FCanCreateForm=!1}""!==(o=e.GetHTMLFileName(!1))&&r?(this.FLastReq=new XMLHttpRequest,this.FLastReq.addEventListener("load",rtl.createSafeCallback(null,l)),this.FLastReq.open("GET",o),this.FLastReq.send()):l(null)}},this.CreateForm$4=function(t,e){var i;i=t.$create("Create$1",[this]),e.set(i)},this.CreateForm$6=function(t,e,i){this.CreateForm$2(t,e.id,i,null)},this.CreateFormDirect$2=function(t,e){this.CreateForm$4(t,e)},this.LoadForm=function(t,e){t.FPrevActiveForm=this.FActiveForm,this.FActiveForm=t,this.FLoadForm=t,null===this.FMainForm&&(this.FMainForm=t),this.FLastReq=new XMLHttpRequest,this.FLastReq.addEventListener("load",rtl.createSafeCallback(this,"DoFormLoad")),this.FLastReq.addEventListener("abort",rtl.createSafeCallback(this,"DoFormAbort")),this.FLastReq.open("GET",e),this.FLastReq.send()},this.HasCSS=function(t){var e=!1,i=null,s=0,n="";e=!1;for(var r=0,a=(i=document.querySelectorAll("head > link")).length-1;r<=a;r++)if(s=r,n=i.item(s).href,0===pas.SysUtils.CompareText(n,t)){e=!0;break}return e},this.Initialize=function(){var t,e,i="",s="";if(this.FCanCreateForm=!0,this.FAppInitializing=!0,this.FParameters.Clear(),i=window.location.href,this.InitFormatSettings(pas["WEBLib.WebTools"].GetBrowserLocale()),this.FParameters.SetDelimiter("&"),this.FParameters.FStrictDelimiter=!0,(t=pas.System.Pos("?",i))>0&&(i=pas.System.Copy(i,t+1,i.length)),this.FParameters.SetDelimitedText(i),e="Authentication"==window.name,null!=this.FOnOAuthCallBack&&(-1!==this.FParameters.IndexOfName("oauthcallback")||e))return this.FOnOAuthCallBack(this,i),this.FIsRedirect=!0,void(document.body.innerHTML=this.GetAuthorizationPageHTML(!0));-1!==this.FParameters.IndexOfName("code")&&this.FHandleOAuth&&(null!=this.FOnOAuthToken&&this.FOnOAuthToken(this,i),this.FIsRedirect=!0,s=this.FParameters.GetValue("code"),window.opener&&window.opener.processAuthData&&(window.opener.processAuthData(s),window.close())),window.addEventListener("hashchange",rtl.createSafeCallback(this,"DoHashChange")),window.addEventListener("online",rtl.createSafeCallback(this,"DoUpdateOnlineStatus")),window.addEventListener("offline",rtl.createSafeCallback(this,"DoUpdateOnlineStatus")),window.addEventListener("popstate",rtl.createCallback(this,"DoPopState")),document.addEventListener("visibilitychange",rtl.createSafeCallback(this,"DoVisibilityChange")),null!==window.opener&&-1!==this.FParameters.IndexOfName("access_token")&&(this.FIsRedirect=!0,s=this.FParameters.GetValue("access_token"),window.opener&&window.opener.processAuthData&&(window.opener.processAuthData(s),window.close()))},this.InitFormatSettings=function(t){var e,i,s=0;i=t,pas.SysUtils.FormatSettings.ShortDateFormat=pas["WEBLib.WebTools"].GetLocaleShortDateFormat(i),pas.System.Pos("/",pas.SysUtils.FormatSettings.ShortDateFormat)>0&&(pas.SysUtils.FormatSettings.DateSeparator="/"),pas.System.Pos(".",pas.SysUtils.FormatSettings.ShortDateFormat)>0&&(pas.SysUtils.FormatSettings.DateSeparator="."),pas.System.Pos("-",pas.SysUtils.FormatSettings.ShortDateFormat)>0&&(pas.SysUtils.FormatSettings.DateSeparator="-");var n=new Date("Jan 1, 1980 06:07:08 GMT+00:00"),r="";for(r=""==i?navigator.language:i,e=n.toLocaleTimeString(r),pas.System.Pos(":",e)>0&&(pas.SysUtils.FormatSettings.TimeSeparator=":"),pas.System.Pos(".",e)>0&&(pas.SysUtils.FormatSettings.TimeSeparator="."),pas.System.Pos("-",e)>0&&(pas.SysUtils.FormatSettings.TimeSeparator="-"),s=1;s<=7;s++)pas.SysUtils.FormatSettings.ShortDayNames[s-1]=pas["WEBLib.WebTools"].GetLocaleShortDayName(s,i),pas.SysUtils.FormatSettings.LongDayNames[s-1]=pas["WEBLib.WebTools"].GetLocaleLongDayName(s,i);for(s=1;s<=12;s++)pas.SysUtils.FormatSettings.ShortMonthNames[s-1]=pas["WEBLib.WebTools"].GetLocaleShortMonthName(s,i),pas.SysUtils.FormatSettings.LongMonthNames[s-1]=pas["WEBLib.WebTools"].GetLocaleLongMonthName(s,i);pas.SysUtils.FormatSettings.DecimalSeparator=pas["WEBLib.WebTools"].GetLocaleDecimalSeparator(""),"."===pas.SysUtils.FormatSettings.DecimalSeparator?pas.SysUtils.FormatSettings.ThousandSeparator=",":pas.SysUtils.FormatSettings.ThousandSeparator="."},this.Run=function(){this.FCanCreateForm=!0,this.FAppInitializing=!1},this.Navigate=function(t,e){0===e?window.open(t,"_blank"):window.location.href=t},rtl.addIntf(this,pas["WEBLib.Controls"].IControl),rtl.addIntf(this,pas.System.IUnknown)})),this.GetParentForm=function(e){var i=null,s=null;for(i=null,s=e;null!=s&&!t.TCustomForm.isPrototypeOf(s);)s=s===e&&null===s.FOwner?e.FParent:s.FOwner;return null!=s&&t.TCustomForm.isPrototypeOf(s)&&(i=rtl.as(s,t.TCustomForm)),i},this.WinWidth=function(){return null!=t.VSIDE?pas["WEBLib.Forms"].VSIDE.clientWidth():window.innerWidth},this.WinHeight=function(){return null!=t.VSIDE?pas["WEBLib.Forms"].VSIDE.clientHeight():window.innerHeight},this.Application=null,this.HandShakeScript=null,this.VSIDE=null,this.LastHash="",t.$implcode=function(){e.ReleaseForm=function(t){t=rtl.freeLoc(t),t=null}},t.$init=function(){t.HandShakeScript=document.createElement("script"),t.HandShakeScript.id="HandShakeScript",t.HandShakeScript.type="text/javascript",t.HandShakeScript.innerHTML='var IDE = null;\r\nvar TMSWEBCoreClientIdentifier = "unknown";\r\nvar TMSWEBCoreOAuthCallback = "unknown";\r\nfunction HandShake(cid){\r\n  TMSWEBCoreClientIdentifier = cid;\r\n}',document.body.appendChild(t.HandShakeScript),t.Application=t.TApplication.$create("Create$1",[null])}}),["WEBLib.Dialogs","WEBLib.WebTools","WEBLib.JSON","WEBLib.Utils","Math"]),rtl.module("Bcl.Json.Common",["System","Types","JS"],(function(){"use strict";this.JToInt=function(t){return rtl.trunc(t)},this.JToStr=function(t){return""+t},this.JToBool=function(t){return!(0==t)},this.AsJObject=function(t){return t},this.AsJArray=function(t){return t},this.JObjectKeys=function(t){return Object.keys(t)}})),rtl.module("Bcl.Collections.Common",["System","Types","Bcl.Json.Common","JS","SysUtils"],(function(){"use strict";rtl.createClass(this,"TStringMap",pas.System.TObject,(function(){this.$init=function(){pas.System.TObject.$init.call(this),this.FMap=null},this.$final=function(){this.FMap=void 0,pas.System.TObject.$final.call(this)},this.GetItem=function(t){return rtl.getObject(this.FMap[t])},this.GetKeys=function(){return Object.keys(this.FMap)},this.Create$1=function(t){return this.FMap=new Object,this},this.Destroy=function(){pas.System.TObject.Destroy.call(this)},this.Clear=function(){for(var t=0,e=rtl.length(this.GetKeys())-1;e>=0;e--)t=e,this.Remove(this.GetKeys()[t])},this.Add=function(t,e){this.FMap[t]=e},this.AddOrSetValue=function(t,e){this.FMap[t]=e},this.ContainsKey=function(t){return this.FMap.hasOwnProperty(t)},this.Remove=function(t){delete this.FMap[t]}}))})),rtl.module("XData.Web.Headers",["System","Types","SysUtils","Bcl.Collections.Common"],(function(){"use strict";var t=this;rtl.createClass(this,"THttpHeaderInfo",pas.System.TObject,(function(){this.$init=function(){pas.System.TObject.$init.call(this),this.FName="",this.FValue=""},this.Create$1=function(t,e){return this.FName=t,this.FValue=e,this}})),rtl.createClass(this,"THttpHeaders",pas.System.TObject,(function(){this.$init=function(){pas.System.TObject.$init.call(this),this.FHeaders=null},this.$final=function(){this.FHeaders=void 0,pas.System.TObject.$final.call(this)},this.GetHeaderNames=function(){return this.FHeaders.GetKeys()},this.Create$1=function(){return this.FHeaders=pas["Bcl.Collections.Common"].TStringMap.$create("Create$1",[!0]),this},this.Destroy=function(){rtl.free(this,"FHeaders"),pas.System.TObject.Destroy.call(this)},this.SetValue=function(e,i){""!==e&&this.FHeaders.AddOrSetValue(pas.SysUtils.LowerCase(e),t.THttpHeaderInfo.$create("Create$1",[pas.SysUtils.LowerCase(e),pas.SysUtils.Trim(i)]))},this.Get=function(t){return this.FHeaders.ContainsKey(pas.SysUtils.LowerCase(t))?this.FHeaders.GetItem(pas.SysUtils.LowerCase(t)).FValue:""},this.Clear=function(){this.FHeaders.Clear()}}))})),rtl.module("XData.Web.Request",["System","XData.Web.Headers"],(function(){"use strict";var t=this;rtl.createInterface(this,"IHttpRequest","{782AF543-EFEB-4DA5-AC25-842DF76723A0}",["GetMethod","SetMethod","GetUri","SetUri","GetTimeout","GetHeaders","GetContent","SetContent","GetResponseType","SetResponseType"],pas.System.IUnknown),rtl.createClass(this,"THttpRequest",pas.System.TInterfacedObject,(function(){this.$init=function(){pas.System.TInterfacedObject.$init.call(this),this.FMethod="",this.FUri="",this.FHeaders=null,this.FContent=void 0,this.FTimeout=0,this.FResponseType=""},this.$final=function(){this.FHeaders=void 0,pas.System.TInterfacedObject.$final.call(this)},this.GetMethod=function(){return this.FMethod},this.SetMethod=function(t){this.FMethod=pas.SysUtils.UpperCase(t)},this.GetUri=function(){return this.FUri},this.SetUri=function(t){this.FUri=t},this.GetTimeout=function(){return this.FTimeout},this.GetHeaders=function(){return this.FHeaders},this.GetContent=function(){return this.FContent},this.SetContent=function(t){this.FContent=t},this.GetResponseType=function(){return this.FResponseType},this.SetResponseType=function(t){this.FResponseType=t},this.Create$1=function(){return this.Create$3("","GET"),this},this.Create$2=function(t){return this.Create$3(t,"GET"),this},this.Create$3=function(t,e){return this.FHeaders=pas["XData.Web.Headers"].THttpHeaders.$create("Create$1"),this.FUri=t,this.FMethod=e,this.FTimeout=0,this},this.Destroy=function(){rtl.free(this,"FHeaders"),pas.System.TObject.Destroy.call(this)},rtl.addIntf(this,t.IHttpRequest),rtl.addIntf(this,pas.System.IUnknown)}))}),["SysUtils"]),rtl.module("XData.Web.Response",["System","XData.Web.Headers","Web"],(function(){"use strict";var t=this;rtl.createInterface(this,"IHttpResponse","{4F5FBBEB-2D03-446F-AD75-FFF8DB09B0B0}",["GetStatusCode","GetStatusReason","GetHeaders","GetContentAsText","GetContent"],pas.System.IUnknown),rtl.createClass(this,"THttpResponse",pas.System.TInterfacedObject,(function(){this.$init=function(){pas.System.TInterfacedObject.$init.call(this),this.FPrepared=!1,this.FHeaders=null},this.$final=function(){this.FHeaders=void 0,pas.System.TInterfacedObject.$final.call(this)},this.GetHeaders=function(){return this.PrepareResponse(),this.FHeaders},this.PrepareResponse=function(){this.FPrepared||(this.FPrepared=!0,this.UpdateHeaders(this.FHeaders))},this.Create$1=function(){return this.FHeaders=pas["XData.Web.Headers"].THttpHeaders.$create("Create$1"),this},this.Destroy=function(){rtl.free(this,"FHeaders"),pas.System.TObject.Destroy.call(this)},rtl.addIntf(this,t.IHttpResponse),rtl.addIntf(this,pas.System.IUnknown)})),rtl.createClass(this,"TXhrHttpResponse",this.THttpResponse,(function(){this.$init=function(){t.THttpResponse.$init.call(this),this.FXhr=null},this.$final=function(){this.FXhr=void 0,t.THttpResponse.$final.call(this)},this.GetStatusCode=function(){return this.FXhr.status},this.GetStatusReason=function(){return this.FXhr.statusText},this.UpdateHeaders=function(t){var e=[],i=[];e=pas.SysUtils.Trim(this.FXhr.getAllResponseHeaders()).split("\r\n"),this.FHeaders.Clear();for(var s=0,n=rtl.length(e)-1;s<=n;s++)i=e[s].split(":"),this.FHeaders.SetValue(pas.SysUtils.Trim(i[0]),pas.SysUtils.Trim(i[1]))},this.GetContentAsText=function(){return this.FXhr.responseText},this.GetContent=function(){return this.FXhr.response},this.Create$2=function(e){return t.THttpResponse.Create$1.call(this),this.FXhr=e,this},rtl.addIntf(this,t.IHttpResponse),rtl.addIntf(this,pas.System.IUnknown)})),rtl.createClass(this,"TDummyHttpResponse",this.THttpResponse,(function(){this.GetStatusCode=function(){return 0,0},this.GetStatusReason=function(){return"",""},this.UpdateHeaders=function(t){},this.GetContentAsText=function(){return"",""},this.GetContent=function(){},rtl.addIntf(this,t.IHttpResponse),rtl.addIntf(this,pas.System.IUnknown)}))}),["Types","SysUtils","JS"]),rtl.module("StrUtils",["System","SysUtils","Types"],(function(){"use strict";var t=this,e=t.$impl;this.Soundex=function(t,i){var s="",n="\0",r="\0",a=0,o=0;if(s="",r="\0",t.length>0)for(s=pas.System.upcase(t.charAt(0)),a=2,o=t.length;a<=o&&s.length<i;)(n=e.SScore.charAt(t.charCodeAt(a-1)-1)).charCodeAt()in rtl.createSet(48,105,r.charCodeAt())||(s+=n),"i"!==n&&(r=n),a+=1;return(o=s.length)<i&&(s+=pas.System.StringOfChar("0",i-o)),s},this.SoundexSimilar=function(e,i,s){return t.Soundex(e,s)===t.Soundex(i,s)},this.SoundexSimilar$1=function(e,i){return t.SoundexSimilar(e,i,4)},this.SoundexProc=function(e,i){return t.SoundexSimilar$1(e,i)},this.AnsiResemblesProc=null,this.ResemblesProc=null,t.$implcode=function(){e.SScore="00000000000000000000000000000000000000000000000000000000000000000123012i02245501262301i2i20000000123012i02245501262301i2i20000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000"},t.$init=function(){t.AnsiResemblesProc=t.SoundexProc,t.ResemblesProc=t.SoundexProc}}),["JS"]),rtl.module("Generics.Strings",["System"],(function(){"use strict";this.$resourcestrings={SArgumentOutOfRange:{org:"Argument out of range"}}})),rtl.module("Generics.Collections",["System","Classes","SysUtils","RTLConsts","Types","JS","Generics.Strings"],(function(){"use strict";var t=this;this.TCollectionNotification={0:"cnAdded",cnAdded:0,1:"cnRemoved",cnRemoved:1,2:"cnExtracted",cnExtracted:2},rtl.createClass(this,"TEnumerable$$$G$$generics$collections$$TXDataPrimitiveType",pas.System.TObject,(function(){}),"TEnumerable<XData.Model.Types.TXDataPrimitiveType>"),rtl.createClass(this,"TCustomList$$$G$$generics$collections$$TXDataPrimitiveType",this.TEnumerable$$$G$$generics$collections$$TXDataPrimitiveType,(function(){this.$init=function(){t.TEnumerable$$$G$$generics$collections$$TXDataPrimitiveType.$init.call(this),this.FOnNotify=null,this.FLength=0,this.FItems=[]},this.$final=function(){this.FOnNotify=void 0,this.FItems=void 0,t.TEnumerable$$$G$$generics$collections$$TXDataPrimitiveType.$final.call(this)},this.GetCapacity=function(){return rtl.length(this.FItems)},this.PrepareAddingItem=function(){var t;return this.FLength===rtl.length(this.FItems)&&this.FItems.push(null),t=this.FLength,this.FLength+=1,t},this.Notify=function(t,e){null!=this.FOnNotify&&this.FOnNotify(this,t,e)}}),"TCustomList<XData.Model.Types.TXDataPrimitiveType>"),rtl.createClass(this,"TList$$$G$$generics$collections$$TXDataPrimitiveType",this.TCustomList$$$G$$generics$collections$$TXDataPrimitiveType,(function(){this.SetCapacity=function(t){t<this.FLength&&this.SetCount(t),this.FItems=rtl.arraySetLength(this.FItems,null,t)},this.SetCount=function(t){if(t<0)throw pas.SysUtils.EArgumentOutOfRangeException.$create("Create$1",[rtl.getResStr(pas["Generics.Strings"],"SArgumentOutOfRange")]);t>this.GetCapacity()?this.SetCapacity(t):t<this.FLength&&this.DeleteRange(t,this.FLength-t),this.FLength=t},this.InitializeList=function(){},this.GetItem=function(t){if(t<0||t>=this.FLength)throw pas.SysUtils.EArgumentOutOfRangeException.$create("Create$1",[rtl.getResStr(pas["Generics.Strings"],"SArgumentOutOfRange")]);return this.FItems[t]},this.Create$1=function(){return this.InitializeList(),this},this.Destroy=function(){this.SetCapacity(0)},this.Add=function(t){var e;return e=this.PrepareAddingItem(),this.FItems[e]=t,this.Notify(t,0),e},this.DeleteRange=function(t,e){var i,s=0;if(0!==e){if(e<0||t<0||t+e>this.FLength)throw pas.SysUtils.EArgumentOutOfRangeException.$create("Create$1",[rtl.getResStr(pas["Generics.Strings"],"SArgumentOutOfRange")]);i=this.FItems.splice(t,this.FLength),this.FLength-=e;for(var n=0,r=rtl.length(i)-1;n<=r;n++)s=n,this.Notify(i[s],1)}}}),"TList<XData.Model.Types.TXDataPrimitiveType>"),rtl.createClass(this,"TEnumerable$$$G$$generics$collections$$TmpoObjektAngebote",pas.System.TObject,(function(){}),"TEnumerable<mpoapi.ReturnTypes.TmpoObjektAngebote>"),rtl.createClass(this,"TCustomList$$$G$$generics$collections$$TmpoObjektAngebote",this.TEnumerable$$$G$$generics$collections$$TmpoObjektAngebote,(function(){this.$init=function(){t.TEnumerable$$$G$$generics$collections$$TmpoObjektAngebote.$init.call(this),this.FOnNotify=null,this.FLength=0,this.FItems=[]},this.$final=function(){this.FOnNotify=void 0,this.FItems=void 0,t.TEnumerable$$$G$$generics$collections$$TmpoObjektAngebote.$final.call(this)},this.GetCapacity=function(){return rtl.length(this.FItems)},this.PrepareAddingItem=function(){var t;return this.FLength===rtl.length(this.FItems)&&this.FItems.push(null),t=this.FLength,this.FLength+=1,t},this.Notify=function(t,e){null!=this.FOnNotify&&this.FOnNotify(this,t,e)}}),"TCustomList<mpoapi.ReturnTypes.TmpoObjektAngebote>"),rtl.createClass(this,"TList$$$G$$generics$collections$$TmpoObjektAngebote",this.TCustomList$$$G$$generics$collections$$TmpoObjektAngebote,(function(){this.SetCapacity=function(t){t<this.FLength&&this.SetCount(t),this.FItems=rtl.arraySetLength(this.FItems,null,t)},this.SetCount=function(t){if(t<0)throw pas.SysUtils.EArgumentOutOfRangeException.$create("Create$1",[rtl.getResStr(pas["Generics.Strings"],"SArgumentOutOfRange")]);t>this.GetCapacity()?this.SetCapacity(t):t<this.FLength&&this.DeleteRange(t,this.FLength-t),this.FLength=t},this.InitializeList=function(){},this.GetItem=function(t){if(t<0||t>=this.FLength)throw pas.SysUtils.EArgumentOutOfRangeException.$create("Create$1",[rtl.getResStr(pas["Generics.Strings"],"SArgumentOutOfRange")]);return this.FItems[t]},this.Create$1=function(){return this.InitializeList(),this},this.Destroy=function(){this.SetCapacity(0)},this.Add=function(t){var e;return e=this.PrepareAddingItem(),this.FItems[e]=t,this.Notify(t,0),e},this.DeleteRange=function(t,e){var i,s=0;if(0!==e){if(e<0||t<0||t+e>this.FLength)throw pas.SysUtils.EArgumentOutOfRangeException.$create("Create$1",[rtl.getResStr(pas["Generics.Strings"],"SArgumentOutOfRange")]);i=this.FItems.splice(t,this.FLength),this.FLength-=e;for(var n=0,r=rtl.length(i)-1;n<=r;n++)s=n,this.Notify(i[s],1)}},this.Clear=function(){this.SetCount(0),this.SetCapacity(0)}}),"TList<mpoapi.ReturnTypes.TmpoObjektAngebote>"),rtl.createClass(this,"TEnumerable$$$G$$generics$collections$$TmpoObjektAngebotBewerbung",pas.System.TObject,(function(){}),"TEnumerable<mpoapi.ReturnTypes.TmpoObjektAngebotBewerbung>"),rtl.createClass(this,"TCustomList$$$G$$generics$collections$$TmpoObjektAngebotBewerbung",this.TEnumerable$$$G$$generics$collections$$TmpoObjektAngebotBewerbung,(function(){this.$init=function(){t.TEnumerable$$$G$$generics$collections$$TmpoObjektAngebotBewerbung.$init.call(this),this.FOnNotify=null,this.FLength=0,this.FItems=[]},this.$final=function(){this.FOnNotify=void 0,this.FItems=void 0,t.TEnumerable$$$G$$generics$collections$$TmpoObjektAngebotBewerbung.$final.call(this)},this.GetCapacity=function(){return rtl.length(this.FItems)},this.PrepareAddingItem=function(){var t;return this.FLength===rtl.length(this.FItems)&&this.FItems.push(null),t=this.FLength,this.FLength+=1,t},this.Notify=function(t,e){null!=this.FOnNotify&&this.FOnNotify(this,t,e)}}),"TCustomList<mpoapi.ReturnTypes.TmpoObjektAngebotBewerbung>"),rtl.createClass(this,"TList$$$G$$generics$collections$$TmpoObjektAngebotBewerbung",this.TCustomList$$$G$$generics$collections$$TmpoObjektAngebotBewerbung,(function(){this.SetCapacity=function(t){t<this.FLength&&this.SetCount(t),this.FItems=rtl.arraySetLength(this.FItems,null,t)},this.SetCount=function(t){if(t<0)throw pas.SysUtils.EArgumentOutOfRangeException.$create("Create$1",[rtl.getResStr(pas["Generics.Strings"],"SArgumentOutOfRange")]);t>this.GetCapacity()?this.SetCapacity(t):t<this.FLength&&this.DeleteRange(t,this.FLength-t),this.FLength=t},this.InitializeList=function(){},this.GetItem=function(t){if(t<0||t>=this.FLength)throw pas.SysUtils.EArgumentOutOfRangeException.$create("Create$1",[rtl.getResStr(pas["Generics.Strings"],"SArgumentOutOfRange")]);return this.FItems[t]},this.Create$1=function(){return this.InitializeList(),this},this.Destroy=function(){this.SetCapacity(0)},this.Add=function(t){var e;return e=this.PrepareAddingItem(),this.FItems[e]=t,this.Notify(t,0),e},this.DeleteRange=function(t,e){var i,s=0;if(0!==e){if(e<0||t<0||t+e>this.FLength)throw pas.SysUtils.EArgumentOutOfRangeException.$create("Create$1",[rtl.getResStr(pas["Generics.Strings"],"SArgumentOutOfRange")]);i=this.FItems.splice(t,this.FLength),this.FLength-=e;for(var n=0,r=rtl.length(i)-1;n<=r;n++)s=n,this.Notify(i[s],1)}},this.Clear=function(){this.SetCount(0),this.SetCapacity(0)}}),"TList<mpoapi.ReturnTypes.TmpoObjektAngebotBewerbung>"),rtl.createClass(this,"TEnumerable$$$G$$generics$collections$$TmpoBewerberDownload",pas.System.TObject,(function(){}),"TEnumerable<mpoapi.ReturnTypes.TmpoBewerberDownload>"),rtl.createClass(this,"TCustomList$$$G$$generics$collections$$TmpoBewerberDownload",this.TEnumerable$$$G$$generics$collections$$TmpoBewerberDownload,(function(){this.$init=function(){t.TEnumerable$$$G$$generics$collections$$TmpoBewerberDownload.$init.call(this),this.FOnNotify=null,this.FLength=0,this.FItems=[]},this.$final=function(){this.FOnNotify=void 0,this.FItems=void 0,t.TEnumerable$$$G$$generics$collections$$TmpoBewerberDownload.$final.call(this)},this.GetCapacity=function(){return rtl.length(this.FItems)},this.PrepareAddingItem=function(){var t;return this.FLength===rtl.length(this.FItems)&&this.FItems.push(null),t=this.FLength,this.FLength+=1,t},this.Notify=function(t,e){null!=this.FOnNotify&&this.FOnNotify(this,t,e)}}),"TCustomList<mpoapi.ReturnTypes.TmpoBewerberDownload>"),rtl.createClass(this,"TList$$$G$$generics$collections$$TmpoBewerberDownload",this.TCustomList$$$G$$generics$collections$$TmpoBewerberDownload,(function(){this.SetCapacity=function(t){t<this.FLength&&this.SetCount(t),this.FItems=rtl.arraySetLength(this.FItems,null,t)},this.SetCount=function(t){if(t<0)throw pas.SysUtils.EArgumentOutOfRangeException.$create("Create$1",[rtl.getResStr(pas["Generics.Strings"],"SArgumentOutOfRange")]);t>this.GetCapacity()?this.SetCapacity(t):t<this.FLength&&this.DeleteRange(t,this.FLength-t),this.FLength=t},this.InitializeList=function(){},this.GetItem=function(t){if(t<0||t>=this.FLength)throw pas.SysUtils.EArgumentOutOfRangeException.$create("Create$1",[rtl.getResStr(pas["Generics.Strings"],"SArgumentOutOfRange")]);return this.FItems[t]},this.Create$1=function(){return this.InitializeList(),this},this.Destroy=function(){this.SetCapacity(0)},this.Add=function(t){var e;return e=this.PrepareAddingItem(),this.FItems[e]=t,this.Notify(t,0),e},this.DeleteRange=function(t,e){var i,s=0;if(0!==e){if(e<0||t<0||t+e>this.FLength)throw pas.SysUtils.EArgumentOutOfRangeException.$create("Create$1",[rtl.getResStr(pas["Generics.Strings"],"SArgumentOutOfRange")]);i=this.FItems.splice(t,this.FLength),this.FLength-=e;for(var n=0,r=rtl.length(i)-1;n<=r;n++)s=n,this.Notify(i[s],1)}},this.Clear=function(){this.SetCount(0),this.SetCapacity(0)}}),"TList<mpoapi.ReturnTypes.TmpoBewerberDownload>"),rtl.createClass(this,"TEnumerable$$$G$$generics$collections$$TmpoBewerberUpload",pas.System.TObject,(function(){}),"TEnumerable<mpoapi.ReturnTypes.TmpoBewerberUpload>"),rtl.createClass(this,"TCustomList$$$G$$generics$collections$$TmpoBewerberUpload",this.TEnumerable$$$G$$generics$collections$$TmpoBewerberUpload,(function(){this.$init=function(){t.TEnumerable$$$G$$generics$collections$$TmpoBewerberUpload.$init.call(this),this.FOnNotify=null,this.FLength=0,this.FItems=[]},this.$final=function(){this.FOnNotify=void 0,this.FItems=void 0,t.TEnumerable$$$G$$generics$collections$$TmpoBewerberUpload.$final.call(this)},this.GetCapacity=function(){return rtl.length(this.FItems)},this.PrepareAddingItem=function(){var t;return this.FLength===rtl.length(this.FItems)&&this.FItems.push(null),t=this.FLength,this.FLength+=1,t},this.Notify=function(t,e){null!=this.FOnNotify&&this.FOnNotify(this,t,e)}}),"TCustomList<mpoapi.ReturnTypes.TmpoBewerberUpload>"),rtl.createClass(this,"TList$$$G$$generics$collections$$TmpoBewerberUpload",this.TCustomList$$$G$$generics$collections$$TmpoBewerberUpload,(function(){this.SetCapacity=function(t){t<this.FLength&&this.SetCount(t),this.FItems=rtl.arraySetLength(this.FItems,null,t)},this.SetCount=function(t){if(t<0)throw pas.SysUtils.EArgumentOutOfRangeException.$create("Create$1",[rtl.getResStr(pas["Generics.Strings"],"SArgumentOutOfRange")]);t>this.GetCapacity()?this.SetCapacity(t):t<this.FLength&&this.DeleteRange(t,this.FLength-t),this.FLength=t},this.InitializeList=function(){},this.GetItem=function(t){if(t<0||t>=this.FLength)throw pas.SysUtils.EArgumentOutOfRangeException.$create("Create$1",[rtl.getResStr(pas["Generics.Strings"],"SArgumentOutOfRange")]);return this.FItems[t]},this.Create$1=function(){return this.InitializeList(),this},this.Destroy=function(){this.SetCapacity(0)},this.Add=function(t){var e;return e=this.PrepareAddingItem(),this.FItems[e]=t,this.Notify(t,0),e},this.DeleteRange=function(t,e){var i,s=0;if(0!==e){if(e<0||t<0||t+e>this.FLength)throw pas.SysUtils.EArgumentOutOfRangeException.$create("Create$1",[rtl.getResStr(pas["Generics.Strings"],"SArgumentOutOfRange")]);i=this.FItems.splice(t,this.FLength),this.FLength-=e;for(var n=0,r=rtl.length(i)-1;n<=r;n++)s=n,this.Notify(i[s],1)}},this.Clear=function(){this.SetCount(0),this.SetCapacity(0)}}),"TList<mpoapi.ReturnTypes.TmpoBewerberUpload>")})),rtl.module("Bcl.Json.Attributes",["System","Generics.Collections","Classes"],(function(){"use strict";this.TInclusionMode={0:"Always",Always:0,1:"NonDefault",NonDefault:1},rtl.createClass(this,"JsonIncludeAttribute",pas.System.TCustomAttribute,(function(){this.$init=function(){pas.System.TCustomAttribute.$init.call(this),this.FInclusionMode=0},this.Create$1=function(t){return this.FInclusionMode=t,this}}))})),rtl.module("Bcl.Rtti.Common",["System","SysUtils","JS"],(function(){"use strict";var t=this;rtl.createClass(this,"EInvalidJSCast",pas.SysUtils.Exception,(function(){this.Create$2=function(e,i){return pas.SysUtils.Exception.CreateFmt.call(this,"Cannot cast value %s to type %s",pas.System.VarRecs(18,t.TValue_ToString(e),18,i)),this}})),this.TValue_AsString=function(e){if(!rtl.isString(e))throw t.EInvalidJSCast.$create("Create$2",[e,"String"]);return""+e},this.TValue_AsInteger=function(e){var i;if(0,(i=Math.floor(e))!=e||"number"!=typeof e)throw t.EInvalidJSCast.$create("Create$2",[e,"Integer"]);return i},this.TValue_AsOrdinal=function(e){return t.TValue_AsInteger(e)},this.TValue_AsBoolean=function(e){if(!1,!pas.JS.isBoolean(e))throw t.EInvalidJSCast.$create("Create$2",[e,"Boolean"]);return!(0==e)},this.TValue_AsExtended=function(e){if(0,!rtl.isNumber(e))throw t.EInvalidJSCast.$create("Create$2",[e,"Number"]);return rtl.getNumber(e)},this.TValue_AsDouble=function(e){return t.TValue_AsExtended(e)},this.TValue_AsBytes=function(t){return t},this.TValue_ToString=function(t){Result=""+t}})),rtl.module("Bcl.SysUtils",["System"],(function(){"use strict";this.NumberToStr=function(t){return t.toString()}}),["JS"]),rtl.module("DateUtils",["System","SysUtils","Math"],(function(){"use strict";this.DateOf=function(t){return pas.System.Trunc(t)},this.DecodeDateTime=function(t,e,i,s,n,r,a,o){pas.SysUtils.DecodeTime(t,n,r,a,o),24===n.get()?(n.set(0),pas.SysUtils.DecodeDate(Math.round(t),e,i,s)):pas.SysUtils.DecodeDate(t,e,i,s)}}),["JS","RTLConsts"]),rtl.module("Bcl.Utils",["System","SysUtils","Classes","JS","WEBLib.Utils"],(function(){"use strict";var t=this,e=t.$impl;this.TTimeZoneMode={0:"Error",Error:0,1:"Ignore",Ignore:1,2:"AsUTC",AsUTC:2,3:"AsLocal",AsLocal:3},rtl.createClass(this,"TBclUtils",pas.System.TObject,(function(){this.DateTimeToISO=function(t,e){var i="",s=0,n=0,r=0,a=0,o=0,l=0,h=0;return e||t!==pas.DateUtils.DateOf(t)?(pas.DateUtils.DecodeDateTime(t,{get:function(){return s},set:function(t){s=t}},{get:function(){return n},set:function(t){n=t}},{get:function(){return r},set:function(t){r=t}},{get:function(){return a},set:function(t){a=t}},{get:function(){return o},set:function(t){o=t}},{get:function(){return l},set:function(t){l=t}},{get:function(){return h},set:function(t){h=t}}),i=e||0!==pas.DateUtils.DateOf(t)?pas.SysUtils.Format("%sT%s",pas.System.VarRecs(18,this.DateToISO(t),18,this.TimeToISO(t))):pas.SysUtils.Format("%s",pas.System.VarRecs(18,this.TimeToISO(t)))):i=this.DateToISO(t),i},this.TimeToISO=function(e){var i=0,s=0,n=0,r=0,a=0,o=0,l=0;return pas.DateUtils.DecodeDateTime(e,{get:function(){return i},set:function(t){i=t}},{get:function(){return s},set:function(t){s=t}},{get:function(){return n},set:function(t){n=t}},{get:function(){return r},set:function(t){r=t}},{get:function(){return a},set:function(t){a=t}},{get:function(){return o},set:function(t){o=t}},{get:function(){return l},set:function(t){l=t}}),0!==l||t.FullISOTimeNotation?pas.SysUtils.Format("%.2d:%.2d:%.2d.%.3d",pas.System.VarRecs(0,r,0,a,0,o,0,l)):0!==o?pas.SysUtils.Format("%.2d:%.2d:%.2d",pas.System.VarRecs(0,r,0,a,0,o)):pas.SysUtils.Format("%.2d:%.2d",pas.System.VarRecs(0,r,0,a))},this.DateToISO=function(t){var e=0,i=0,s=0;return pas.SysUtils.DecodeDate(t,{get:function(){return e},set:function(t){e=t}},{get:function(){return i},set:function(t){i=t}},{get:function(){return s},set:function(t){s=t}}),pas.SysUtils.Format("%.4d-%.2d-%.2d",pas.System.VarRecs(0,e,0,i,0,s))};var i=["A","B","C","D","E","F","G","H","I","J","K","L","M","N","O","P","Q","R","S","T","U","V","W","X","Y","Z","a","b","c","d","e","f","g","h","i","j","k","l","m","n","o","p","q","r","s","t","u","v","w","x","y","z","0","1","2","3","4","5","6","7","8","9","+","/"];this.EncodeBase64=function(t){return this.InternalEncodeBase64(t,i.slice(0),!0)},this.CombineUrlFast=function(t,e){var i="";return(i=t).length>0&&"/"!==i.charAt(i.length-1)&&(i+="/"),i+=e},this.InternalEncodeBase64=function(t,i,s){var n="";function r(t,e,s){n=rtl.setCharAt(n,s+0-1,i[t.a[0]>>>2]),n=rtl.setCharAt(n,s+1-1,i[63&(t.a[0]<<4|t.a[1]>>>4)]),n=e<2?rtl.setCharAt(n,s+2-1,"="):rtl.setCharAt(n,s+2-1,i[63&(t.a[1]<<2|t.a[2]>>>6)]),n=e<3?rtl.setCharAt(n,s+3-1,"="):rtl.setCharAt(n,s+3-1,i[63&t.a[2]])}var a=0,o=0,l=0,h=e.TPacket.$new();n="",a=4*rtl.trunc(rtl.length(t)/3),rtl.length(t)%3>0&&(a+=4),n=rtl.strSetLength(n,a),l=1;for(var d=1,u=rtl.trunc(rtl.length(t)/3);d<=u;d++)a=d,h.a[0]=t[3*(a-1)],h.a[1]=t[3*(a-1)+1],h.a[2]=t[3*(a-1)+2],h.a[3]=0,r(h,3,l),l+=4;o=0,h.a[0]=0,h.a[1]=0,h.a[2]=0,h.a[3]=0;for(var c=rtl.length(t)-rtl.length(t)%3+1,F=rtl.length(t);c<=F;c++)a=c,h.a[o]=t[a-1],o+=1,a===rtl.length(t)&&r(h,rtl.length(t)%3,l);return!s&&n.length>=2&&("="===n.charAt(n.length-1-1)?n=rtl.strSetLength(n,n.length-2):"="===n.charAt(n.length-1)&&(n=rtl.strSetLength(n,n.length-1))),n},this.PercentEncode=function(t){return encodeURIComponent(t)}})),this.DefaultTimeZoneMode=0,this.FullISOTimeNotation=!1,t.$implcode=function(){rtl.recNewT(e,"TPacket",(function(){this.$new=function(){var t=Object.create(this);return t.a=rtl.arraySetLength(null,0,4),t},this.$eq=function(t){return rtl.arrayEq(this.a,t.a)},this.$assign=function(t){return this.a=t.a.slice(0),this}}))},t.$init=function(){t.DefaultTimeZoneMode=0,t.FullISOTimeNotation=!1}}),["DateUtils"]),rtl.module("XData.Model.Types",["System","Generics.Collections","SysUtils","Bcl.SysUtils","Bcl.Collections.Common","XData.Model.Classes"],(function(){"use strict";var t=this;rtl.createClass(this,"TXDataPrimitiveType",pas["XData.Model.Classes"].TXDataScalarType,(function(){this.Destroy=function(){pas["XData.Model.Classes"].TXDataScalarType.Destroy.call(this)}})),rtl.createClass(this,"TXDataBinaryType",this.TXDataPrimitiveType,(function(){this.GetName=function(){return"Binary","Binary"},this.GetTypeKind=function(){return 12,12},this.ValueToLiteral=function(t,e){return e.set(pas["Bcl.Utils"].TBclUtils.EncodeBase64(t)),!0,!0}})),rtl.createClass(this,"TXDataBooleanType",this.TXDataPrimitiveType,(function(){this.GetName=function(){return"Boolean","Boolean"},this.GetTypeKind=function(){return 5,5},this.ValueToLiteral=function(t,e){return t?e.set("true"):e.set("false"),!0,!0}})),rtl.createClass(this,"TXDataByteType",this.TXDataPrimitiveType,(function(){this.GetName=function(){return"Byte","Byte"},this.GetTypeKind=function(){return 15,15}})),rtl.createClass(this,"TXDataDateTimeType",this.TXDataPrimitiveType,(function(){this.GetName=function(){return"DateTime","DateTime"},this.GetTypeKind=function(){return 6,6},this.ValueToLiteral=function(t,e){return!0,e.set(pas["Bcl.Utils"].TBclUtils.DateTimeToISO(t,!1)),!0}})),rtl.createClass(this,"TXDataDateType",this.TXDataPrimitiveType,(function(){this.GetName=function(){return"Date","Date"},this.GetTypeKind=function(){return 7,7},this.ValueToLiteral=function(t,e){return!0,e.set(pas["Bcl.Utils"].TBclUtils.DateToISO(t)),!0}})),rtl.createClass(this,"TXDataCurrencyType",this.TXDataPrimitiveType,(function(){this.GetName=function(){return"Currency","Currency"},this.GetTypeKind=function(){return 9,9}})),rtl.createClass(this,"TXDataDoubleType",this.TXDataPrimitiveType,(function(){this.GetName=function(){return"Double","Double"},this.GetTypeKind=function(){return 4,4},this.ValueToLiteral=function(t,e){return e.set(pas["Bcl.SysUtils"].NumberToStr(t)),!0,!0}})),rtl.createClass(this,"TXDataGuidType",this.TXDataPrimitiveType,(function(){this.GetName=function(){return"Guid","Guid"},this.GetTypeKind=function(){return 10,10},this.ValueToLiteral=function(t,e){var i=!1;i=!0;var s=t.length;return 36===s?e.set(t):38===s?e.set(pas.System.Copy(t,2,36)):i=!1,i}})),rtl.createClass(this,"TXDataVariantType",this.TXDataPrimitiveType,(function(){this.GetName=function(){return"Variant","Variant"},this.GetTypeKind=function(){return 11,11},this.ValueToLiteral=function(e,i){var s=!1,n=null;n=t.TXDataPrimitiveTypes.Instance(),s=!0;var r=pas.JS.GetValueType(e);return 0===r?i.set("null"):1===r?s=n.FBooleanType.ValueToLiteral(!(0==e),i):2===r?s=n.FInt32Type.ValueToLiteral(rtl.trunc(e),i):3===r?s=n.FDoubleType.ValueToLiteral(rtl.getNumber(e),i):4===r?(s=n.FStringType.ValueToLiteral(""+e,i),i.set(t.LiteralQuote(i.get()))):s=!1,s}})),rtl.createClass(this,"TXDataInt16Type",this.TXDataPrimitiveType,(function(){this.GetName=function(){return"Int16","Int16"},this.GetTypeKind=function(){return 14,14},this.ValueToLiteral=function(t,e){return e.set(pas.SysUtils.IntToStr(t)),!0,!0}})),rtl.createClass(this,"TXDataInt32Type",this.TXDataPrimitiveType,(function(){this.GetName=function(){return"Int32","Int32"},this.GetTypeKind=function(){return 2,2},this.ValueToLiteral=function(t,e){return e.set(pas.SysUtils.IntToStr(t)),!0,!0}})),rtl.createClass(this,"TXDataInt64Type",this.TXDataPrimitiveType,(function(){this.GetName=function(){return"Int64","Int64"},this.GetTypeKind=function(){return 3,3}})),rtl.createClass(this,"TXDataSByteType",this.TXDataPrimitiveType,(function(){this.GetName=function(){return"SByte","SByte"},this.GetTypeKind=function(){return 16,16}})),rtl.createClass(this,"TXDataStringType",this.TXDataPrimitiveType,(function(){this.GetName=function(){return"String","String"},this.GetTypeKind=function(){return 1,1},this.ValueToLiteral=function(t,e){return e.set(t),!0,!0}})),rtl.createClass(this,"TXDataTimeType",this.TXDataPrimitiveType,(function(){this.GetName=function(){return"Time","Time"},this.GetTypeKind=function(){return 8,8},this.ValueToLiteral=function(t,e){return!0,e.set(pas["Bcl.Utils"].TBclUtils.TimeToISO(t)),!0}})),rtl.createClass(this,"TXDataStreamType",this.TXDataPrimitiveType,(function(){this.GetName=function(){return"Stream","Stream"},this.GetTypeKind=function(){return 13,13}})),rtl.createClass(this,"TXDataRawType",this.TXDataPrimitiveType,(function(){this.GetName=function(){return"Raw","Raw"},this.GetTypeKind=function(){return 21,21}})),rtl.createClass(this,"TXDataPrimitiveTypes",pas.System.TObject,(function(){this.FInstance=null,this.$init=function(){pas.System.TObject.$init.call(this),this.FTypes=null,this.FTypeList=null,this.FBinaryType=null,this.FBooleanType=null,this.FByteType=null,this.FDateTimeType=null,this.FDateType=null,this.FDoubleType=null,this.FInt16Type=null,this.FInt32Type=null,this.FInt64Type=null,this.FSByteType=null,this.FStringType=null,this.FTimeType=null,this.FStreamType=null,this.FRawType=null,this.FGuidType=null,this.FCurrencyType=null,this.FVariantType=null},this.$final=function(){this.FTypes=void 0,this.FTypeList=void 0,this.FBinaryType=void 0,this.FBooleanType=void 0,this.FByteType=void 0,this.FDateTimeType=void 0,this.FDateType=void 0,this.FDoubleType=void 0,this.FInt16Type=void 0,this.FInt32Type=void 0,this.FInt64Type=void 0,this.FSByteType=void 0,this.FStringType=void 0,this.FTimeType=void 0,this.FStreamType=void 0,this.FRawType=void 0,this.FGuidType=void 0,this.FCurrencyType=void 0,this.FVariantType=void 0,pas.System.TObject.$final.call(this)},this.PrivateCreate=function(){this.FTypes=pas["Bcl.Collections.Common"].TStringMap.$create("Create$1",[!1]),this.FTypeList=pas["Generics.Collections"].TList$$$G$$generics$collections$$TXDataPrimitiveType.$create("Create$1"),this.FBinaryType=t.TXDataBinaryType.$create("Create"),this.FBooleanType=t.TXDataBooleanType.$create("Create"),this.FByteType=t.TXDataByteType.$create("Create"),this.FDateTimeType=t.TXDataDateTimeType.$create("Create"),this.FDateType=t.TXDataDateType.$create("Create"),this.FDoubleType=t.TXDataDoubleType.$create("Create"),this.FInt16Type=t.TXDataInt16Type.$create("Create"),this.FInt32Type=t.TXDataInt32Type.$create("Create"),this.FInt64Type=t.TXDataInt64Type.$create("Create"),this.FSByteType=t.TXDataSByteType.$create("Create"),this.FStringType=t.TXDataStringType.$create("Create"),this.FTimeType=t.TXDataTimeType.$create("Create"),this.FStreamType=t.TXDataStreamType.$create("Create"),this.FRawType=t.TXDataRawType.$create("Create"),this.FGuidType=t.TXDataGuidType.$create("Create"),this.FCurrencyType=t.TXDataCurrencyType.$create("Create"),this.FVariantType=t.TXDataVariantType.$create("Create"),this.AddType(pas.SysUtils.LowerCase(this.FBinaryType.GetName()),this.FBinaryType),this.AddType(pas.SysUtils.LowerCase(this.FBooleanType.GetName()),this.FBooleanType),this.AddType(pas.SysUtils.LowerCase(this.FByteType.GetName()),this.FByteType),this.AddType(pas.SysUtils.LowerCase(this.FDateTimeType.GetName()),this.FDateTimeType),this.AddType(pas.SysUtils.LowerCase(this.FDateType.GetName()),this.FDateType),this.AddType(pas.SysUtils.LowerCase(this.FDoubleType.GetName()),this.FDoubleType),this.AddType(pas.SysUtils.LowerCase(this.FInt16Type.GetName()),this.FInt16Type),this.AddType(pas.SysUtils.LowerCase(this.FInt32Type.GetName()),this.FInt32Type),this.AddType(pas.SysUtils.LowerCase(this.FInt64Type.GetName()),this.FInt64Type),this.AddType(pas.SysUtils.LowerCase(this.FSByteType.GetName()),this.FSByteType),this.AddType(pas.SysUtils.LowerCase(this.FStringType.GetName()),this.FStringType),this.AddType(pas.SysUtils.LowerCase(this.FTimeType.GetName()),this.FTimeType),this.AddType(pas.SysUtils.LowerCase(this.FStreamType.GetName()),this.FStreamType),this.AddType(pas.SysUtils.LowerCase(this.FRawType.GetName()),this.FRawType),this.AddType(pas.SysUtils.LowerCase(this.FGuidType.GetName()),this.FGuidType),this.AddType(pas.SysUtils.LowerCase(this.FCurrencyType.GetName()),this.FCurrencyType),this.AddType(pas.SysUtils.LowerCase(this.FVariantType.GetName()),this.FVariantType)},this.PrivateDestroy=function(){rtl.free(this,"FTypeList"),rtl.free(this,"FTypes"),rtl.free(this,"FVariantType"),rtl.free(this,"FCurrencyType"),rtl.free(this,"FGuidType"),rtl.free(this,"FBinaryType"),rtl.free(this,"FBooleanType"),rtl.free(this,"FByteType"),rtl.free(this,"FDateTimeType"),rtl.free(this,"FDateType"),rtl.free(this,"FDoubleType"),rtl.free(this,"FInt16Type"),rtl.free(this,"FInt32Type"),rtl.free(this,"FInt64Type"),rtl.free(this,"FSByteType"),rtl.free(this,"FStringType"),rtl.free(this,"FTimeType"),rtl.free(this,"FStreamType"),rtl.free(this,"FRawType")},this.AddType=function(t,e){this.FTypes.Add(t,e),this.FTypeList.Add(e)},this.GetTypes=function(){return this.FTypeList},this.Instance=function(){return null===this.FInstance&&(t.TXDataPrimitiveTypes.FInstance=t.TXDataPrimitiveTypes.$create("Create"),this.FInstance.PrivateCreate()),this.FInstance},this.Find=function(t){return this.FTypes.ContainsKey(pas.SysUtils.LowerCase(t))?this.FTypes.GetItem(pas.SysUtils.LowerCase(t)):null},this.Destroy=function(){this.PrivateDestroy(),pas.System.TObject.Destroy.call(this)}})),this.LiteralQuote=function(t){return"'"+pas.SysUtils.StringReplace(t,"'","''",rtl.createSet(0))+"'"}}),["JS","Bcl.Utils"]),rtl.module("XData.Types.Converters",["System","SysUtils","Bcl.Rtti.Common","JS","XData.Model.Classes"],(function(){"use strict";var t=this,e=t.$impl;rtl.createClass(this,"TXDataTypeBaseConverter",pas["XData.Model.Classes"].TXDataTypeConverter,(function(){})),rtl.createClass(this,"TXDataInt32Converter",this.TXDataTypeBaseConverter,(function(){this.TryValueToUrl=function(t,e){return pas["XData.Model.Types"].TXDataPrimitiveTypes.Instance().FInt32Type.ValueToLiteral(pas["Bcl.Rtti.Common"].TValue_AsInteger(t),e)}})),rtl.createClass(this,"TXDataInt16Converter",this.TXDataTypeBaseConverter,(function(){this.TryValueToUrl=function(t,e){return pas["XData.Model.Types"].TXDataPrimitiveTypes.Instance().FInt16Type.ValueToLiteral(pas["Bcl.Rtti.Common"].TValue_AsInteger(t),e)}})),rtl.createClass(this,"TXDataBooleanConverter",this.TXDataTypeBaseConverter,(function(){this.TryValueToUrl=function(t,e){return pas["XData.Model.Types"].TXDataPrimitiveTypes.Instance().FBooleanType.ValueToLiteral(pas["Bcl.Rtti.Common"].TValue_AsBoolean(t),e)}})),rtl.createClass(this,"TXDataDoubleConverter",this.TXDataTypeBaseConverter,(function(){this.TryValueToUrl=function(t,e){return pas["XData.Model.Types"].TXDataPrimitiveTypes.Instance().FDoubleType.ValueToLiteral(pas["Bcl.Rtti.Common"].TValue_AsExtended(t),e)}})),rtl.createClass(this,"TXDataDateTimeConverter",this.TXDataTypeBaseConverter,(function(){this.TryValueToUrl=function(t,e){var i=!1;return rtl.isString(t)?(i=!0,e.set(""+t)):i=pas["XData.Model.Types"].TXDataPrimitiveTypes.Instance().FDateTimeType.ValueToLiteral(pas["Bcl.Rtti.Common"].TValue_AsDouble(t),e),i}})),rtl.createClass(this,"TXDataDateConverter",this.TXDataTypeBaseConverter,(function(){this.TryValueToUrl=function(t,e){var i=!1;return rtl.isString(t)?(i=!0,e.set(""+t)):i=pas["XData.Model.Types"].TXDataPrimitiveTypes.Instance().FDateType.ValueToLiteral(pas["Bcl.Rtti.Common"].TValue_AsDouble(t),e),i}})),rtl.createClass(this,"TXDataTimeConverter",this.TXDataTypeBaseConverter,(function(){this.TryValueToUrl=function(t,e){var i=!1;return rtl.isString(t)?(i=!0,e.set(""+t)):i=pas["XData.Model.Types"].TXDataPrimitiveTypes.Instance().FTimeType.ValueToLiteral(pas["Bcl.Rtti.Common"].TValue_AsDouble(t),e),i}})),rtl.createClass(this,"TXDataBinaryConverter",this.TXDataTypeBaseConverter,(function(){this.TryValueToUrl=function(t,e){var i,s;return s=pas["Bcl.Rtti.Common"].TValue_AsBytes(t),i=pas["XData.Model.Types"].TXDataPrimitiveTypes.Instance().FBinaryType.ValueToLiteral(rtl.arrayRef(s),e),e.set(pas["XData.Model.Types"].LiteralQuote(e.get())),i}})),rtl.createClass(this,"TXDataStringConverter",this.TXDataTypeBaseConverter,(function(){this.TryValueToUrl=function(t,e){return pas["XData.Model.Types"].TXDataPrimitiveTypes.Instance().FStringType.ValueToLiteral(pas["XData.Model.Types"].LiteralQuote(pas["Bcl.Rtti.Common"].TValue_AsString(t)),e)}})),rtl.createClass(this,"TXDataGuidConverter",this.TXDataTypeBaseConverter,(function(){this.TryValueToUrl=function(t,e){return pas["XData.Model.Types"].TXDataPrimitiveTypes.Instance().FGuidType.ValueToLiteral(pas["Bcl.Rtti.Common"].TValue_AsString(t),e)}})),rtl.createClass(this,"TXDataVariantConverter",this.TXDataTypeBaseConverter,(function(){this.TryValueToUrl=function(t,e){return pas["XData.Model.Types"].TXDataPrimitiveTypes.Instance().FVariantType.ValueToLiteral(t,e)}})),rtl.createClass(this,"TXDataEnumConverter",pas["XData.Model.Classes"].TXDataTypeConverter,(function(){this.$init=function(){pas["XData.Model.Classes"].TXDataTypeConverter.$init.call(this),this.FEnumType=null},this.$final=function(){this.FEnumType=void 0,pas["XData.Model.Classes"].TXDataTypeConverter.$final.call(this)},this.TryValueToUrl=function(t,e){var i,s=!1,n=0;i=pas["Bcl.Rtti.Common"].TValue_AsOrdinal(t),s=!1;for(var r=0,a=this.FEnumType.FMembers.GetCount()-1;r<=a;r++)if(n=r,i===this.FEnumType.FMembers.GetItem$1(n).FValue)return s=pas["XData.Model.Types"].TXDataPrimitiveTypes.Instance().FStringType.ValueToLiteral(this.FEnumType.FMembers.GetItem$1(n).FName,e);return s},this.Create$1=function(t){return this.FEnumType=t,this}})),t.$implcode=function(){e.AddDefaultUrlConverters=function(){var e=null;(e=pas["XData.Model.Types"].TXDataPrimitiveTypes.Instance()).FInt32Type.FUrlConverter=t.TXDataInt32Converter.$create("Create"),e.FInt16Type.FUrlConverter=t.TXDataInt16Converter.$create("Create"),e.FInt64Type.FUrlConverter=t.TXDataInt32Converter.$create("Create"),e.FBooleanType.FUrlConverter=t.TXDataBooleanConverter.$create("Create"),e.FDoubleType.FUrlConverter=t.TXDataDoubleConverter.$create("Create"),e.FCurrencyType.FUrlConverter=t.TXDataDoubleConverter.$create("Create"),e.FDateTimeType.FUrlConverter=t.TXDataDateTimeConverter.$create("Create"),e.FDateType.FUrlConverter=t.TXDataDateConverter.$create("Create"),e.FTimeType.FUrlConverter=t.TXDataTimeConverter.$create("Create"),e.FBinaryType.FUrlConverter=t.TXDataBinaryConverter.$create("Create"),e.FStreamType.FUrlConverter=t.TXDataBinaryConverter.$create("Create"),e.FStringType.FUrlConverter=t.TXDataStringConverter.$create("Create"),e.FGuidType.FUrlConverter=t.TXDataGuidConverter.$create("Create"),e.FVariantType.FUrlConverter=t.TXDataVariantConverter.$create("Create")}},t.$init=function(){e.AddDefaultUrlConverters()}}),["XData.Model.Types"]),rtl.module("XData.Utils",["System","SysUtils"],(function(){"use strict";rtl.createClass(this,"TXDataUtils",pas.System.TObject,(function(){this.GetNameAndKey=function(t,e,i){var s,n,r,a;return n=pas.System.Pos("(",t),a=(r=t.length)-n-1,(s=n>1&&r>=4&&")"===t.charAt(r-1)&&a>0)&&(e.set(pas.System.Copy(t,1,n-1)),i.set(pas.System.Copy(t,n+1,a))),s},this.CombineUrlFast=function(t,e){var i="";return(i=t).length>0&&"/"!==i.charAt(i.length-1)&&(i+="/"),i+=e}}))})),rtl.module("XData.Model.Classes",["System","Classes","SysUtils","Types","StrUtils","TypInfo","contnrs","Bcl.Json.Attributes","Bcl.Collections.Common","Bcl.Rtti.Common"],(function(){"use strict";var t=this,e=t.$impl;this.$rtti.$Class("TXDataEntityType"),this.$rtti.$Class("TXDataInstanceType"),this.TXTypeKind={0:"xtUndefined",xtUndefined:0,1:"xtText",xtText:1,2:"xtInt32",xtInt32:2,3:"xtInt64",xtInt64:3,4:"xtDouble",xtDouble:4,5:"xtBoolean",xtBoolean:5,6:"xtDateTime",xtDateTime:6,7:"xtDate",xtDate:7,8:"xtTime",xtTime:8,9:"xtCurrency",xtCurrency:9,10:"xtGuid",xtGuid:10,11:"xtVariant",xtVariant:11,12:"xtBinary",xtBinary:12,13:"xtStream",xtStream:13,14:"xtInt16",xtInt16:14,15:"xtByte",xtByte:15,16:"xtSByte",xtSByte:16,17:"xtEntity",xtEntity:17,18:"xtEntityCollection",xtEntityCollection:18,19:"xtEnum",xtEnum:19,20:"xtScalarCollection",xtScalarCollection:20,21:"xtRaw",xtRaw:21,22:"xtInstance",xtInstance:22,23:"xtInstanceCollection",xtInstanceCollection:23},this.$rtti.$Class("TXDataSchema"),this.$rtti.$Class("TXDataModel"),rtl.createClass(this,"TXDataModelObject",pas.System.TObject,(function(){this.$init=function(){pas.System.TObject.$init.call(this),this.FDescription="",this.FParent=null},this.$final=function(){this.FParent=void 0,pas.System.TObject.$final.call(this)},this.Destroy=function(){pas.System.TObject.Destroy.call(this)},this.$rtti.attr=[pas["Bcl.Json.Attributes"].JsonIncludeAttribute,"Create$1",[pas["Bcl.Json.Attributes"].TInclusionMode.NonDefault]]})),rtl.createClass(this,"TXDataOwnedList",pas.contnrs.TObjectList,(function(){this.$init=function(){pas.contnrs.TObjectList.$init.call(this),this.FOwner=null},this.$final=function(){this.FOwner=void 0,pas.contnrs.TObjectList.$final.call(this)},this.Notify=function(t,e){null!==this.FOwner&&(rtl.getObject(t).FParent=0===e?this.FOwner:null,pas.contnrs.TObjectList.Notify.apply(this,arguments))},this.Create$4=function(t){return pas.contnrs.TObjectList.Create$3.call(this,null!==t),this.FOwner=t,this},this.Create$5=function(){return this.Create$4(null),this}})),rtl.createClass(this,"TXDataType",this.TXDataModelObject,(function(){this.$init=function(){t.TXDataModelObject.$init.call(this),this.FName="",this.FUrlConverter=null},this.$final=function(){this.FUrlConverter=void 0,t.TXDataModelObject.$final.call(this)},this.GetName=function(){return this.FName},this.GetTypeKind=function(){return 0,0}})),rtl.createClass(this,"TXDataScalarType",this.TXDataType,(function(){this.$init=function(){t.TXDataType.$init.call(this),this.FCollection=null},this.$final=function(){this.FCollection=void 0,t.TXDataType.$final.call(this)},this.GetCollection=function(){return null===this.FCollection&&(this.FCollection=t.TXDataScalarCollectionType.$create("Create"),this.FCollection.FItemType=this),this.FCollection},this.Destroy=function(){rtl.free(this,"FCollection"),t.TXDataModelObject.Destroy.call(this)}})),rtl.createClass(this,"TXDataEnumMember",this.TXDataModelObject,(function(){this.$init=function(){t.TXDataModelObject.$init.call(this),this.FName="",this.FValue=0}})),rtl.createClass(this,"TXDataEnumMemberList",pas.contnrs.TObjectList,(function(){this.GetItem$1=function(t){return this.GetItem(t)}})),rtl.createClass(this,"TXDataEnumType",this.TXDataScalarType,(function(){this.$init=function(){t.TXDataScalarType.$init.call(this),this.FMembers=null},this.$final=function(){this.FMembers=void 0,t.TXDataScalarType.$final.call(this)},this.GetTypeKind=function(){return 19,19},this.Create$1=function(){return this.FMembers=t.TXDataEnumMemberList.$create("Create$2"),this},this.Destroy=function(){rtl.free(this,"FMembers"),t.TXDataScalarType.Destroy.call(this)},this.$rtti.attr=[pas["Bcl.Json.Attributes"].JsonIncludeAttribute,"Create$1",[pas["Bcl.Json.Attributes"].TInclusionMode.NonDefault]]})),rtl.createClass(this,"TXDataEnumTypeList",this.TXDataOwnedList,(function(){this.GetItem$1=function(t){return this.GetItem(t)}})),rtl.createClass(this,"TXDataScalarCollectionType",this.TXDataScalarType,(function(){this.$init=function(){t.TXDataScalarType.$init.call(this),this.FItemType=null},this.$final=function(){this.FItemType=void 0,t.TXDataScalarType.$final.call(this)},this.GetName=function(){return null!==this.FItemType?pas.SysUtils.Format("Collection(%s)",pas.System.VarRecs(18,this.FItemType.GetName())):"Collection()"},this.GetTypeKind=function(){return 20,20}})),rtl.createClass(this,"TXDataProperty",this.TXDataModelObject,(function(){this.$init=function(){t.TXDataModelObject.$init.call(this),this.FName="",this.FRequired=!1},this.GetParent=function(){return this.FParent},this.Create$1=function(){return pas.System.TObject.Create.call(this),this},this.Destroy=function(){t.TXDataModelObject.Destroy.call(this)},this.$rtti.attr=[pas["Bcl.Json.Attributes"].JsonIncludeAttribute,"Create$1",[pas["Bcl.Json.Attributes"].TInclusionMode.NonDefault]]})),rtl.createClass(this,"TXDataPropertyList",pas.contnrs.TObjectList,(function(){})),rtl.createClass(this,"TXDataScalarProperty",this.TXDataProperty,(function(){this.$init=function(){t.TXDataProperty.$init.call(this),this.FType=null,this.FLength=0,this.FPrecision=0,this.FScale=0,this.FTypeRef=""},this.$final=function(){this.FType=void 0,t.TXDataProperty.$final.call(this)},this.SetType=function(t){this.FType=t},this.GetUrlConverter=function(){return null!==this.FType?this.FType.FUrlConverter:null},this.$rtti.attr=[pas["Bcl.Json.Attributes"].JsonIncludeAttribute,"Create$1",[pas["Bcl.Json.Attributes"].TInclusionMode.NonDefault]]})),rtl.createClass(this,"TXDataSimpleProperty",this.TXDataScalarProperty,(function(){this.GetParent$1=function(){return this.GetParent()},this.Prepare=function(){if(""!==this.FTypeRef){if(this.SetType(this.GetParent$1().GetSchema().FindScalarType(this.FTypeRef)),null===this.FType)throw t.EModelReferenceNotFound.$create("CreateFmt",["Property type %s not found for property %s.%s",pas.System.VarRecs(18,this.FTypeRef,18,this.GetParent$1().GetName(),18,this.FName)]);this.FTypeRef=""}if(null===this.FType.FUrlConverter)throw t.EUrlConverterNotFound.$create("Create$2",[this.FType])}})),rtl.createClass(this,"TXDataInstanceSimpleProperty",this.TXDataScalarProperty,(function(){this.GetParent$1=function(){return this.GetParent()},this.Prepare=function(){""!==this.FTypeRef&&(this.SetType(this.GetParent$1().GetSchema().FindScalarType(this.FTypeRef)),this.FTypeRef="")}})),rtl.createClass(this,"TXDataSimplePropertyList",this.TXDataOwnedList,(function(){this.GetItem$1=function(t){return this.GetItem(t)}})),rtl.createClass(this,"TXDataInstanceScalarPropertyList",this.TXDataOwnedList,(function(){this.GetItem$1=function(t){return this.GetItem(t)}})),rtl.createClass(this,"TXDataStructuredProperty",this.TXDataProperty,(function(){this.$init=function(){t.TXDataProperty.$init.call(this),this.FTargetRef=""},this.$rtti.attr=[pas["Bcl.Json.Attributes"].JsonIncludeAttribute,"Create$1",[pas["Bcl.Json.Attributes"].TInclusionMode.NonDefault]]})),rtl.createClass(this,"TXDataInstanceNavigationProperty",this.TXDataStructuredProperty,(function(){this.$init=function(){t.TXDataStructuredProperty.$init.call(this),this.FTarget=null},this.$final=function(){this.FTarget=void 0,t.TXDataStructuredProperty.$final.call(this)},this.GetParent$1=function(){return this.GetParent()},this.Prepare=function(){""!==this.FTargetRef&&(this.FTarget=this.GetParent$1().GetSchema().FindEntityType(this.FTargetRef),null===this.FTarget&&(this.FTarget=this.GetParent$1().GetSchema().FindInstanceType(this.FTargetRef)),this.FTargetRef="")},this.$rtti.attr=[pas["Bcl.Json.Attributes"].JsonIncludeAttribute,"Create$1",[pas["Bcl.Json.Attributes"].TInclusionMode.NonDefault]]})),rtl.createClass(this,"TXDataNavigationProperty",this.TXDataStructuredProperty,(function(){this.$init=function(){t.TXDataStructuredProperty.$init.call(this),this.FTarget=null},this.$final=function(){this.FTarget=void 0,t.TXDataStructuredProperty.$final.call(this)},this.GetParent$1=function(){return this.GetParent()},this.Prepare=function(){if(""!==this.FTargetRef){if(this.FTarget=this.GetParent$1().GetSchema().FindEntityType(this.FTargetRef),null===this.FTarget)throw t.EModelReferenceNotFound.$create("CreateFmt",["Target %s not found for navigation property %s.%s",pas.System.VarRecs(18,this.FTargetRef,18,this.GetParent$1().GetName(),18,this.FName)]);this.FTargetRef=""}},this.$rtti.attr=[pas["Bcl.Json.Attributes"].JsonIncludeAttribute,"Create$1",[pas["Bcl.Json.Attributes"].TInclusionMode.NonDefault]]})),rtl.createClass(this,"TXDataNavigationPropertyList",this.TXDataOwnedList,(function(){this.GetItem$1=function(t){return this.GetItem(t)}})),rtl.createClass(this,"TXDataInstanceNavigationPropertyList",this.TXDataOwnedList,(function(){this.GetItem$1=function(t){return this.GetItem(t)}})),rtl.createClass(this,"TXDataStructuredType",this.TXDataType,(function(){this.GetSchema=function(){return this.FParent},this.FindScalarProperty=function(t){for(var e=null,i=0,s=0,n=this.ScalarPropertyCount()-1;s<=n;s++)if(i=s,e=this.GetScalarProperty(i),pas.SysUtils.SameText(t,e.FName))return e;return null,null},this.FindStructuredProperty=function(t){for(var e=null,i=0,s=0,n=this.StructuredPropertyCount()-1;s<=n;s++)if(i=s,e=this.GetStructuredProperty(i),pas.SysUtils.SameText(t,e.FName))return e;return null,null}})),rtl.createClass(this,"TXDataInstanceType",this.TXDataStructuredType,(function(){this.$init=function(){t.TXDataStructuredType.$init.call(this),this.FBaseType=null,this.FProperties=null,this.FNavigationProperties=null,this.FCollection=null,this.FBaseTypeRef=""},this.$final=function(){this.FBaseType=void 0,this.FProperties=void 0,this.FNavigationProperties=void 0,this.FCollection=void 0,t.TXDataStructuredType.$final.call(this)},this.Prepare=function(){var e=0;if(""!==this.FBaseTypeRef){if(this.FBaseType=this.GetSchema().FindInstanceType(this.FBaseTypeRef),null===this.FBaseType)throw t.EModelReferenceNotFound.$create("CreateFmt",["BaseType %s not found for instance type %s",pas.System.VarRecs(18,this.FBaseTypeRef,18,this.GetName())]);this.FBaseTypeRef=""}null!==this.FBaseType&&this.FBaseType.Prepare();for(var i=0,s=this.FProperties.GetCount()-1;i<=s;i++)e=i,this.FProperties.GetItem$1(e).Prepare();for(var n=0,r=this.FNavigationProperties.GetCount()-1;n<=r;n++)e=n,this.FNavigationProperties.GetItem$1(e).Prepare()},this.GetCollection=function(){return null===this.FCollection&&(this.FCollection=t.TXDataInstanceCollectionType.$create("Create$1"),this.FCollection.FItemType=this,this.FCollection.FParent=this.FParent),this.FCollection},this.GetTypeKind=function(){return 22,22},this.ScalarPropertyCount=function(){return this.FProperties.GetCount()},this.GetScalarProperty=function(t){return this.FProperties.GetItem$1(t)},this.StructuredPropertyCount=function(){return this.FNavigationProperties.GetCount()},this.GetStructuredProperty=function(t){return this.FNavigationProperties.GetItem$1(t)},this.Create$1=function(){return pas.System.TObject.Create.call(this),this.FProperties=t.TXDataInstanceScalarPropertyList.$create("Create$4",[this]),this.FNavigationProperties=t.TXDataInstanceNavigationPropertyList.$create("Create$4",[this]),this},this.Destroy=function(){rtl.free(this,"FNavigationProperties"),rtl.free(this,"FProperties"),rtl.free(this,"FCollection"),t.TXDataModelObject.Destroy.call(this)},this.$rtti.attr=[pas["Bcl.Json.Attributes"].JsonIncludeAttribute,"Create$1",[pas["Bcl.Json.Attributes"].TInclusionMode.NonDefault]]})),rtl.createClass(this,"TXDataInstanceCollectionType",this.TXDataInstanceType,(function(){this.$init=function(){t.TXDataInstanceType.$init.call(this),this.FItemType=null},this.$final=function(){this.FItemType=void 0,t.TXDataInstanceType.$final.call(this)},this.GetName=function(){return null!==this.FItemType?pas.SysUtils.Format("Collection(%s)",pas.System.VarRecs(18,this.FItemType.GetName())):"Collection()"},this.GetTypeKind=function(){return 23,23}})),rtl.createClass(this,"TXDataEntityType",this.TXDataStructuredType,(function(){this.$init=function(){t.TXDataStructuredType.$init.call(this),this.FKey=null,this.FBaseType=null,this.FProperties=null,this.FNavigationProperties=null,this.FCollection=null,this.FBaseTypeRef="",this.FKeyRef=[]},this.$final=function(){this.FKey=void 0,this.FBaseType=void 0,this.FProperties=void 0,this.FNavigationProperties=void 0,this.FCollection=void 0,this.FKeyRef=void 0,t.TXDataStructuredType.$final.call(this)},this.Prepare=function(){var e="",i=null,s=0;if(""!==this.FBaseTypeRef){if(this.FBaseType=this.GetSchema().FindEntityType(this.FBaseTypeRef),null===this.FBaseType)throw t.EModelReferenceNotFound.$create("CreateFmt",["BaseType %s not found for entity type %s",pas.System.VarRecs(18,this.FBaseTypeRef,18,this.GetName())]);this.FBaseTypeRef=""}if(null!==this.FBaseType&&this.FBaseType.Prepare(),rtl.length(this.FKeyRef)>0){this.FKey.Clear();for(var n=0,r=rtl.length(this.FKeyRef)-1;n<=r;n++){if(s=n,e=this.FKeyRef[s],null===(i=this.FindProperty(e))&&(i=this.FindNavigationProperty(e)),null===i)throw t.EModelReferenceNotFound.$create("CreateFmt",["Key property %s not found on entity type %s",pas.System.VarRecs(18,e,18,this.GetName())]);this.FKey.Add$1(i)}this.FKeyRef=rtl.arraySetLength(this.FKeyRef,"",0)}for(var a=0,o=this.FProperties.GetCount()-1;a<=o;a++)s=a,this.FProperties.GetItem$1(s).Prepare();for(var l=0,h=this.FNavigationProperties.GetCount()-1;l<=h;l++)s=l,this.FNavigationProperties.GetItem$1(s).Prepare()},this.GetCollection=function(){return null===this.FCollection&&(this.FCollection=t.TXDataEntityCollectionType.$create("Create$1"),this.FCollection.FItemType=this,this.FCollection.FParent=this.FParent),this.FCollection},this.GetTypeKind=function(){return 17,17},this.ScalarPropertyCount=function(){return this.FProperties.GetCount()},this.GetScalarProperty=function(t){return this.FProperties.GetItem$1(t)},this.StructuredPropertyCount=function(){return this.FNavigationProperties.GetCount()},this.GetStructuredProperty=function(t){return this.FNavigationProperties.GetItem$1(t)},this.FindScalarProperty=function(e){var i=null;return null===(i=t.TXDataStructuredType.FindScalarProperty.call(this,e))&&null!==this.FBaseType&&(i=this.FBaseType.FindScalarProperty(e)),i},this.FindStructuredProperty=function(e){var i=null;return null===(i=t.TXDataStructuredType.FindStructuredProperty.call(this,e))&&null!==this.FBaseType&&(i=this.FBaseType.FindStructuredProperty(e)),i},this.FindProperty=function(t){return this.FindScalarProperty(t)},this.FindNavigationProperty=function(t){return this.FindStructuredProperty(t)},this.Create$1=function(){return pas.System.TObject.Create.call(this),this.FKey=t.TXDataPropertyList.$create("Create$3",[!1]),this.FProperties=t.TXDataSimplePropertyList.$create("Create$4",[this]),this.FNavigationProperties=t.TXDataNavigationPropertyList.$create("Create$4",[this]),this},this.Destroy=function(){rtl.free(this,"FKey"),rtl.free(this,"FNavigationProperties"),rtl.free(this,"FProperties"),rtl.free(this,"FCollection"),t.TXDataModelObject.Destroy.call(this)},this.$rtti.attr=[pas["Bcl.Json.Attributes"].JsonIncludeAttribute,"Create$1",[pas["Bcl.Json.Attributes"].TInclusionMode.NonDefault]]})),rtl.createClass(this,"TXDataEntityCollectionType",this.TXDataEntityType,(function(){this.$init=function(){t.TXDataEntityType.$init.call(this),this.FItemType=null},this.$final=function(){this.FItemType=void 0,t.TXDataEntityType.$final.call(this)},this.GetName=function(){return null!==this.FItemType?pas.SysUtils.Format("Collection(%s)",pas.System.VarRecs(18,this.FItemType.GetName())):"Collection()"},this.GetTypeKind=function(){return 18,18}})),this.$rtti.$Class("TXDataEntityContainer"),rtl.createClass(this,"TXDataEntitySet",this.TXDataModelObject,(function(){this.$init=function(){t.TXDataModelObject.$init.call(this),this.FName="",this.FEntityType=null,this.FEntityTypeRef=""},this.$final=function(){this.FEntityType=void 0,t.TXDataModelObject.$final.call(this)},this.GetContainer=function(){return this.FParent},this.Prepare=function(){if(""!==this.FEntityTypeRef){if(this.FEntityType=this.GetContainer().GetSchema().FindEntityType(this.FEntityTypeRef),null===this.FEntityType)throw t.EModelReferenceNotFound.$create("CreateFmt",["EntityType not found: %s",pas.System.VarRecs(18,this.FEntityTypeRef)]);this.FEntityTypeRef=""}},this.$rtti.attr=[pas["Bcl.Json.Attributes"].JsonIncludeAttribute,"Create$1",[pas["Bcl.Json.Attributes"].TInclusionMode.NonDefault]]})),rtl.createClass(this,"TXDataEntitySetList",this.TXDataOwnedList,(function(){this.GetItem$1=function(t){return this.GetItem(t)}})),rtl.createClass(this,"TXDataEntityContainer",this.TXDataModelObject,(function(){this.$init=function(){t.TXDataModelObject.$init.call(this),this.FName="",this.FEntitySets=null},this.$final=function(){this.FEntitySets=void 0,t.TXDataModelObject.$final.call(this)},this.GetSchema=function(){return this.FParent},this.Create$1=function(){return pas.System.TObject.Create.call(this),this.FEntitySets=t.TXDataEntitySetList.$create("Create$4",[this]),this},this.Destroy=function(){rtl.free(this,"FEntitySets"),t.TXDataModelObject.Destroy.call(this)},this.$rtti.attr=[pas["Bcl.Json.Attributes"].JsonIncludeAttribute,"Create$1",[pas["Bcl.Json.Attributes"].TInclusionMode.NonDefault]]})),rtl.createClass(this,"TXDataEntityContainerList",this.TXDataOwnedList,(function(){this.GetItem$1=function(t){return this.GetItem(t)}})),this.$rtti.$Class("TXDataAction"),this.TBindingMode={0:"FromBody",FromBody:0,1:"FromURI",FromURI:1,2:"FromPath",FromPath:2},this.$rtti.$Enum("TBindingMode",{minvalue:0,maxvalue:2,ordtype:1,enumtype:this.TBindingMode}),rtl.createClass(this,"TXDataParamDef",this.TXDataModelObject,(function(){this.$init=function(){t.TXDataModelObject.$init.call(this),this.FName="",this.FTypeRef="",this.FTypeNameRef="",this.FType=null,this.FBindingMode=0,this.FOutput=!1,this.FInput=!1},this.$final=function(){this.FType=void 0,t.TXDataModelObject.$final.call(this)},this.GetUrlConverter=function(){return null!==this.FType?this.FType.FUrlConverter:null},this.Prepare=function(){if(""!==this.FTypeRef){if(this.FType=this.GetParent().GetController().GetSchema().FindType(this.FTypeRef),null===this.FType)throw t.EModelReferenceNotFound.$create("CreateFmt",["Param type %s not found for property %s.%s",pas.System.VarRecs(18,this.FTypeRef,18,this.GetParent().FName,18,this.FName)]);this.FTypeRef=""}""!==this.FTypeNameRef&&(this.FType=this.GetParent().GetController().GetSchema().FindType(this.FTypeNameRef),this.FTypeNameRef="")},this.GetParent=function(){return this.FParent},this.Index=function(){return this.GetParent().IndexOf(this)},this.$rtti.attr=[pas["Bcl.Json.Attributes"].JsonIncludeAttribute,"Create$1",[pas["Bcl.Json.Attributes"].TInclusionMode.NonDefault]]})),rtl.createClass(this,"TXDataParamDefList",this.TXDataOwnedList,(function(){this.GetItem$1=function(t){return this.GetItem(t)}})),this.$rtti.$Class("TXDataController"),rtl.createClass(this,"TXDataRouteSegment",pas.System.TObject,(function(){this.$init=function(){pas.System.TObject.$init.call(this),this.FParamName="",this.FValue="",this.FParamIndex=0,this.FIsParam=!1},this.Create$1=function(t){return this.FValue=t,this.FValue.length>=3&&"{"===this.FValue.charAt(0)&&"}"===this.FValue.charAt(this.FValue.length-1)&&(this.FIsParam=!0,this.FParamName=pas.System.Copy(this.FValue,2,this.FValue.length-2)),this}})),rtl.createClass(this,"TXDataRouteSegmentList",this.TXDataOwnedList,(function(){this.GetItem$1=function(t){return this.GetItem(t)}})),rtl.createClass(this,"TXDataRouteInfo",pas.System.TObject,(function(){this.$init=function(){pas.System.TObject.$init.call(this),this.FSegments=null,this.FParamCount=0,this.FPriority=0},this.$final=function(){this.FSegments=void 0,pas.System.TObject.$final.call(this)},this.GetSegment=function(t){return this.FSegments.GetItem$1(t)},this.GetSegmentCount=function(){return this.FSegments.GetCount()},this.Create$1=function(){return this.FSegments=t.TXDataRouteSegmentList.$create("Create$5"),this},this.Destroy=function(){rtl.free(this,"FSegments"),pas.System.TObject.Destroy.call(this)},this.Process=function(i){var s,n=0;s=e.SplitString(i,"/");for(var r=0,a=rtl.length(s)-1;r<=a;r++)""!==s[n=r]&&this.FSegments.Add$1(t.TXDataRouteSegment.$create("Create$1",[s[n]]));this.FPriority=0,this.FParamCount=0;for(var o=0,l=this.GetSegmentCount()-1;o<=l;o++)n=o,this.GetSegment(n).FIsParam?this.FParamCount+=1:this.FPriority=this.FPriority|1<<16-n}})),rtl.createClass(this,"TXDataAction",this.TXDataModelObject,(function(){this.$init=function(){t.TXDataModelObject.$init.call(this),this.FName="",this.FParameters=null,this.FHttpMethod="",this.FIsParamStream=!1,this.FIsResultStream=!1,this.FIsResultCriteria=!1,this.FIsResultSingleObject=!1,this.FOperationId="",this.FConsumes="",this.FRouteInfo=null,this.FReturnType=null,this.FReturnTypeRef=""},this.$final=function(){this.FParameters=void 0,this.FRouteInfo=void 0,this.FReturnType=void 0,t.TXDataModelObject.$final.call(this)},this.ParamCount=function(t){var e=0,i=0;e=0;for(var s=0,n=this.FParameters.GetCount()-1;s<=n;s++)i=s,this.FParameters.GetItem$1(i).FBindingMode===t&&(e+=1);return e},this.GetParam=function(t,i){var s=null,n=0,r=0;s=null,r=-1;for(var a=0,o=this.FParameters.GetCount()-1;a<=o;a++)if(n=a,this.FParameters.GetItem$1(n).FBindingMode===t&&i===(r+=1))return s=this.FParameters.GetItem$1(n);return e.ErrorOutOfRange(),s},this.Prepare=function(){for(var e=0,i=null,s=0,n=0,r=this.FParameters.GetCount()-1;n<=r;n++)e=n,this.FParameters.GetItem$1(e).Prepare();if(""!==this.FReturnTypeRef){if(this.FReturnType=this.GetController().GetSchema().FindType(this.FReturnTypeRef),null===this.FReturnType)throw t.EModelReferenceNotFound.$create("CreateFmt",["Return type %s not found for action %s.%s",pas.System.VarRecs(18,this.FReturnTypeRef,18,this.GetController().FName,18,this.FName)]);this.FReturnTypeRef=""}pas.SysUtils.FreeAndNil({p:this,get:function(){return this.p.FRouteInfo},set:function(t){this.p.FRouteInfo=t}}),this.FRouteInfo=t.TXDataRouteInfo.$create("Create$1"),this.FRouteInfo.Process(this.GetController().FName+"/"+this.FName);for(var a=0,o=this.FRouteInfo.GetSegmentCount()-1;a<=o;a++)if(s=a,(i=this.FRouteInfo.GetSegment(s)).FIsParam){i.FParamIndex=-1;for(var l=0,h=this.PathParamCount()-1;l<=h;l++)if(e=l,pas.SysUtils.SameText(this.GetPathParam(e).FName,i.FParamName)){i.FParamIndex=e;break}if(-1===i.FParamIndex)throw t.EXDataInvalidRouteParam.$create("Create$2",[this,i.FValue])}},this.GetBodyParam=function(t){return this.GetParam(0,t)},this.GetPathParam=function(t){return this.GetParam(2,t)},this.GetController=function(){return this.FParent},this.IsFormContent=function(){return pas.SysUtils.SameText(this.FConsumes,"application/x-www-form-urlencoded")},this.Create$1=function(){return this.FHttpMethod="POST",this.FParameters=t.TXDataParamDefList.$create("Create$4",[this]),this},this.Destroy=function(){rtl.free(this,"FParameters"),rtl.free(this,"FRouteInfo"),t.TXDataModelObject.Destroy.call(this)},this.IndexOf=function(t){return this.FParameters.IndexOf$1(t)},this.ParamStreamIndex=function(){for(var t=0,e=0,i=this.FParameters.GetCount()-1;e<=i;e++)if(t=e,null!=this.FParameters.GetItem$1(t).FType&&21===this.FParameters.GetItem$1(t).FType.GetTypeKind())return t;return this.FIsParamStream?0:-1},this.BodyParamCount=function(){return this.ParamCount(0)},this.PathParamCount=function(){return this.ParamCount(2)},this.$rtti.attr=[pas["Bcl.Json.Attributes"].JsonIncludeAttribute,"Create$1",[pas["Bcl.Json.Attributes"].TInclusionMode.NonDefault]]})),rtl.createClass(this,"TXDataActionList",this.TXDataOwnedList,(function(){this.GetItem$1=function(t){return this.GetItem(t)}})),rtl.createClass(this,"TXDataController",this.TXDataModelObject,(function(){this.$init=function(){t.TXDataModelObject.$init.call(this),this.FName="",this.FActions=null,this.FRouteInfo=null},this.$final=function(){this.FActions=void 0,this.FRouteInfo=void 0,t.TXDataModelObject.$final.call(this)},this.GetSchema=function(){return this.FParent},this.Prepare=function(){var e=0;pas.SysUtils.FreeAndNil({p:this,get:function(){return this.p.FRouteInfo},set:function(t){this.p.FRouteInfo=t}}),this.FRouteInfo=t.TXDataRouteInfo.$create("Create$1"),this.FRouteInfo.Process(this.FName);for(var i=0,s=this.FActions.GetCount()-1;i<=s;i++)e=i,this.FActions.GetItem$1(e).Prepare()},this.Create$1=function(){return this.FActions=t.TXDataActionList.$create("Create$4",[this]),this},this.Destroy=function(){rtl.free(this,"FActions"),rtl.free(this,"FRouteInfo"),t.TXDataModelObject.Destroy.call(this)},this.$rtti.attr=[pas["Bcl.Json.Attributes"].JsonIncludeAttribute,"Create$1",[pas["Bcl.Json.Attributes"].TInclusionMode.NonDefault]]})),rtl.createClass(this,"TXDataEntityTypeList",this.TXDataOwnedList,(function(){this.GetItem$1=function(t){return this.GetItem(t)}})),rtl.createClass(this,"TXDataInstanceTypeList",this.TXDataOwnedList,(function(){this.GetItem$1=function(t){return this.GetItem(t)}})),rtl.createClass(this,"TXDataControllerList",this.TXDataOwnedList,(function(){this.GetItem$1=function(t){return this.GetItem(t)}})),rtl.createClass(this,"TXDataSchema",this.TXDataModelObject,(function(){this.$init=function(){t.TXDataModelObject.$init.call(this),this.FNamespace="",this.FAlias="",this.FEntityTypes=null,this.FEntityContainers=null,this.FEnumTypes=null,this.FInstanceTypes=null,this.FControllers=null},this.$final=function(){this.FEntityTypes=void 0,this.FEntityContainers=void 0,this.FEnumTypes=void 0,this.FInstanceTypes=void 0,this.FControllers=void 0,t.TXDataModelObject.$final.call(this)},this.GetModel=function(){return this.FParent},this.IsCollectionName=function(t,e){var i="";return pas["XData.Utils"].TXDataUtils.GetNameAndKey(t,{get:function(){return i},set:function(t){i=t}},e)&&"Collection"===i},this.Create$1=function(){return pas.System.TObject.Create.call(this),this.FEntityTypes=t.TXDataEntityTypeList.$create("Create$4",[this]),this.FInstanceTypes=t.TXDataInstanceTypeList.$create("Create$4",[this]),this.FEnumTypes=t.TXDataEnumTypeList.$create("Create$4",[this]),this.FEntityContainers=t.TXDataEntityContainerList.$create("Create$4",[this]),this.FControllers=t.TXDataControllerList.$create("Create$4",[this]),this},this.Destroy=function(){rtl.free(this,"FEntityTypes"),rtl.free(this,"FInstanceTypes"),rtl.free(this,"FEnumTypes"),rtl.free(this,"FEntityContainers"),rtl.free(this,"FControllers"),t.TXDataModelObject.Destroy.call(this)},this.FindOrDefineConverter=function(e){var i=null;return null===e?null:null!==e.FUrlConverter?e.FUrlConverter:(null===(i=this.GetModel().FUrlConverters.Find(e.GetName()))&&t.TXDataEnumType.isPrototypeOf(e)&&(i=pas["XData.Types.Converters"].TXDataEnumConverter.$create("Create$1",[e]),this.GetModel().FUrlConverters.RegisterConverter(e.GetName(),i)),i)},this.FindEntityType=function(t){var e=null,i=null,s="",n=0;if(this.IsCollectionName(t,{get:function(){return s},set:function(t){s=t}}))e=null!==(i=this.FindEntityType(s))?i.GetCollection():null;else{for(var r=0,a=this.FEntityTypes.GetCount()-1;r<=a;r++)if(n=r,i=this.FEntityTypes.GetItem$1(n),pas.SysUtils.SameText(i.GetName(),t))return i;e=null}return e},this.FindInstanceType=function(t){var e=null,i=null,s="",n=0;if(this.IsCollectionName(t,{get:function(){return s},set:function(t){s=t}}))e=null!==(i=this.FindInstanceType(s))?i.GetCollection():null;else{for(var r=0,a=this.FInstanceTypes.GetCount()-1;r<=a;r++)if(n=r,i=this.FInstanceTypes.GetItem$1(n),pas.SysUtils.SameText(i.GetName(),t))return i;e=null}return e},this.FindEnumType=function(t){for(var e=null,i=0,s=0,n=this.FEnumTypes.GetCount()-1;s<=n;s++)if(i=s,e=this.FEnumTypes.GetItem$1(i),pas.SysUtils.SameText(e.GetName(),t))return e;return null,null},this.FindScalarType=function(t){var e=null,i="";return null===(e=this.FindEnumType(t))&&(this.IsCollectionName(t,{get:function(){return i},set:function(t){i=t}})?null!==(e=pas["XData.Model.Types"].TXDataPrimitiveTypes.Instance().Find(i))&&(e=e.GetCollection()):e=pas["XData.Model.Types"].TXDataPrimitiveTypes.Instance().Find(t)),e},this.FindType=function(t){var e=null;return null===(e=this.FindScalarType(t))&&(e=this.FindEntityType(t)),null===e&&(e=this.FindInstanceType(t)),e},this.$rtti.attr=[pas["Bcl.Json.Attributes"].JsonIncludeAttribute,"Create$1",[pas["Bcl.Json.Attributes"].TInclusionMode.NonDefault]]})),rtl.createClass(this,"TXDataSchemaList",this.TXDataOwnedList,(function(){this.GetItem$1=function(t){return this.GetItem(t)}})),rtl.createClass(this,"TXDataUrlConverters",pas.System.TObject,(function(){this.$init=function(){pas.System.TObject.$init.call(this),this.FConverterMap=null},this.$final=function(){this.FConverterMap=void 0,pas.System.TObject.$final.call(this)},this.Create$1=function(){return pas.System.TObject.Create.call(this),this.FConverterMap=pas["Bcl.Collections.Common"].TStringMap.$create("Create$1",[!0]),this},this.Destroy=function(){rtl.free(this,"FConverterMap"),pas.System.TObject.Destroy.call(this)},this.Find=function(t){return this.FConverterMap.ContainsKey(t)?this.FConverterMap.GetItem(t):null},this.RegisterConverter=function(t,e){this.FConverterMap.AddOrSetValue(t,e)}})),rtl.createClass(this,"TXDataBaseModel",this.TXDataModelObject,(function(){this.$init=function(){t.TXDataModelObject.$init.call(this),this.FTitle="",this.FVersion="",this.FSchemas=null,this.FUrlConverters=null},this.$final=function(){this.FSchemas=void 0,this.FUrlConverters=void 0,t.TXDataModelObject.$final.call(this)},this.Prepare=function(){for(var t=null,e=null,i=null,s=null,n=0,r=0,a=0,o=0,l=0,h=0,d=0,u=null,c=0,F=this.FSchemas.GetCount()-1;c<=F;c++){n=c,t=this.FSchemas.GetItem$1(n);for(var p=0,S=pas["XData.Model.Types"].TXDataPrimitiveTypes.Instance().GetTypes().FLength-1;p<=S;p++)d=p,(u=pas["XData.Model.Types"].TXDataPrimitiveTypes.Instance().GetTypes().GetItem(d)).FUrlConverter=t.FindOrDefineConverter(u),u.GetCollection().FUrlConverter=t.FindOrDefineConverter(u.GetCollection());for(var m=0,C=t.FEnumTypes.GetCount()-1;m<=C;m++)d=m,(u=t.FEnumTypes.GetItem$1(d)).FUrlConverter=t.FindOrDefineConverter(u);for(var g=0,b=t.FEntityTypes.GetCount()-1;g<=b;g++)o=g,(i=t.FEntityTypes.GetItem$1(o)).FUrlConverter=t.FindOrDefineConverter(i),i.GetCollection().FUrlConverter=t.FindOrDefineConverter(i.GetCollection());for(var f=0,T=t.FInstanceTypes.GetCount()-1;f<=T;f++)l=f,(s=t.FInstanceTypes.GetItem$1(l)).FUrlConverter=t.FindOrDefineConverter(s),s.GetCollection().FUrlConverter=t.FindOrDefineConverter(s.GetCollection());for(var y=0,E=t.FEntityContainers.GetCount()-1;y<=E;y++){r=y;for(var L=0,B=(e=t.FEntityContainers.GetItem$1(r)).FEntitySets.GetCount()-1;L<=B;L++)a=L,e.FEntitySets.GetItem$1(a).Prepare()}for(var D=0,W=t.FEntityTypes.GetCount()-1;D<=W;D++)o=D,(i=t.FEntityTypes.GetItem$1(o)).Prepare();for(var P=0,v=t.FInstanceTypes.GetCount()-1;P<=v;P++)l=P,(s=t.FInstanceTypes.GetItem$1(l)).Prepare();for(var M=0,$=t.FControllers.GetCount()-1;M<=$;M++)h=M,t.FControllers.GetItem$1(h).Prepare()}},this.Create$1=function(){return this.FTitle="Server API",this.FVersion="3",this.FSchemas=t.TXDataSchemaList.$create("Create$4",[this]),this.FUrlConverters=t.TXDataUrlConverters.$create("Create$1"),this},this.Destroy=function(){rtl.free(this,"FSchemas"),rtl.free(this,"FUrlConverters"),t.TXDataModelObject.Destroy.call(this)},this.FindActionByOperationId=function(t){var e=null,i=null,s=null,n=0,r=0,a=0;for(var o=0,l=this.FSchemas.GetCount()-1;o<=l;o++){n=o;for(var h=0,d=(e=this.FSchemas.GetItem$1(n)).FControllers.GetCount()-1;h<=d;h++){r=h;for(var u=0,c=(i=e.FControllers.GetItem$1(r)).FActions.GetCount()-1;u<=c;u++)if(a=u,s=i.FActions.GetItem$1(a),pas.SysUtils.SameText(s.FOperationId,t))return s}}return null},this.$rtti.attr=[pas["Bcl.Json.Attributes"].JsonIncludeAttribute,"Create$1",[pas["Bcl.Json.Attributes"].TInclusionMode.NonDefault]]})),rtl.createClass(this,"TXDataModel",this.TXDataBaseModel,(function(){this.$rtti.attr=[pas["Bcl.Json.Attributes"].JsonIncludeAttribute,"Create$1",[pas["Bcl.Json.Attributes"].TInclusionMode.NonDefault]]})),rtl.createClass(this,"TXDataTypeConverter",pas.System.TObject,(function(){this.TryValueToUrl=function(t,e){return!1,!1},this.Destroy=function(){pas.System.TObject.Destroy.call(this)},this.ValueToUrl=function(e,i){var s="";if(null==e)return"null";if(!this.TryValueToUrl(e,{get:function(){return s},set:function(t){s=t}}))throw t.EConvertToUrlError.$create("Create$2",[i,e]);return s}})),rtl.createClass(this,"EConvertToUrlError",pas.SysUtils.Exception,(function(){this.Create$2=function(t,e){return""!==t?pas.SysUtils.Exception.CreateFmt.call(this,'Cannot serialize value "%s" to Url parameter "%s"',pas.System.VarRecs(18,pas["Bcl.Rtti.Common"].TValue_ToString(e),18,t)):pas.SysUtils.Exception.CreateFmt.call(this,'Cannot serialize value "%s" to Url',pas.System.VarRecs(18,pas["Bcl.Rtti.Common"].TValue_ToString(e))),this}})),rtl.createClass(this,"EModelReferenceNotFound",pas.SysUtils.Exception,(function(){})),rtl.createClass(this,"EUrlConverterNotFound",pas.SysUtils.Exception,(function(){this.Create$2=function(t){var e="";return e=null===t?"(null)":t.GetName(),pas.SysUtils.Exception.CreateFmt.call(this,'Could not find URL converter for type "%s"',pas.System.VarRecs(18,e)),this}})),rtl.createClass(this,"EIndexOutOfRange",pas.SysUtils.Exception,(function(){})),rtl.createClass(this,"EXDataInvalidRouteParam",pas.SysUtils.Exception,(function(){this.Create$2=function(t,e){return pas.SysUtils.Exception.CreateFmt.call(this,'Invalid param "%s" in route of action "%s"',pas.System.VarRecs(18,e,18,t.FOperationId)),this}})),t.$implcode=function(){e.ErrorOutOfRange=function(){throw t.EIndexOutOfRange.$create("Create$1",["Index out of range"])},e.FindDelimiter=function(t,e){var i,s=0,n=!1;for(s=0,i=t.length,n=!1;!n&&e<=i;)"/"===t.charAt(e-1)?(s=e,n=!0):e+=1;return s},e.SplitString=function(t,i){var s=[],n=0,r=0,a=0,o=0,l=0;if(s=[],""!==t){a=0;for(var h=1,d=t.length;h<=d;h++)l=h,"/"===t.charAt(l-1)&&(a+=1);s=rtl.arraySetLength(s,"",a+1),n=1,o=0;do{0!==(r=e.FindDelimiter(t,n))&&(s[o]=pas.System.Copy(t,n,r-n),o+=1,n=r+1)}while(o!==a);s[a]=pas.System.Copy(t,n,t.length-n+1)}return s}}}),["XData.Model.Types","XData.Types.Converters","XData.Utils"]),rtl.module("Bcl.TypInfo.Common",["System","TypInfo"],(function(){"use strict";this.GetEnumValue_=function(t,e){return t.enumtype[e]}})),rtl.module("XData.Model.Deserializer",["System","SysUtils","Types","TypInfo","JS","Bcl.Json.Common","Bcl.TypInfo.Common","XData.Model.Classes"],(function(){"use strict";var t=this;rtl.createClass(this,"TXDataModelDeserializer",pas.System.TObject,(function(){this.$init=function(){pas.System.TObject.$init.call(this),this.FModel=null,this.FRoot=null},this.$final=function(){this.FModel=void 0,this.FRoot=void 0,pas.System.TObject.$final.call(this)},this.Create$1=function(t,e){return this.FModel=t,this.FRoot=JSON.parse(e),this},this.Destroy=function(){pas.System.TObject.Destroy.call(this)},this.Read=function(){this.ReadModel(this.FModel,this.FRoot),this.FModel.Prepare()},this.ReadBase=function(t,e){var i,s="";i=pas["Bcl.Json.Common"].JObjectKeys(e);for(var n=0,r=rtl.length(i)-1;n<=r;n++)"Description"===(s=i[n])&&(t.FDescription=pas["Bcl.Json.Common"].JToStr(e[s]))},this.ReadType=function(t,e){var i,s="";this.ReadBase(t,e),i=pas["Bcl.Json.Common"].JObjectKeys(e);for(var n=0,r=rtl.length(i)-1;n<=r;n++)"Name"===(s=i[n])&&(t.FName=pas["Bcl.Json.Common"].JToStr(e[s]))},this.ReadStructuredType=function(t,e){this.ReadType(t,e)},this.ReadScalarType=function(t,e){this.ReadType(t,e)},this.ReadModel=function(t,e){var i,s="",n=0,r=null;this.ReadBase(t,e),t.FSchemas.Clear(),i=pas["Bcl.Json.Common"].JObjectKeys(e);for(var a=0,o=rtl.length(i)-1;a<=o;a++)if("Title"===(s=i[a]))t.FTitle=pas["Bcl.Json.Common"].JToStr(e[s]);else if("Version"===s)t.FVersion=pas["Bcl.Json.Common"].JToStr(e[s]);else if("Schemas"===s)for(var l=0,h=(r=pas["Bcl.Json.Common"].AsJArray(e[s])).length-1;l<=h;l++)n=l,this.ReadSchema(t.FSchemas.GetItem$1(t.FSchemas.Add$1(pas["XData.Model.Classes"].TXDataSchema.$create("Create$1"))),pas["Bcl.Json.Common"].AsJObject(r[n]))},this.ReadSchema=function(t,e){var i,s="",n=0,r=null,a=null,o=null,l=null,h=null;this.ReadBase(t,e),t.FEntityTypes.Clear(),t.FInstanceTypes.Clear(),t.FEntityContainers.Clear(),t.FEnumTypes.Clear(),t.FControllers.Clear(),i=pas["Bcl.Json.Common"].JObjectKeys(e);for(var d=0,u=rtl.length(i)-1;d<=u;d++)if("Namespace"===(s=i[d]))t.FNamespace=pas["Bcl.Json.Common"].JToStr(e[s]);else if("Alias"===s)t.FAlias=pas["Bcl.Json.Common"].JToStr(e[s]);else if("EntityTypes"===s)for(var c=0,F=(r=pas["Bcl.Json.Common"].AsJArray(e[s])).length-1;c<=F;c++)n=c,this.ReadEntityType(t.FEntityTypes.GetItem$1(t.FEntityTypes.Add$1(pas["XData.Model.Classes"].TXDataEntityType.$create("Create$1"))),pas["Bcl.Json.Common"].AsJObject(r[n]));else if("InstanceTypes"===s)for(var p=0,S=(a=pas["Bcl.Json.Common"].AsJArray(e[s])).length-1;p<=S;p++)n=p,this.ReadInstanceType(t.FInstanceTypes.GetItem$1(t.FInstanceTypes.Add$1(pas["XData.Model.Classes"].TXDataInstanceType.$create("Create$1"))),pas["Bcl.Json.Common"].AsJObject(a[n]));else if("EntityContainers"===s)for(var m=0,C=(o=pas["Bcl.Json.Common"].AsJArray(e[s])).length-1;m<=C;m++)n=m,this.ReadEntityContainer(t.FEntityContainers.GetItem$1(t.FEntityContainers.Add$1(pas["XData.Model.Classes"].TXDataEntityContainer.$create("Create$1"))),pas["Bcl.Json.Common"].AsJObject(o[n]));else if("EnumTypes"===s)for(var g=0,b=(l=pas["Bcl.Json.Common"].AsJArray(e[s])).length-1;g<=b;g++)n=g,this.ReadEnumType(t.FEnumTypes.GetItem$1(t.FEnumTypes.Add$1(pas["XData.Model.Classes"].TXDataEnumType.$create("Create$1"))),pas["Bcl.Json.Common"].AsJObject(l[n]));else if("Controllers"===s)for(var f=0,T=(h=pas["Bcl.Json.Common"].AsJArray(e[s])).length-1;f<=T;f++)n=f,this.ReadController(t.FControllers.GetItem$1(t.FControllers.Add$1(pas["XData.Model.Classes"].TXDataController.$create("Create$1"))),pas["Bcl.Json.Common"].AsJObject(h[n]))},this.ReadEntityType=function(t,e){var i,s="",n=0,r=null,a=null,o=null,l=[];this.ReadStructuredType(t,e),l=rtl.arraySetLength(l,"",0),t.FProperties.Clear(),t.FNavigationProperties.Clear(),i=pas["Bcl.Json.Common"].JObjectKeys(e);for(var h=0,d=rtl.length(i)-1;h<=d;h++)if("Properties"===(s=i[h]))for(var u=0,c=(r=pas["Bcl.Json.Common"].AsJArray(e[s])).length-1;u<=c;u++)n=u,this.ReadSimpleProperty(t.FProperties.GetItem$1(t.FProperties.Add$1(pas["XData.Model.Classes"].TXDataSimpleProperty.$create("Create$1"))),pas["Bcl.Json.Common"].AsJObject(r[n]));else if("NavigationProperties"===s)for(var F=0,p=(a=pas["Bcl.Json.Common"].AsJArray(e[s])).length-1;F<=p;F++)n=F,this.ReadNavigationProperty(t.FNavigationProperties.GetItem$1(t.FNavigationProperties.Add$1(pas["XData.Model.Classes"].TXDataNavigationProperty.$create("Create$1"))),pas["Bcl.Json.Common"].AsJObject(a[n]));else if("BaseType"===s)t.FBaseTypeRef=pas["Bcl.Json.Common"].JToStr(e[s]);else if("Key"===s){o=pas["Bcl.Json.Common"].AsJArray(e[s]),l=rtl.arraySetLength(l,"",o.length);for(var S=0,m=o.length-1;S<=m;S++)l[n=S]=pas["Bcl.Json.Common"].JToStr(o[n]);t.FKeyRef=rtl.arrayRef(l)}},this.ReadInstanceType=function(t,e){var i,s="",n=0,r=null,a=null;this.ReadStructuredType(t,e),t.FProperties.Clear(),t.FNavigationProperties.Clear(),i=pas["Bcl.Json.Common"].JObjectKeys(e);for(var o=0,l=rtl.length(i)-1;o<=l;o++)if("Properties"===(s=i[o]))for(var h=0,d=(r=pas["Bcl.Json.Common"].AsJArray(e[s])).length-1;h<=d;h++)n=h,this.ReadInstanceSimpleProperty(t.FProperties.GetItem$1(t.FProperties.Add$1(pas["XData.Model.Classes"].TXDataInstanceSimpleProperty.$create("Create$1"))),pas["Bcl.Json.Common"].AsJObject(r[n]));else if("NavigationProperties"===s)for(var u=0,c=(a=pas["Bcl.Json.Common"].AsJArray(e[s])).length-1;u<=c;u++)n=u,this.ReadInstanceNavigationProperty(t.FNavigationProperties.GetItem$1(t.FNavigationProperties.Add$1(pas["XData.Model.Classes"].TXDataInstanceNavigationProperty.$create("Create$1"))),pas["Bcl.Json.Common"].AsJObject(a[n]));else"BaseType"===s&&(t.FBaseTypeRef=pas["Bcl.Json.Common"].JToStr(e[s]))},this.ReadScalarProperty=function(t,e){var i,s="";this.ReadProperty(t,e),i=pas["Bcl.Json.Common"].JObjectKeys(e);for(var n=0,r=rtl.length(i)-1;n<=r;n++)"Length"===(s=i[n])?t.FLength=pas["Bcl.Json.Common"].JToInt(e[s]):"Precision"===s?t.FPrecision=pas["Bcl.Json.Common"].JToInt(e[s]):"Scale"===s?t.FScale=pas["Bcl.Json.Common"].JToInt(e[s]):"Type"===s&&(t.FTypeRef=pas["Bcl.Json.Common"].JToStr(e[s]))},this.ReadSimpleProperty=function(t,e){this.ReadScalarProperty(t,e)},this.ReadInstanceSimpleProperty=function(t,e){this.ReadScalarProperty(t,e)},this.ReadStructuredProperty=function(t,e){var i,s="";this.ReadProperty(t,e),i=pas["Bcl.Json.Common"].JObjectKeys(e);for(var n=0,r=rtl.length(i)-1;n<=r;n++)"Target"===(s=i[n])&&(t.FTargetRef=pas["Bcl.Json.Common"].JToStr(e[s]))},this.ReadNavigationProperty=function(t,e){this.ReadStructuredProperty(t,e)},this.ReadInstanceNavigationProperty=function(t,e){this.ReadStructuredProperty(t,e)},this.ReadProperty=function(t,e){var i,s="";this.ReadBase(t,e),i=pas["Bcl.Json.Common"].JObjectKeys(e);for(var n=0,r=rtl.length(i)-1;n<=r;n++)"Name"===(s=i[n])?t.FName=pas["Bcl.Json.Common"].JToStr(e[s]):"Required"===s&&(t.FRequired=pas["Bcl.Json.Common"].JToBool(e[s]))},this.ReadEntityContainer=function(t,e){var i,s="",n=0,r=null;this.ReadBase(t,e),i=pas["Bcl.Json.Common"].JObjectKeys(e);for(var a=0,o=rtl.length(i)-1;a<=o;a++)if("Name"===(s=i[a]))t.FName=pas["Bcl.Json.Common"].JToStr(e[s]);else if("EntitySets"===s)for(var l=0,h=(r=pas["Bcl.Json.Common"].AsJArray(e[s])).length-1;l<=h;l++)n=l,this.ReadEntitySet(t.FEntitySets.GetItem$1(t.FEntitySets.Add$1(pas["XData.Model.Classes"].TXDataEntitySet.$create("Create"))),pas["Bcl.Json.Common"].AsJObject(r[n]))},this.ReadEntitySet=function(t,e){var i,s="";this.ReadBase(t,e),i=pas["Bcl.Json.Common"].JObjectKeys(e);for(var n=0,r=rtl.length(i)-1;n<=r;n++)"Name"===(s=i[n])?t.FName=pas["Bcl.Json.Common"].JToStr(e[s]):"EntityType"===s&&(t.FEntityTypeRef=pas["Bcl.Json.Common"].JToStr(e[s]))},this.ReadEnumType=function(t,e){var i,s="",n=0,r=null;this.ReadScalarType(t,e),i=pas["Bcl.Json.Common"].JObjectKeys(e);for(var a=0,o=rtl.length(i)-1;a<=o;a++)if("Members"===(s=i[a]))for(var l=0,h=(r=pas["Bcl.Json.Common"].AsJArray(e[s])).length-1;l<=h;l++)n=l,this.ReadEnumMember(t.FMembers.GetItem$1(t.FMembers.Add$1(pas["XData.Model.Classes"].TXDataEnumMember.$create("Create"))),pas["Bcl.Json.Common"].AsJObject(r[n]))},this.ReadEnumMember=function(t,e){var i,s="";this.ReadBase(t,e),i=pas["Bcl.Json.Common"].JObjectKeys(e);for(var n=0,r=rtl.length(i)-1;n<=r;n++)"Name"===(s=i[n])?t.FName=pas["Bcl.Json.Common"].JToStr(e[s]):"Value"===s&&(t.FValue=pas["Bcl.Json.Common"].JToInt(e[s]))},this.ReadController=function(t,e){var i,s="",n=0,r=null;this.ReadBase(t,e),i=pas["Bcl.Json.Common"].JObjectKeys(e);for(var a=0,o=rtl.length(i)-1;a<=o;a++)if("Name"===(s=i[a]))t.FName=pas["Bcl.Json.Common"].JToStr(e[s]);else if("Actions"===s)for(var l=0,h=(r=pas["Bcl.Json.Common"].AsJArray(e[s])).length-1;l<=h;l++)n=l,this.ReadAction(t.FActions.GetItem$1(t.FActions.Add$1(pas["XData.Model.Classes"].TXDataAction.$create("Create$1"))),pas["Bcl.Json.Common"].AsJObject(r[n]))},this.ReadAction=function(t,e){var i,s="",n=0,r=null;this.ReadBase(t,e),i=pas["Bcl.Json.Common"].JObjectKeys(e);for(var a=0,o=rtl.length(i)-1;a<=o;a++)if("Name"===(s=i[a]))t.FName=pas["Bcl.Json.Common"].JToStr(e[s]);else if("Parameters"===s)for(var l=0,h=(r=pas["Bcl.Json.Common"].AsJArray(e[s])).length-1;l<=h;l++)n=l,this.ReadParamDef(t.FParameters.GetItem$1(t.FParameters.Add$1(pas["XData.Model.Classes"].TXDataParamDef.$create("Create"))),pas["Bcl.Json.Common"].AsJObject(r[n]));else"HttpMethod"===s?t.FHttpMethod=pas["Bcl.Json.Common"].JToStr(e[s]):"IsParamStream"===s?t.FIsParamStream=pas["Bcl.Json.Common"].JToBool(e[s]):"IsResultStream"===s?t.FIsResultStream=pas["Bcl.Json.Common"].JToBool(e[s]):"IsResultCriteria"===s?t.FIsResultCriteria=pas["Bcl.Json.Common"].JToBool(e[s]):"IsResultSingleObject"===s?t.FIsResultSingleObject=pas["Bcl.Json.Common"].JToBool(e[s]):"OperationId"===s?t.FOperationId=pas["Bcl.Json.Common"].JToStr(e[s]):"ReturnType"===s?t.FReturnTypeRef=pas["Bcl.Json.Common"].JToStr(e[s]):"Consumes"===s&&(t.FConsumes=pas["Bcl.Json.Common"].JToStr(e[s]))},this.ReadParamDef=function(t,e){var i,s="";this.ReadBase(t,e),i=pas["Bcl.Json.Common"].JObjectKeys(e);for(var n=0,r=rtl.length(i)-1;n<=r;n++)"Name"===(s=i[n])?t.FName=pas["Bcl.Json.Common"].JToStr(e[s]):"BindingMode"===s?t.FBindingMode=pas["Bcl.TypInfo.Common"].GetEnumValue_(pas["XData.Model.Classes"].$rtti.TBindingMode,pas["Bcl.Json.Common"].JToStr(e[s])):"Output"===s?t.FOutput=pas["Bcl.Json.Common"].JToBool(e[s]):"Input"===s?t.FInput=pas["Bcl.Json.Common"].JToBool(e[s]):"Type"===s?t.FTypeRef=pas["Bcl.Json.Common"].JToStr(e[s]):"TypeName"===s&&(t.FTypeNameRef=pas["Bcl.Json.Common"].JToStr(e[s]))},this.Deserialize=function(e,i){var s=null;s=t.TXDataModelDeserializer.$create("Create$1",[e,i]);try{s.Read()}finally{s=rtl.freeLoc(s)}}}))})),rtl.module("XData.Web.Connection",["System","Types","Classes","SysUtils","Web","JS","XData.Web.Request","XData.Web.Response","XData.Model.Classes"],(function(){"use strict";var t=this;this.$rtti.$Class("TXDataWebConnection"),this.$rtti.$Class("TXDataWebConnectionDesignData"),rtl.createClass(this,"TXDataWebConnectionRequest",pas.System.TObject,(function(){this.$init=function(){pas.System.TObject.$init.call(this),this.FRequest=null,this.FConnection=null,this.FRequestProc=null,this.FAsync=!1},this.$final=function(){rtl.setIntfP(this,"FRequest",null),this.FConnection=void 0,this.FRequestProc=void 0,pas.System.TObject.$final.call(this)},this.Create$1=function(t,e){rtl._AddRef(e);try{this.FConnection=t,rtl.setIntfP(this,"FRequest",e)}finally{rtl._Release(e)}return this}})),rtl.createClass(this,"TXDataWebConnectionResponse",pas.System.TObject,(function(){this.$init=function(){pas.System.TObject.$init.call(this),this.FRequest=null,this.FResponse=null,this.FConnection=null,this.FSuccessProc=null,this.FAsync=!1},this.$final=function(){rtl.setIntfP(this,"FRequest",null),rtl.setIntfP(this,"FResponse",null),this.FConnection=void 0,this.FSuccessProc=void 0,pas.System.TObject.$final.call(this)},this.Create$1=function(t,e,i){rtl._AddRef(e),rtl._AddRef(i);try{this.FConnection=t,rtl.setIntfP(this,"FRequest",e),rtl.setIntfP(this,"FResponse",i)}finally{rtl._Release(e),rtl._Release(i)}return this}})),rtl.createClass(this,"TXDataWebConnectionError",pas.System.TObject,(function(){this.$init=function(){pas.System.TObject.$init.call(this),this.FResponse=null,this.FConnection=null,this.FErrorMessage="",this.FRequestUrl=""},this.$final=function(){rtl.setIntfP(this,"FResponse",null),this.FConnection=void 0,pas.System.TObject.$final.call(this)},this.Create$1=function(t,e,i,s){rtl._AddRef(e);try{this.FConnection=t,rtl.setIntfP(this,"FResponse",e),this.FErrorMessage=s,this.FRequestUrl=i}finally{rtl._Release(e)}return this}})),this.$rtti.$MethodVar("TXDataWebConnectionRequestEvent",{procsig:rtl.newTIProcSig([["Args",this.$rtti.TXDataWebConnectionRequest]]),methodkind:0}),this.$rtti.$MethodVar("TXDataWebConnectionResponseEvent",{procsig:rtl.newTIProcSig([["Args",this.$rtti.TXDataWebConnectionResponse]]),methodkind:0}),this.$rtti.$MethodVar("TXDataWebConnectionErrorEvent",{procsig:rtl.newTIProcSig([["error",this.$rtti.TXDataWebConnectionError]]),methodkind:0}),rtl.createClass(this,"TXDataWebConnection",pas.Classes.TComponent,(function(){this.$init=function(){pas.Classes.TComponent.$init.call(this),this.FURL="",this.FModel=null,this.FOnConnect=null,this.FStreamedConnected=!1,this.FOnRequest=null,this.FOnResponse=null,this.FOnError=null,this.FDesignData=null},this.$final=function(){this.FModel=void 0,this.FOnConnect=void 0,this.FOnRequest=void 0,this.FOnResponse=void 0,this.FOnError=void 0,this.FDesignData=void 0,pas.Classes.TComponent.$final.call(this)},this.GetConnected=function(){return null!=this.FModel},this.SetConnected=function(t){if(0 in this.FComponentState&&t)this.FStreamedConnected=!0;else{if(t===this.GetConnected())return;t?this.DoConnect(null,null):this.DoDisconnect()}},this.IsDesignDataStored=function(){return this.FDesignData.FPersist},this.SetDesignData=function(t){this.FDesignData.Assign(t)},this.DoError=function(e,i,s,n){var r=null;rtl._AddRef(e);try{if(r=t.TXDataWebConnectionError.$create("Create$1",[this,e,i,s]),null!=n)n(r);else{if(null==this.FOnError)throw pas.SysUtils.Exception.$create("Create$1",["XDataConnectionError: "+s]);this.FOnError(r)}}finally{rtl._Release(e)}},this.SetURL=function(t){this.FURL!==t&&(this.FURL=t,this.DoDisconnect())},this.DoConnect=function(t,e){var i=this,s="";var n=null,r=0;try{rtl.free(this,"FModel"),this.FModel=null,s=pas["Bcl.Utils"].TBclUtils.CombineUrlFast(i.FURL,"$model"),n=rtl.setIntfL(n,rtl.queryIntfT(pas["XData.Web.Request"].THttpRequest.$create("Create$2",[s]),pas["XData.Web.Request"].IHttpRequest),!0);for(var a=0,o=this.FDesignData.FHeaders.GetCount()-1;a<=o;a++)r=a,""!==this.FDesignData.FHeaders.GetName(r)&&n.GetHeaders().SetValue(this.FDesignData.FHeaders.GetName(r),this.FDesignData.FHeaders.GetValueFromIndex(r));this.SendRequest(n,(function(n){var r=null;rtl._AddRef(n);try{if(200===n.GetStatusCode()){r=pas["XData.Model.Classes"].TXDataModel.$create("Create$1");try{pas["XData.Model.Deserializer"].TXDataModelDeserializer.Deserialize(r,n.GetContentAsText()),i.FModel=r}catch(t){throw r=rtl.freeLoc(r),t}null!=t?t():null!=i.FOnConnect&&i.FOnConnect(i)}else i.DoError(n,s,pas.SysUtils.Format("Error %d. Could not connect retrieve XData model from %s",pas.System.VarRecs(0,n.GetStatusCode(),18,s)),e)}finally{rtl._Release(n)}}),(function(){var t=null;try{t=rtl.setIntfL(t,rtl.queryIntfT(pas["XData.Web.Response"].TDummyHttpResponse.$create("Create$1"),pas["XData.Web.Response"].IHttpResponse),!0),i.DoError(t,s,"Error connecting to XData server",e)}finally{rtl._Release(t)}}))}finally{rtl._Release(n)}},this.DoDisconnect=function(){rtl.free(this,"FModel"),this.FModel=null},this.SendRequest=function(e,i,s){var n=this;function r(s){var r=null,a=!1;rtl._AddRef(s);try{if(a=!1,null!=n.FOnResponse){r=t.TXDataWebConnectionResponse.$create("Create$1",[n,e,s]);try{r.FSuccessProc=function(t){rtl._AddRef(t);try{i(t)}finally{rtl._Release(t)}},n.FOnResponse(r),(a=r.FAsync)||(s=rtl.setIntfL(s,r.FResponse))}finally{a||(r=rtl.freeLoc(r))}}a||i(s)}finally{rtl._Release(s)}}var a=null,o=!1;rtl._AddRef(e);try{if(o=!1,null!=this.FOnRequest){a=t.TXDataWebConnectionRequest.$create("Create$1",[n,e]);try{a.FRequestProc=function(e){rtl._AddRef(e);try{t.InternalSendRequest(e,r,(function(t){s()}))}finally{rtl._Release(e)}},this.FOnRequest(a),o=a.FAsync}finally{o||(a=rtl.freeLoc(a))}}o||t.InternalSendRequest(e,r,(function(t){s()}))}finally{rtl._Release(e)}},this.SendRequestAsync=async function(t){var e=this,i=null;rtl._AddRef(t);try{i=new Promise((function(i,s){e.SendRequest(t,(function(t){rtl._AddRef(t);try{null!=t&&t._AddRef(),i(t)}finally{rtl._Release(t)}}),(function(){s(pas.SysUtils.Exception.$create("Create$1",["Request error: "+t.GetUri()]))}))}))}finally{rtl._Release(t)}return i},this.Create$1=function(e){return pas.Classes.TComponent.Create$1.call(this,e),this.FDesignData=t.TXDataWebConnectionDesignData.$create("Create$1"),this},this.Destroy=function(){rtl.free(this,"FDesignData"),rtl.free(this,"FModel"),pas.Classes.TComponent.Destroy.call(this)},this.Open=function(t,e){this.GetConnected()||this.DoConnect(t,e)},this.Loaded=function(){pas.Classes.TComponent.Loaded.call(this),this.FStreamedConnected&&this.SetConnected(!0)},rtl.addIntf(this,pas.System.IUnknown);var e=this.$rtti;e.addProperty("URL",2,rtl.string,"FURL","SetURL"),e.addProperty("DesignData",14,t.$rtti.TXDataWebConnectionDesignData,"FDesignData","SetDesignData",4,{stored:"IsDesignDataStored"}),e.addProperty("Connected",3,rtl.boolean,"GetConnected","SetConnected",4,{Default:!1}),e.addProperty("OnConnect",0,pas.Classes.$rtti.TNotifyEvent,"FOnConnect","FOnConnect"),e.addProperty("OnError",0,t.$rtti.TXDataWebConnectionErrorEvent,"FOnError","FOnError"),e.addProperty("OnRequest",0,t.$rtti.TXDataWebConnectionRequestEvent,"FOnRequest","FOnRequest"),e.addProperty("OnResponse",0,t.$rtti.TXDataWebConnectionResponseEvent,"FOnResponse","FOnResponse")})),rtl.createClass(this,"TXDataWebConnectionDesignData",pas.Classes.TPersistent,(function(){this.$init=function(){pas.Classes.TPersistent.$init.call(this),this.FHeaders=null,this.FPersist=!1},this.$final=function(){this.FHeaders=void 0,pas.Classes.TPersistent.$final.call(this)},this.IsStored=function(){return this.FPersist},this.SetHeaders=function(t){this.FHeaders.Assign(t)},this.Create$1=function(){return pas.System.TObject.Create.call(this),this.FHeaders=pas.Classes.TStringList.$create("Create$1"),this},this.Destroy=function(){rtl.free(this,"FHeaders"),pas.System.TObject.Destroy.call(this)},this.Assign=function(e){t.TXDataWebConnectionDesignData.isPrototypeOf(e)?(this.FPersist=e.FPersist,this.SetHeaders(e.FHeaders)):pas.Classes.TPersistent.Assign.call(this,e)};var e=this.$rtti;e.addProperty("Headers",14,pas.Classes.$rtti.TStrings,"FHeaders","SetHeaders",4,{stored:"IsStored"}),e.addProperty("Persist",12,rtl.boolean,"FPersist","FPersist",4,{stored:"IsStored"})})),this.InternalSendRequest=function(t,e,i){var s=null;function n(t){null!=i&&i(t)}var r=[],a=0;rtl._AddRef(t);try{(s=new XMLHttpRequest).open(t.GetMethod(),t.GetUri(),!0),r=t.GetHeaders().GetHeaderNames();for(var o=0,l=rtl.length(r)-1;o<=l;o++)a=o,s.setRequestHeader(r[a],t.GetHeaders().Get(r[a]));s.addEventListener("load",(function(){var t=null;try{t=rtl.setIntfL(t,rtl.queryIntfT(pas["XData.Web.Response"].TXhrHttpResponse.$create("Create$2",[s]),pas["XData.Web.Response"].IHttpResponse),!0),null!=e&&e(t)}finally{rtl._Release(t)}})),s.addEventListener("error",n),s.addEventListener("timeout",n),t.GetTimeout()>0&&(s.timeout=t.GetTimeout()),""!==t.GetResponseType()&&(s.responseType=t.GetResponseType()),pas.JS.isNull(t.GetContent())?s.send():s.send(t.GetContent())}finally{rtl._Release(t)}}}),["Bcl.Utils","XData.Model.Deserializer"]),rtl.module("mpoweb.App.Types",["System","Bcl.Rtti.Common"],(function(){"use strict"})),rtl.module("mpoweb.App.Config",["System","JS","WEBLib.JSON","XData.Web.Connection","XData.Web.Request","XData.Web.Response"],(function(){"use strict";var t=this;rtl.createClass(this,"TAppConfig",pas.System.TObject,(function(){this.$init=function(){pas.System.TObject.$init.call(this),this.FAuthUrl="",this.FApiUrl="",this.FUploadUrl="",this.FDownloadUrl=""},this.Create$1=function(){return this.FAuthUrl="",this.FApiUrl="",this}})),this.LoadConfig=async function(e){var i=null,s=null,n=null,r=null,a=rtl.createIntfRefs();try{try{i=pas["XData.Web.Connection"].TXDataWebConnection.$create("Create$1",[null]);try{if(""!==(s=rtl.setIntfL(s,await i.SendRequestAsync(a.ref(1,rtl.queryIntfT(pas["XData.Web.Request"].THttpRequest.$create("Create$2",["config/config.json"]),pas["XData.Web.Request"].IHttpRequest))))).GetContentAsText()){n=t.TAppConfig.$create("Create$1");try{200===s.GetStatusCode()&&(r=JSON.parse(s.GetContentAsText()),""!==pas.JS.ToString(r.AuthUrl)&&(n.FAuthUrl=pas.JS.ToString(r.AuthUrl)),""!==pas.JS.ToString(r.ApiUrl)&&(n.FApiUrl=pas.JS.ToString(r.ApiUrl)),""!==pas.JS.ToString(r.UploadUrl)&&(n.FUploadUrl=pas.JS.ToString(r.UploadUrl)),""!==pas.JS.ToString(r.DownloadUrl)&&(n.FDownloadUrl=pas.JS.ToString(r.DownloadUrl)))}finally{e(n),n=rtl.freeLoc(n)}}}catch(i){n=t.TAppConfig.$create("Create$1");try{e(n)}finally{n=rtl.freeLoc(n)}}}finally{i=rtl.freeLoc(i)}}finally{a.free(),rtl._Release(s)}}})),rtl.module("XData.Bind.Converter",["System","TypInfo","SysUtils","XData.Model.Classes"],(function(){"use strict";this.BindValueToUrl=function(t,e,i,s){return s.ValueToUrl(t,e)}})),rtl.module("XData.Web.Client",["System","JS","SysUtils","Classes","Types","Bcl.Rtti.Common","Bcl.Json.Common","XData.Model.Classes","XData.Web.Connection","XData.Web.Request","XData.Web.Response"],(function(){"use strict";var t=this;this.$rtti.$Class("TXDataWebClient"),this.TXDataClientRequestType={0:"rtGet",rtGet:0,1:"rtList",rtList:1,2:"rtPut",rtPut:2,3:"rtPost",rtPost:3,4:"rtDelete",rtDelete:4,5:"rtRawInvoke",rtRawInvoke:5},rtl.createClass(this,"TXDataClientResponse",pas.System.TObject,(function(){this.$init=function(){pas.System.TObject.$init.call(this),this.FResponse=null,this.FRequestType=0,this.FResult=void 0,this.FRequestId="",this.FCount=0,this.FClient=null},this.$final=function(){rtl.setIntfP(this,"FResponse",null),this.FClient=void 0,pas.System.TObject.$final.call(this)},this.GetResponseText=function(){return this.FResponse.GetContentAsText()},this.GetStatusCode=function(){return this.FResponse.GetStatusCode()},this.GetResultAsObject=function(){return pas.JS.toObject(this.FResult)},this.Create$1=function(t,e,i,s,n,r){rtl._AddRef(e);try{rtl.setIntfP(this,"FResponse",e),this.FResult=i,this.FRequestType=s,this.FRequestId=n,this.FCount=r,this.FClient=t}finally{rtl._Release(e)}return this}})),rtl.createClass(this,"TXDataClientRequest",pas.System.TObject,(function(){this.$init=function(){pas.System.TObject.$init.call(this),this.FRequest=null,this.FRequestType=0,this.FRequestId="",this.FClient=null},this.$final=function(){rtl.setIntfP(this,"FRequest",null),this.FClient=void 0,pas.System.TObject.$final.call(this)},this.Create$1=function(t,e,i,s){rtl._AddRef(e);try{rtl.setIntfP(this,"FRequest",e),this.FRequestType=i,this.FRequestId=s,this.FClient=t}finally{rtl._Release(e)}return this}})),rtl.createClass(this,"TXDataClientError",pas.System.TObject,(function(){this.$init=function(){pas.System.TObject.$init.call(this),this.FResponse=null,this.FRequestId="",this.FErrorCode="",this.FErrorMessage="",this.FRequestUrl="",this.FClient=null},this.$final=function(){rtl.setIntfP(this,"FResponse",null),this.FClient=void 0,pas.System.TObject.$final.call(this)},this.GetStatusCode=function(){return this.FResponse.GetStatusCode()},this.Create$1=function(t,e,i,s,n,r){rtl._AddRef(e);try{rtl.setIntfP(this,"FResponse",e),this.FErrorCode=s,this.FErrorMessage=n,this.FRequestId=r,this.FRequestUrl=i,this.FClient=t}finally{rtl._Release(e)}return this}})),this.$rtti.$MethodVar("TXDataClientLoadEvent",{procsig:rtl.newTIProcSig([["Response",this.$rtti.TXDataClientResponse]]),methodkind:0}),this.$rtti.$MethodVar("TXDataClientErrorEvent",{procsig:rtl.newTIProcSig([["error",this.$rtti.TXDataClientError]]),methodkind:0}),this.$rtti.$MethodVar("TXDataClientRequestEvent",{procsig:rtl.newTIProcSig([["Request",this.$rtti.TXDataClientRequest]]),methodkind:0}),this.TReferenceSolvingMode={0:"rsAll",rsAll:0,1:"rsNone",rsNone:1},this.$rtti.$Enum("TReferenceSolvingMode",{minvalue:0,maxvalue:1,ordtype:1,enumtype:this.TReferenceSolvingMode}),rtl.createClass(this,"TXDataWebClient",pas.Classes.TComponent,(function(){this.$init=function(){pas.Classes.TComponent.$init.call(this),this.FOnLoad=null,this.FOnError=null,this.FOnRequest=null,this.FConnection=null,this.FReferenceSolvingMode=0},this.$final=function(){this.FOnLoad=void 0,this.FOnError=void 0,this.FOnRequest=void 0,this.FConnection=void 0,pas.Classes.TComponent.$final.call(this)},this.SetConnection=function(t){t!==this.FConnection&&(null!==this.FConnection&&this.FConnection.RemoveFreeNotification(this),this.FConnection=t,null!==this.FConnection&&this.FConnection.FreeNotification(this))},this.Model=function(){if(this.CheckConnection(),null==this.FConnection.FModel)throw t.EXDataClientException.$create("Create$1",["TXDataWebConnection is not connected"]);return this.FConnection.FModel},this.Url=function(){return this.CheckConnection(),this.FConnection.FURL},this.CheckConnection=function(){if(null==this.FConnection)throw t.EXDataClientException.$create("Create$1",["Missing XData Connection"])},this.ParseError=function(t,e,i){var s=void 0,n=null;rtl._AddRef(t);try{if(e.set(""),i.set(t.GetStatusReason()),pas.SysUtils.SameText(t.GetHeaders().Get("content-type"),"application/json")){s=null;try{s=JSON.parse(t.GetContentAsText())}catch(t){}rtl.isObject(s)&&rtl.isObject(s.error)&&(n=s.error,e.set(pas.JS.ToString(n.code)),i.set(pas.JS.ToString(n.message)))}}finally{rtl._Release(t)}},this.SolveReferences=function(t){var e={},i=[];t=function t(s,n,r){if("object"!=typeof s||!s)return s;if("[object Array]"===Object.prototype.toString.call(s)){for(var a=0;a<s.length;a++){if("object"!=typeof s[a]||!s[a])continue;"$ref"in s[a]?s[a]=t(s[a],a,s):s[a]=t(s[a],n,s)}return s}if("$ref"in s){var o=s.$ref;return o in e?e[o]:void i.push([r,n,o])}if("$id"in s){var l=s.$id;if(delete s.$id,"$values"in s)s=s.$values.map(t);else for(var h in s)s[h]=t(s[h],h,s);e[l]=s}return s}(t);for(var s=0;s<i.length;s++){var n=i[s];n[0][n[1]]=e[n[2]]}},this.DoLoad=function(t,e,i){try{if(0===this.FReferenceSolvingMode&&this.SolveReferences(t.FResult),i)null!=this.FOnLoad&&this.FOnLoad(t),null!=e&&e(t);else{if(null!=e)return void e(t);null!=this.FOnLoad&&this.FOnLoad(t)}}finally{i||(t=rtl.freeLoc(t))}},this.DoError=function(e,i,s,n,r,a){var o="",l=null;rtl._AddRef(e);try{if(null===e&&(e=rtl.setIntfL(e,rtl.queryIntfT(pas["XData.Web.Response"].TDummyHttpResponse.$create("Create$1"),pas["XData.Web.Response"].IHttpResponse),!0)),o="",""===n&&this.ParseError(e,{get:function(){return o},set:function(t){o=t}},{get:function(){return n},set:function(t){n=t}}),l=t.TXDataClientError.$create("Create$1",[this,e,i,o,n,s]),a){if(null!=this.FOnError&&this.FOnError(l),null==r)throw t.EXDataClientRequestException.$create("Create$2",[l]);r(l)}else{if(null!=r)return void r(l);if(null==this.FOnError)throw t.EXDataClientRequestException.$create("Create$2",[l]);this.FOnError(l)}}finally{rtl._Release(e)}},this.RequestUrl=function(t){return pas["XData.Utils"].TXDataUtils.CombineUrlFast(this.Url(),t)},this.InternalRawInvoke=function(e,i,s,n,r,a,o){var l,h=null;if(""===n&&(n=e),null===(l=this.Model().FindActionByOperationId(e)))throw t.EXDataClientException.$create("CreateFmt",['Operation "%s" not found',pas.System.VarRecs(18,e)]);(h=t.TXDataWebInvoker.$create("Create$1",[this,l,r,a,o])).FRequestId=n,h.Execute(i,s)},this.DoRequest=function(t){try{null!=this.FOnRequest&&this.FOnRequest(t)}finally{t=rtl.freeLoc(t)}},this.Send=function(t,e,i){rtl._AddRef(t);try{this.FConnection.SendRequest(t,e,i)}finally{rtl._Release(t)}},this.Notification=function(t,e){pas.Classes.TComponent.Notification.apply(this,arguments),1===e&&t===this.FConnection&&this.SetConnection(null)},this.RawInvoke$2=function(t,e,i,s){this.InternalRawInvoke(t,e,"","",i,s,!1)},this.RawInvokeAsync=async function(e,i){var s=this;return new Promise((function(n,r){s.InternalRawInvoke(e,i,"","",(function(t){n(t)}),(function(e){r(t.EXDataClientRequestException.$create("Create$2",[e]))}),!0)}))},rtl.addIntf(this,pas.System.IUnknown);var e=this.$rtti;e.addProperty("Connection",2,pas["XData.Web.Connection"].$rtti.TXDataWebConnection,"FConnection","SetConnection"),e.addProperty("OnLoad",0,t.$rtti.TXDataClientLoadEvent,"FOnLoad","FOnLoad"),e.addProperty("OnError",0,t.$rtti.TXDataClientErrorEvent,"FOnError","FOnError"),e.addProperty("OnRequest",0,t.$rtti.TXDataClientRequestEvent,"FOnRequest","FOnRequest"),e.addProperty("ReferenceSolvingMode",0,t.$rtti.TReferenceSolvingMode,"FReferenceSolvingMode","FReferenceSolvingMode",4,{Default:t.TReferenceSolvingMode.rsAll})})),rtl.createClass(this,"TXDataWebInvoker",pas.System.TObject,(function(){this.$init=function(){pas.System.TObject.$init.call(this),this.FClient=null,this.FAction=null,this.FRequestId="",this.FSuccessProc=null,this.FErrorProc=null,this.FAsyncMode=!1},this.$final=function(){this.FClient=void 0,this.FAction=void 0,this.FSuccessProc=void 0,this.FErrorProc=void 0,pas.System.TObject.$final.call(this)},this.DoLoad=function(t){this.FClient.DoLoad(t,this.FSuccessProc,this.FAsyncMode)},this.DoError=function(t,e,i,s){rtl._AddRef(t);try{this.FClient.DoError(t,e,i,s,this.FErrorProc,this.FAsyncMode)}finally{rtl._Release(t)}},this.CreateHttpRequest=function(){var t=null,e=!1;try{t=rtl.setIntfL(t,rtl.queryIntfT(pas["XData.Web.Request"].THttpRequest.$create("Create$1"),pas["XData.Web.Request"].IHttpRequest),!0),e=!0}finally{e||rtl._Release(t)}return t},this.RequestUrl=function(t){return this.FClient.RequestUrl(t)},this.BuildQueryString=function(t,e,i){var s="";function n(t,e){""!==s&&(s+="&"),s=s+pas["Bcl.Utils"].TBclUtils.PercentEncode(t)+"="+pas["Bcl.Utils"].TBclUtils.PercentEncode(e)}function r(t,e){var i=0,s=null,r=void 0;if(null!==t)for(var a=0,o=e.ScalarPropertyCount()-1;a<=o;a++)i=a,r=t[(s=e.GetScalarProperty(i)).FName],pas.JS.isUndefined(r)||n(s.FName,pas["XData.Bind.Converter"].BindValueToUrl(r,s.FName,null,s.GetUrlConverter()))}var a=0,o=null;s=i;for(var l=0,h=this.FAction.FParameters.GetCount()-1;l<=h;l++)a=l,this.FAction.FParameters.GetItem$1(a).FBindingMode===e&&(o=this.FAction.FParameters.GetItem$1(a)).FInput&&a<=rtl.length(t)&&(pas["XData.Model.Classes"].TXDataStructuredType.isPrototypeOf(o.FType)?r(pas.JS.toObject(t[a]),o.FType):n(o.FName,pas["XData.Bind.Converter"].BindValueToUrl(t[a],o.FName,null,o.GetUrlConverter())));return s},this.GetPathParamValues=function(t){var e=[],i=0,s=null,n=0;n=0,e=rtl.arraySetLength(e,"",this.FAction.FParameters.GetCount());for(var r=0,a=this.FAction.FParameters.GetCount()-1;r<=a;r++)i=r,2===this.FAction.FParameters.GetItem$1(i).FBindingMode&&(s=this.FAction.FParameters.GetItem$1(i)).FInput&&i<=rtl.length(t)&&(e[n]=pas["Bcl.Utils"].TBclUtils.PercentEncode(pas["XData.Bind.Converter"].BindValueToUrl(t[i],s.FName,null,s.GetUrlConverter())),n+=1);return e=rtl.arrayCopy(0,e,0,n)},this.BuildUrlRoute=function(e){var i=this,s="",n=[],r=[];var a=0;n=this.GetPathParamValues(e),r=rtl.arraySetLength(r,!1,rtl.length(n)),s="",function(e){for(var a=0,o=0,l=e.GetSegmentCount()-1;o<=l;o++){if(a=o,e.GetSegment(a).FIsParam){if(!(e.GetSegment(a).FParamIndex<rtl.length(n)))throw t.EXDataWrongRouteParams.$create("Create$2",[i.FAction]);s+=n[e.GetSegment(a).FParamIndex],r[e.GetSegment(a).FParamIndex]=!0}else s+=e.GetSegment(a).FValue;s+="/"}}(this.FAction.FRouteInfo);for(var o=0,l=rtl.length(r)-1;o<=l;o++)r[a=o]||(s=s+n[a]+"/");return s},this.SetParamStreamBody=function(e,i,s){rtl._AddRef(e);try{if(s>=rtl.length(i))throw t.EXDataWrongParameterCount.$create("Create$2",[this.FAction,s+1]);e.SetContent(i[s])}finally{rtl._Release(e)}},this.SetJsonParamsBody=function(t,e){var i=0,s=null,n=null,r=void 0;rtl._AddRef(t);try{n=new Object;for(var a=0,o=this.FAction.FParameters.GetCount()-1;a<=o;a++)i=a,0===this.FAction.FParameters.GetItem$1(i).FBindingMode&&(s=this.FAction.FParameters.GetItem$1(i)).FInput&&i<rtl.length(e)&&(r=e[i],this.TransformParam(s,{get:function(){return r},set:function(t){r=t}}),n[s.FName]=r);t.SetContent(JSON.stringify(n))}finally{rtl._Release(t)}},this.SetJsonObjectBody=function(e,i){var s=0;rtl._AddRef(e);try{if(s=this.FAction.GetBodyParam(0).Index(),rtl.length(i)<=s)throw t.EXDataWrongParameterCount.$create("Create$2",[this.FAction,s+1]);e.SetContent(JSON.stringify(i[s]))}finally{rtl._Release(e)}},this.SetFormBody=function(t,e){rtl._AddRef(t);try{t.SetContent(this.BuildQueryString(e,0,""))}finally{rtl._Release(t)}},this.TransformParam=function(t,e){},this.Create$1=function(t,e,i,s,n){return this.FClient=t,this.FAction=e,this.FSuccessProc=i,this.FErrorProc=s,this.FAsyncMode=n,this},this.Execute=function(e,i){var s=this,n="";var r=null,a="",o=0;try{r=rtl.setIntfL(r,this.CreateHttpRequest(),!0),a=this.BuildQueryString(e,1,i),n=this.BuildUrlRoute(e),""!==a&&(n=n+"?"+a),n=s.RequestUrl(n),r.SetUri(n),r.SetMethod(this.FAction.FHttpMethod),this.FAction.FIsResultStream&&r.SetResponseType("blob"),this.FAction.FIsParamStream?this.SetParamStreamBody(r,e,this.FAction.ParamStreamIndex()):this.FAction.BodyParamCount()>0&&(this.FAction.IsFormContent()?this.SetFormBody(r,e):(o=this.FAction.GetBodyParam(0).Index(),1===this.FAction.BodyParamCount()&&rtl.length(e)>o&&rtl.isObject(e[o])?this.SetJsonObjectBody(r,e):this.SetJsonParamsBody(r,e)),""!==this.FAction.FConsumes?r.GetHeaders().SetValue("content-type",this.FAction.FConsumes):r.GetHeaders().SetValue("content-type","application/json")),this.FClient.DoRequest(t.TXDataClientRequest.$create("Create$1",[this.FClient,r,5,this.FRequestId])),this.FClient.Send(r,(function(e){var i=void 0,r=void 0;rtl._AddRef(e);try{if(200!==e.GetStatusCode()&&204!==e.GetStatusCode()&&404!==e.GetStatusCode())return void s.DoError(e,n,s.FRequestId,"");s.FAction.FIsResultStream?404===e.GetStatusCode()?s.DoError(e,n,s.FRequestId,""):(i=e.GetContent(),s.DoLoad(t.TXDataClientResponse.$create("Create$1",[s.FClient,e,i,5,s.FRequestId,0]))):s.FAction.FIsResultCriteria?s.DoError(e,n,s.FRequestId,"TCriteria result yet not supported in TXDataClient"):(r=204!==e.GetStatusCode()?JSON.parse(e.GetContentAsText()):null,s.DoLoad(t.TXDataClientResponse.$create("Create$1",[s.FClient,e,r,5,s.FRequestId,0])))}finally{rtl._Release(e)}}),(function(){s.DoError(null,n,s.FRequestId,"")}))}finally{rtl._Release(r)}}})),rtl.createClass(this,"EXDataClientException",pas.SysUtils.Exception,(function(){})),rtl.createClass(this,"EXDataClientRequestException",this.EXDataClientException,(function(){this.$init=function(){t.EXDataClientException.$init.call(this),this.FErrorResult=null},this.$final=function(){this.FErrorResult=void 0,t.EXDataClientException.$final.call(this)},this.Create$2=function(t){var e="";return this.FErrorResult=t,e=(e="XData server request error."+pas.System.sLineBreak+"Uri: "+t.FRequestUrl)+pas.System.sLineBreak+"Status code: "+pas.SysUtils.IntToStr(t.GetStatusCode()),""!==t.FErrorCode&&(e=e+pas.System.sLineBreak+"Error Code: "+t.FErrorCode),""!==t.FErrorMessage&&(e=e+pas.System.sLineBreak+t.FErrorMessage),pas.SysUtils.Exception.Create$1.call(this,e),this}})),rtl.createClass(this,"EXDataWrongParameterCount",this.EXDataClientException,(function(){this.Create$2=function(t,e){return pas.SysUtils.Exception.CreateFmt.call(this,'Incorrect parameter count for Operation "%s". Expected at least: %d, actual: %d',pas.System.VarRecs(18,t.FOperationId,0,t.FParameters.GetCount(),0,e)),this}})),rtl.createClass(this,"EXDataWrongRouteParams",this.EXDataClientException,(function(){this.Create$2=function(t){return pas.SysUtils.Exception.CreateFmt.call(this,'Invalid number of route params for Operation "%s". Route params: %d, Path params: %d',pas.System.VarRecs(18,t.FOperationId,0,t.FRouteInfo.FParamCount,0,t.PathParamCount())),this}}))}),["Bcl.Utils","XData.Bind.Converter","XData.Utils"]),rtl.module("mpowep.model.webclient.root",["System","SysUtils","Classes","DateUtils","JS","Web","XData.Web.Connection","XData.Web.Client","WEBLib.Storage","WEBLib.REST","WEBLib.JSON"],(function(){"use strict";rtl.createClass(this,"TClientRoot",pas.System.TObject,(function(){this.$init=function(){pas.System.TObject.$init.call(this),this.FClient=null,this.ActionLog=null,this.ActionLogCurrent=null,this.LogVisible=!1,this.App_LogDateTimeFormat="",this.App_DisplayDateTimeFormat="",this.App_LogDateFormat="",this.App_DisplayDateFormat="",this.App_LogTimeFormat="",this.App_DisplayTimeFormat=""},this.$final=function(){this.FClient=void 0,this.ActionLog=void 0,this.ActionLogCurrent=void 0,pas.System.TObject.$final.call(this)},this.Create$1=function(){return pas.System.TObject.Create.call(this),this.ActionLog=pas.Classes.TStringList.$create("Create$1"),this.ActionLogCurrent=pas.Classes.TStringList.$create("Create$1"),this.FClient=pas["XData.Web.Client"].TXDataWebClient.$create("Create$1",[null]),this.FClient.SetConnection(pas["mpoweb.ConnectionModule"].DMConnection.AuthConnection),this.App_LogDateTimeFormat="yyyy-MM-dd HH:nn:ss.zzz",this.App_DisplayDateTimeFormat="yyyy-MMM-dd HH:nn",this.App_LogDateFormat="yyyy-MM-dd",this.App_DisplayDateFormat="yyyy-MMM-dd",this.App_LogTimeFormat="HH:nn:ss.zzz",this.App_DisplayTimeFormat="HH:nn:ss",this.LogVisible=!1,this},this.Destroy=function(){rtl.free(this,"ActionLog"),rtl.free(this,"ActionLogCurrent"),pas.System.TObject.Destroy.call(this)}}))}),["mpoweb.ConnectionModule"]),rtl.module("mpoweb.Auth.Service",["System","SysUtils","Classes","Web","JS","WEBLib.JSON","XData.Web.Client","mpowep.model.webclient.root"],(function(){"use strict";var t=this,e=t.$impl;this.TOKEN_NAME="GBWMPO_TOKEN",rtl.createClass(this,"TAuthService",pas["mpowep.model.webclient.root"].TClientRoot,(function(){this.$init=function(){pas["mpowep.model.webclient.root"].TClientRoot.$init.call(this),this.FClient$1=null,this.FLoginNewResult="",this.FLoginPWResult=""},this.$final=function(){this.FClient$1=void 0,pas["mpowep.model.webclient.root"].TClientRoot.$final.call(this)},this.SetToken=function(e){window.localStorage.setItem(t.TOKEN_NAME,e)},this.DeleteToken=function(){window.localStorage.removeItem(t.TOKEN_NAME)},this.Create$2=function(){return pas["mpowep.model.webclient.root"].TClientRoot.Create$1.call(this),this.FClient$1=pas["XData.Web.Client"].TXDataWebClient.$create("Create$1",[null]),this.FClient$1.SetConnection(pas["mpoweb.ConnectionModule"].DMConnection.AuthConnection),this},this.Destroy=function(){rtl.free(this,"FClient$1"),pas["mpowep.model.webclient.root"].TClientRoot.Destroy.call(this)},this.Login=async function(t,e,i,s){var n=null;if(""!==t&&""!==e)try{n=(await this.FClient$1.RawInvokeAsync("ILoginService.Login",[t,e])).GetResultAsObject(),this.SetToken(pas.JS.ToString(n.value)),i()}catch(t){if(!pas.SysUtils.Exception.isPrototypeOf(t))throw t;var r=t;s(pas.SysUtils.Format("%s: %s",pas.System.VarRecs(18,r.$classname,18,r.FMessage)))}else s("Enter the username and password!")},this.LoginNew=function(t,e,i,s,n){var r=this;""!==t&&""!==e&&""!==i?this.FClient$1.RawInvoke$2("ILoginService.LoginNew",[t,e,i],(function(t){r.FLoginNewResult=""+t.FResult.value,s()}),(function(t){n(pas.SysUtils.Format("%s: %s",pas.System.VarRecs(18,t.FErrorCode,18,t.FErrorMessage)))})):n("Bitte die Eingaben pru&uml;fen!")},this.LoginPW=function(t,e,i,s){var n=this;""!==t&&""!==e?this.FClient$1.RawInvoke$2("ILoginService.LoginPW",[t,e],(function(t){n.FLoginPWResult=""+t.FResult.value,i()}),(function(t){s(pas.SysUtils.Format("%s: %s",pas.System.VarRecs(18,t.FErrorCode,18,t.FErrorMessage)))})):s("Bitte die Eingaben pru&uml;fen!")},this.Logout=function(){this.DeleteToken()},this.GetToken=function(){return window.localStorage.getItem(t.TOKEN_NAME)},this.Authenticated=function(){return!pas.JS.isNull(window.localStorage.getItem(t.TOKEN_NAME))&&""!==window.localStorage.getItem(t.TOKEN_NAME)},this.TokenExpired=function(){return!!this.Authenticated()&&t.TJwtHelper.TokenExpired(this.GetToken())},this.TokenPayload=function(){return this.Authenticated()?JSON.parse(t.TJwtHelper.DecodePayload(this.GetToken())):null},this.GetLoginNewResult=function(){return this.FLoginNewResult},this.GetLoginPWResult=function(){return this.FLoginPWResult}})),rtl.createClass(this,"TJwtHelper",pas.System.TObject,(function(){this.HasExpirationDate=function(t){var e;return e=this.DecodePayload(t),JSON.parse(e).hasOwnProperty("exp")},this.TokenExpirationDate=function(t){var e,i,s;if(!this.HasExpirationDate(t))throw pas.SysUtils.Exception.$create("Create$1",["Token has not expiration date"]);return e=this.DecodePayload(t),i=JSON.parse(e),s=pas.JS.toInteger(i.exp),new Date(1e3*s)},this.TokenExpired=function(t){return!!this.HasExpirationDate(t)&&Date.now()>pas.JS.toInteger(this.TokenExpirationDate(t).valueOf())},this.DecodePayload=function(t){var e="";if(""===pas.SysUtils.Trim(t))return"";e="";var i=t.split(".");return(i.length=3)&&(e=i[1],e=atob(e)),e}})),this.AuthService=function(){return null==e._AuthService&&(e._AuthService=t.TAuthService.$create("Create$2")),e._AuthService},t.$implcode=function(){e._AuthService=null}}),["mpoweb.ConnectionModule"]),rtl.module("WEBLib.StdCtrls",["System","Classes","WEBLib.Controls","SysUtils","Web","WEBLib.Graphics","Types","WEBLib.WebTools","WEBLib.Forms","WEBLib.Menus"],(function(){"use strict";var t=this;this.TEditCharCase={0:"wecLowerCase",wecLowerCase:0,1:"wecNormal",wecNormal:1,2:"wecMixedCase",wecMixedCase:2,3:"wecUpperCase",wecUpperCase:3},this.$rtti.$Enum("TEditCharCase",{minvalue:0,maxvalue:3,ordtype:1,enumtype:this.TEditCharCase}),this.TCheckBoxState={0:"cbChecked",cbChecked:0,1:"cbGrayed",cbGrayed:1,2:"cbUnchecked",cbUnchecked:2},this.$rtti.$Enum("TCheckBoxState",{minvalue:0,maxvalue:2,ordtype:1,enumtype:this.TCheckBoxState}),this.TEllipsisPosition={0:"epEndEllipsis",epEndEllipsis:0,1:"epNone",epNone:1,2:"epPathEllipsis",epPathEllipsis:2,3:"epWordEllipsis",epWordEllipsis:3},this.$rtti.$Enum("TEllipsisPosition",{minvalue:0,maxvalue:3,ordtype:1,enumtype:this.TEllipsisPosition}),this.TTextLayout={0:"tlTop",tlTop:0,1:"tlCenter",tlCenter:1,2:"tlBottom",tlBottom:2},this.$rtti.$Enum("TTextLayout",{minvalue:0,maxvalue:2,ordtype:1,enumtype:this.TTextLayout}),this.TSysLinkType={0:"sltID",sltID:0,1:"sltURL",sltURL:1},this.$rtti.$Enum("TSysLinkType",{minvalue:0,maxvalue:1,ordtype:1,enumtype:this.TSysLinkType}),this.TAutoCompletion={0:"acOff",acOff:0,1:"acHonorificPrefix",acHonorificPrefix:1,2:"acGivenName",acGivenName:2,3:"acAdditionalName",acAdditionalName:3,4:"acFamilyName",acFamilyName:4,5:"acHonorificSuffix",acHonorificSuffix:5,6:"acNickName",acNickName:6,7:"acEmail",acEmail:7,8:"acUserName",acUserName:8,9:"acNewPassword",acNewPassword:9,10:"acCurrentPassword",acCurrentPassword:10,11:"acOrganizationTitle",acOrganizationTitle:11,12:"acOrganization",acOrganization:12,13:"acStreetAddress",acStreetAddress:13,14:"acAddressLine1",acAddressLine1:14,15:"acAddressLine2",acAddressLine2:15,16:"acAddressLine3",acAddressLine3:16,17:"acAddressLevel1",acAddressLevel1:17,18:"acAddressLevel2",acAddressLevel2:18,19:"acAddressLevel3",acAddressLevel3:19,20:"acAddressLevel4",acAddressLevel4:20,21:"acCountry",acCountry:21,22:"acCountryName",acCountryName:22,23:"acPostalCode",acPostalCode:23,24:"acCCName",acCCName:24,25:"acCCGivenName",acCCGivenName:25,26:"acCCAdditionalName",acCCAdditionalName:26,27:"acCCFamilyName",acCCFamilyName:27,28:"acCCNumber",acCCNumber:28,29:"acExpiry",acExpiry:29,30:"acExpiryMonth",acExpiryMonth:30,31:"acExpiryYear",acExpiryYear:31,32:"acCSC",acCSC:32,33:"acType",acType:33,34:"acTransactionCurrency",acTransactionCurrency:34,35:"acTransactionAmount",acTransactionAmount:35,36:"acLanguage",acLanguage:36,37:"acBirthday",acBirthday:37,38:"acBirthdayDay",acBirthdayDay:38,39:"acBirthDayMonth",acBirthDayMonth:39,40:"acBirthDayYear",acBirthDayYear:40,41:"acSex",acSex:41,42:"acTelephone",acTelephone:42,43:"acTelephoneCountryCode",acTelephoneCountryCode:43,44:"acTelephoneNational",acTelephoneNational:44,45:"acTelephoneAreaCode",acTelephoneAreaCode:45,46:"acTelephoneLocal",acTelephoneLocal:46,47:"acTelephoneExtension",acTelephoneExtension:47,48:"acIMPP",acIMPP:48,49:"acURL",acURL:49,50:"acPhoto",acPhoto:50,51:"acNone",acNone:51,52:"acNope",acNope:52},this.$rtti.$Enum("TAutoCompletion",{minvalue:0,maxvalue:52,ordtype:1,enumtype:this.TAutoCompletion}),this.TEditType={0:"weString",weString:0,1:"weFloat",weFloat:1,2:"weHex",weHex:2,3:"weNumeric",weNumeric:3,4:"weSignedFloat",weSignedFloat:4,5:"weSignedNumeric",weSignedNumeric:5,6:"weSearch",weSearch:6},this.$rtti.$Enum("TEditType",{minvalue:0,maxvalue:6,ordtype:1,enumtype:this.TEditType}),this.THTMLType={0:"tLABELTAG",tLABELTAG:0,1:"tSPAN",tSPAN:1,2:"tDIV",tDIV:2,3:"tH1",tH1:3,4:"tH2",tH2:4,5:"tH3",tH3:5,6:"tH4",tH4:6,7:"tH5",tH5:7,8:"tH6",tH6:8,9:"tP",tP:9},this.$rtti.$Enum("THTMLType",{minvalue:0,maxvalue:9,ordtype:1,enumtype:this.THTMLType}),this.$rtti.$MethodVar("TLinkClickEvent",{procsig:rtl.newTIProcSig([["Sender",pas.System.$rtti.TObject],["Link",rtl.string],["LinkType",this.$rtti.TSysLinkType]]),methodkind:0}),rtl.createClass(this,"TCustomLabel",pas["WEBLib.Menus"].TWebCustomControl,(function(){this.$init=function(){pas["WEBLib.Menus"].TWebCustomControl.$init.call(this),this.FContent=null,this.FAutoSize=!1,this.FEllipsisPosition=0,this.FWordWrap=!1,this.FAlignment=0,this.FLayout=0,this.FTransparent=!1,this.FHTMLType=0,this.FFocusControl=null,this.FShowAccelChar=!1,this.FColor$1=0,this.FHasAccel=!1,this.FHasHTML=!1,this.FElementLabelClassName="",this.FOrigWidth=0,this.FOldWidth=0,this.FOldHeight=0,this.FHTML=""},this.$final=function(){this.FContent=void 0,this.FFocusControl=void 0,pas["WEBLib.Menus"].TWebCustomControl.$final.call(this)},this.SetLayout=function(t){this.FLayout!==t&&(this.FLayout=t,this.UpdateElementVisual())},this.SetAlignment=function(t){this.FAlignment!==t&&(this.FAlignment=t,this.UpdateElementVisual())},this.GetContentHandle=function(){return this.FContent},this.SetTransparent=function(t){this.FTransparent!==t&&(this.FTransparent=t,this.UpdateElementVisual())},this.SetHTMLType=function(t){var e=null;this.FHTMLType!==t&&(this.FHTMLType=t,this.FHTMLType in rtl.createSet(null,3,8)&&this.SetElementFont(1),null!=this.GetElementHandle()&&null!=this.FContent&&null!=(e=this.GetElementHandle().firstChild)&&"lbl"===e.getAttribute("data-lbl")&&(this.GetElementHandle().removeChild(this.FContent),this.FContent=this.CreateLabelElement(),this.GetElementHandle().appendChild(this.FContent),this.UpdateElement()))},this.SetColorEx=function(t){this.FColor$1=t,4 in this.FComponentState&&16777215!==this.FColor$1&&this.SetTransparent(!1),this.UpdateElement()},this.SetElementLabelClassName=function(t){this.FElementLabelClassName!==t&&(this.FElementLabelClassName=t,this.UpdateElement())},this.SetHTML=function(t){this.FHTML!==t&&(this.FHTML=t,this.UpdateElementData())},this.SetWidth=function(t){-1!==t&&0 in this.FComponentState&&(this.FOrigWidth=t),pas["WEBLib.Controls"].TControl.SetWidth.apply(this,arguments)},this.CreateElement=function(){var t=null;return t=document.createElement("DIV"),this.FContent=this.CreateLabelElement(),t.appendChild(this.FContent),t},this.CreateLabelElement=function(){var t=null;t=null;var e=this.FHTMLType;return 1===e?t=document.createElement("SPAN"):2===e?t=document.createElement("DIV"):3===e?t=document.createElement("H1"):4===e?t=document.createElement("H2"):5===e?t=document.createElement("H3"):6===e?t=document.createElement("H4"):7===e?t=document.createElement("H5"):8===e?t=document.createElement("H6"):0===e?t=document.createElement("LABEL"):9===e&&(t=document.createElement("P")),t.setAttribute("data-lbl","lbl"),t},this.GetDisplayText=function(){return this.FCaption},this.CanShowFocus=function(){return!1,!1},this.SetParent=function(t){pas["WEBLib.Controls"].TControl.SetParent.apply(this,arguments),this.FAutoSize&&0!==this.FAlignment&&-1!==this.FOrigWidth&&(this.SetLeft(this.GetLeft()+this.FOrigWidth-this.GetWidth()),this.FOrigWidth=-1)},this.BindElement=function(){this.FContent=this.GetContainer().firstElementChild},this.Loaded=function(){pas["WEBLib.Controls"].TCustomControl.Loaded.call(this),this.FShowAccelChar&&null!=this.FFocusControl&&this.UpdateElementData()},this.UpdateAutoSize=function(){this.FAutoSize&&0===this.FAlign&&(null!=this.GetElementHandle()&&pas["WEBLib.WebTools"].ElementVisible(this.GetElementHandle())&&(this.SetWidth(-1),this.SetHeight(-1)),this.FEllipsisPosition=1)},this.UpdateElementData=function(){var t="",e="",i=!1,s=null;pas["WEBLib.Controls"].TControl.UpdateElementData.call(this),e="",t=this.GetDisplayText(),t=this.FShowAccelChar&&pas.System.Pos("&",t)>0?pas["WEBLib.WebTools"].ProcessAccelerator(t,{get:function(){return e},set:function(t){e=t}}):""===this.FHTML?pas["WEBLib.WebTools"].HTMLToString(t):this.FHTML,i=!1,pas.System.Pos("\r",t)>0?(i=!0,pas.System.Pos("\n",t)>0&&(t=pas.SysUtils.StringReplace(t,"\n","",rtl.createSet(0,1))),t=pas.SysUtils.StringReplace(t,"\r","<BR>",rtl.createSet(0,1))):pas.System.Pos("\n",t)>0&&(i=!0,t=pas.SysUtils.StringReplace(t,"\n","<BR>",rtl.createSet(0,1))),this.GetIsLinked()&&""===t&&0 in this.FComponentState||(null!=this.GetContentHandle()?this.GetIsLinked()?(s=this.GetContentHandle(),""!==this.GetID()&&(s=document.getElementById(this.GetID())),null!=s&&(pas.System.Assigned(this.GetContentHandle().nodeValue)?s.nodeValue=t:0===s.childElementCount&&(s.innerHTML=t))):this.GetContentHandle().childElementCount>0&&pas.System.Assigned(this.GetContentHandle().nodeValue)&&!this.FHasAccel&&!this.FHasHTML&&!i?this.GetContentHandle().nodeValue=t:this.GetContentHandle().innerHTML=t:this.GetElementHandle().innerHTML=t,this.FHasHTML=pas.System.Pos("</",t)>0,this.FHasAccel=""!==e,""!==e&&null!=this.FFocusControl&&(this.GetContentHandle().setAttribute("accesskey",e),this.GetContentHandle().setAttribute("for",this.FFocusControl.GetID())))},this.UpdateElementVisual=function(){var t=0,e=0;if(pas["WEBLib.Controls"].TCustomControl.UpdateElementVisual.call(this),!this.IsUpdating()&&(null!=this.GetElementHandle()&&(e=Math.round(this.GetElementHandle().offsetHeight),t=Math.round(this.GetElementHandle().offsetWidth),e>0&&(this.FOldHeight=e),t>0&&(this.FOldWidth=t),!this.FVisible||this.FAutoSize&&0===this.FAlign||0===this.FAlignment&&0===this.FLayout||this.GetElementHandle().style.setProperty("display","table"),this.GetElementHandle().setAttribute("zindex","1"),this.FAutoSize&&0===this.FAlign&&!(4 in this.FComponentState)?this.GetElementHandle().style.setProperty("overflow",""):this.GetElementHandle().style.setProperty("overflow","hidden")),null!=this.GetContentHandle())){var i=this.FLayout;0===i?this.GetContentHandle().style.setProperty("vertical-align","top"):1===i?this.GetContentHandle().style.setProperty("vertical-align","middle"):2===i&&this.GetContentHandle().style.setProperty("vertical-align","bottom");var s=this.FAlignment;0===s?this.GetContentHandle().style.removeProperty("text-align"):2===s?this.GetContentHandle().style.setProperty("text-align","center"):1===s&&this.GetContentHandle().style.setProperty("text-align","right"),pas["WEBLib.Controls"].SetHTMLElementColor(this.GetElementHandle(),this.FColor$1,this.FTransparent||-1===this.FColor$1||16711422===this.FColor$1),pas["WEBLib.Controls"].SetHTMLElementColor(this.GetContentHandle(),this.FColor$1,this.FTransparent||-1===this.FColor$1||16711422===this.FColor$1),this.GetContentHandle().style.setProperty("display","table-cell"),""===this.FElementClassName?(this.FEnabled&&0===this.FElementFont&&!this.GetIsLinked()?this.GetContentHandle().style.setProperty("color",pas["WEBLib.Graphics"].ColorToHTML(this.FFont.FColor)):this.GetContentHandle().style.removeProperty("color"),this.SetElementPointer(this.GetContentHandle(),this.FCursor),pas["WEBLib.Controls"].SetHTMLElementFont(this.GetContentHandle(),this.FFont,!(0===this.FElementFont&&!this.GetIsLinked()))):(this.GetContentHandle().style.removeProperty("color"),pas["WEBLib.Controls"].SetHTMLElementFont(this.GetContentHandle(),this.FFont,!0)),""!==this.FElementLabelClassName?this.GetContentHandle().setAttribute("class",this.FElementLabelClassName):this.GetContentHandle().removeAttribute("class"),0===this.FElementPosition||1===this.FWidthStyle?1===this.FEllipsisPosition?this.GetContentHandle().style.setProperty("text-overflow","clip"):this.GetContentHandle().style.setProperty("text-overflow","ellipsis"):this.GetContentHandle().style.removeProperty("text-overflow"),this.FWordWrap?this.GetContentHandle().style.setProperty("white-space","normal"):this.GetContentHandle().style.setProperty("white-space","nowrap"),this.GetElementHandle().style.setProperty("user-select",""),0===this.FCursor&&this.GetElementHandle().style.setProperty("cursor",""),this.FAutoSize&&0===this.FAlign&&!(4 in this.FComponentState)&&(this.GetElementHandle().style.removeProperty("width"),this.GetElementHandle().style.removeProperty("height"))}},this.UpdateElementSize=function(){pas["WEBLib.Controls"].TControl.UpdateElementSize.call(this),this.FAutoSize&&0===this.FAlign&&null!=this.GetElementHandle()&&(4 in this.FComponentState||(this.GetElementHandle().style.removeProperty("width"),this.GetElementHandle().style.removeProperty("height"))),null!=this.GetContentHandle()&&this.FAlign in rtl.createSet(3,4,5)&&!this.FAutoSize&&this.FLayout in rtl.createSet(1,2)&&this.GetContentHandle().style.setProperty("height",pas.SysUtils.TIntegerHelper.ToString$1.call({p:this.GetHeight(),get:function(){return this.p},set:function(t){this.p=t}})+"px")},this.SetAutoSize=function(t){this.FAutoSize!==t&&(this.FAutoSize=t,this.UpdateAutoSize(),this.UpdateElement())},this.SetCaption=function(t){var e=0;this.FCaption!==t&&(e=this.GetWidth(),pas["WEBLib.Controls"].TCustomControl.SetCaption.call(this,t),this.UpdateAutoSize(),this.UpdateElement(),e-=this.GetWidth(),this.FAutoSize&&0!==this.FAlignment&&0!==e&&2 in this.FAnchors&&!this.IsUpdating()&&this.SetLeft(this.GetLeft()+e))},this.SetControlCursor=function(t){pas["WEBLib.Controls"].TControl.SetControlCursor.apply(this,arguments),""===this.FElementClassName&&null!=this.GetContentHandle()&&this.SetElementPointer(this.GetContentHandle(),this.FCursor)},this.SetEllipsisPosition=function(t){this.FEllipsisPosition!==t&&(this.FEllipsisPosition=t,1!==this.FEllipsisPosition&&(this.FAutoSize=!1),this.UpdateElement())},this.GetWidth=function(){var t=0;return this.FAutoSize&&null!=this.GetElementHandle()&&null!=this.FParent?(0===(t=Math.round(this.GetElementHandle().offsetWidth))&&(t=pas["WEBLib.Controls"].TControl.GetWidth.call(this)),0===t&&""!==this.FCaption&&4 in this.FComponentState&&(t=this.FOldWidth)):t=pas["WEBLib.Controls"].TControl.GetWidth.call(this),t},this.GetHeight=function(){var t=0;return this.FAutoSize&&null!=this.GetElementHandle()&&null!=this.FParent?(0===(t=Math.round(this.GetElementHandle().offsetHeight))&&(t=pas["WEBLib.Controls"].TControl.GetHeight.call(this)),0===t&&""!==this.FCaption&&4 in this.FComponentState&&(t=this.FOldHeight)):t=pas["WEBLib.Controls"].TControl.GetHeight.call(this),t},this.InitCSSLibrary=function(t){1===t&&(this.SetElementFont(1),this.SetHeightStyle(2))},this.CreateInitialize=function(){pas["WEBLib.Controls"].TCustomControl.CreateInitialize.call(this),this.FAutoSize=!0,this.FLayout=0,this.FEllipsisPosition=1,this.FColor$1=16777215,this.FTransparent=!0,this.FAlignment=0,this.SetTabStop(!1),this.FShowAccelChar=!0},rtl.addIntf(this,pas["WEBLib.Controls"].IControl),rtl.addIntf(this,pas.System.IUnknown)})),rtl.createClass(this,"TLabel",this.TCustomLabel,(function(){rtl.addIntf(this,pas["WEBLib.Controls"].IControl),rtl.addIntf(this,pas.System.IUnknown);var e=this.$rtti;e.addProperty("Align",2,pas["WEBLib.Controls"].$rtti.TAlign,"FAlign","SetAlign",4,{Default:pas["WEBLib.Controls"].TAlign.alNone}),e.addProperty("Alignment",2,pas.Classes.$rtti.TAlignment,"FAlignment","SetAlignment",4,{Default:pas.Classes.TAlignment.taLeftJustify}),e.addProperty("AlignWithMargins",2,rtl.boolean,"FAlignWithMargins","SetAlignWithMargins",4,{Default:!1}),e.addProperty("Anchors",2,pas["WEBLib.Controls"].$rtti.TAnchors,"FAnchors","SetAnchors",4,{Default:rtl.createSet(0,1)}),e.addProperty("AutoSize",2,rtl.boolean,"FAutoSize","SetAutoSize",4,{Default:!0}),e.addProperty("Caption",2,rtl.string,"FCaption","SetCaption"),e.addProperty("ChildOrder",2,rtl.longint,"FChildOrder","SetChildOrderEx",4,{Default:0}),e.addProperty("Color",2,pas["WEBLib.Graphics"].$rtti.TColor,"FColor$1","SetColorEx",4,{Default:16777215}),e.addProperty("DragMode",2,pas["WEBLib.Controls"].$rtti.TDragMode,"FDragMode","SetDragMode",4,{Default:pas["WEBLib.Controls"].TDragMode.dmManual}),e.addProperty("EllipsisPosition",2,t.$rtti.TEllipsisPosition,"FEllipsisPosition","SetEllipsisPosition",4,{Default:t.TEllipsisPosition.epNone}),e.addProperty("Enabled",2,rtl.boolean,"FEnabled","SetEnabled",4,{Default:!0}),e.addProperty("ElementClassName",2,pas["WEBLib.Controls"].$rtti.TElementClassName,"FElementClassName","SetElementClassName"),e.addProperty("ElementLabelClassName",2,pas["WEBLib.Controls"].$rtti.TElementClassName,"FElementLabelClassName","SetElementLabelClassName"),e.addProperty("ElementID",3,pas["WEBLib.Controls"].$rtti.TElementID,"GetID","SetID"),e.addProperty("ElementFont",2,pas["WEBLib.Controls"].$rtti.TElementFont,"FElementFont","SetElementFont",4,{Default:pas["WEBLib.Controls"].TElementFont.efProperty}),e.addProperty("ElementPosition",2,pas["WEBLib.Controls"].$rtti.TElementPosition,"FElementPosition","SetElementPosition",4,{Default:pas["WEBLib.Controls"].TElementPosition.epAbsolute}),e.addProperty("FocusControl",0,pas["WEBLib.Controls"].$rtti.TWinControl,"FFocusControl","FFocusControl"),e.addProperty("Font",2,pas["WEBLib.Graphics"].$rtti.TFont,"FFont","SetFont"),e.addProperty("Height",3,rtl.longint,"GetHeight","SetHeight"),e.addProperty("HeightPercent",2,rtl.double,"FHeightPercent","SetHeightPercent",4,{Default:100}),e.addProperty("HeightStyle",2,pas["WEBLib.Controls"].$rtti.TSizeStyle,"FHeightStyle","SetHeightStyle",4,{Default:pas["WEBLib.Controls"].TSizeStyle.ssAbsolute}),e.addProperty("Hint",2,rtl.string,"FHint","SetHint"),e.addProperty("HTML",2,rtl.string,"FHTML","SetHTML"),e.addProperty("HTMLType",2,t.$rtti.THTMLType,"FHTMLType","SetHTMLType",4,{Default:t.THTMLType.tLABELTAG}),e.addProperty("Layout",2,t.$rtti.TTextLayout,"FLayout","SetLayout",4,{Default:t.TTextLayout.tlTop}),e.addProperty("Left",3,rtl.longint,"GetLeft","SetLeft"),e.addProperty("Margins",2,pas["WEBLib.Controls"].$rtti.TMargins,"FMargins","SetMargins"),e.addProperty("ParentFont",2,rtl.boolean,"FParentFont","SetParentFont",4,{Default:!0}),e.addProperty("PopupMenu",0,pas["WEBLib.Menus"].$rtti.TPopupMenu,"FPopupMenu","FPopupMenu"),e.addProperty("ShowAccelChar",0,rtl.boolean,"FShowAccelChar","FShowAccelChar",4,{Default:!0}),e.addProperty("ShowHint",2,rtl.boolean,"FShowHint","SetShowHint",4,{Default:!1}),e.addProperty("TextDirection",0,pas["WEBLib.Controls"].$rtti.TTextDirection,"FTextDirection","FTextDirection",4,{Default:pas["WEBLib.Controls"].TTextDirection.tdDefault}),e.addProperty("Top",3,rtl.longint,"GetTop","SetTop"),e.addProperty("Transparent",2,rtl.boolean,"FTransparent","SetTransparent",4,{Default:!0}),e.addProperty("Visible",2,rtl.boolean,"FVisible","SetVisible",4,{Default:!0}),e.addProperty("Width",3,rtl.longint,"GetWidth","SetWidth"),e.addProperty("WidthPercent",2,rtl.double,"FWidthPercent","SetWidthPercent",4,{Default:100}),e.addProperty("WidthStyle",2,pas["WEBLib.Controls"].$rtti.TSizeStyle,"FWidthStyle","SetWidthStyle",4,{Default:pas["WEBLib.Controls"].TSizeStyle.ssAbsolute}),e.addProperty("WordWrap",0,rtl.boolean,"FWordWrap","FWordWrap",4,{Default:!1}),e.addProperty("OnClick",0,pas["WEBLib.Controls"].$rtti.TNotifyEvent,"FOnClick","FOnClick"),e.addProperty("OnDblClick",0,pas["WEBLib.Controls"].$rtti.TNotifyEvent,"FOnDblClick","FOnDblClick"),e.addProperty("OnTouchStart",0,pas["WEBLib.Controls"].$rtti.TTouchEvent,"FOnTouchStart","FOnTouchStart"),e.addProperty("OnTouchEnd",0,pas["WEBLib.Controls"].$rtti.TTouchEvent,"FOnTouchEnd","FOnTouchEnd"),e.addProperty("OnTouchMove",0,pas["WEBLib.Controls"].$rtti.TTouchEvent,"FOnTouchMove","FOnTouchMove"),e.addProperty("OnTouchCancel",0,pas["WEBLib.Controls"].$rtti.TTouchEvent,"FOnTouchCancel","FOnTouchCancel"),e.addProperty("OnDragOver",0,pas["WEBLib.Controls"].$rtti.TDragOverEvent,"FOnDragOver","FOnDragOver"),e.addProperty("OnDragDrop",0,pas["WEBLib.Controls"].$rtti.TDragDropEvent,"FOnDragDrop","FOnDragDrop"),e.addProperty("OnStartDrag",0,pas["WEBLib.Controls"].$rtti.TStartDragEvent,"FOnStartDrag","FOnStartDrag"),e.addProperty("OnEndDrag",0,pas["WEBLib.Controls"].$rtti.TEndDragEvent,"FonEndDrag","FonEndDrag")})),rtl.createClass(this,"TCustomInput",pas["WEBLib.Menus"].TWebCustomControl,(function(){this.IsInputControl=function(){return!0,!0},this.GetInputType=function(){return"EDIT","EDIT"},this.CreateElement=function(){var t=null;return(t=document.createElement("INPUT")).setAttribute("type",this.GetInputType()),t},this.UpdateElementVisual=function(){pas["WEBLib.Controls"].TCustomControl.UpdateElementVisual.call(this),null==this.GetContainer()||this.GetIsLinked()||(this.GetContainer().style.setProperty("-moz-box-sizing","border-box"),this.GetContainer().style.setProperty("-webkit-box-sizing","border-box"),this.GetContainer().style.setProperty("box-sizing","border-box"))},this.CreateInitialize=function(){pas["WEBLib.Controls"].TCustomControl.CreateInitialize.call(this),this.SetShowFocus(!0),this.FNoUserSelect=!1},rtl.addIntf(this,pas["WEBLib.Controls"].IControl),rtl.addIntf(this,pas.System.IUnknown)})),rtl.createClass(this,"TCustomEdit",this.TCustomInput,(function(){this.$init=function(){t.TCustomInput.$init.call(this),this.FCharCase=0,this.FMaxLength=0,this.FReadOnly=!1,this.FText="",this.FTextHint="",this.FSelStart=0,this.FAlignment=0,this.FHideSelection=!1,this.FPasswordChar="\0",this.FOnChange=null,this.FAutoSize=!1,this.FAutoSelect=!1,this.FSelLength=0,this.FNumeric=!1,this.FAutoCompletion=0,this.FEditType=0,this.FRequired=!1,this.FAutoFocus=!1,this.FPattern="",this.FHandlePastePtr=null,this.FHandleCutPtr=null,this.FHandleChangePtr=null,this.FHandleInvalidPtr=null,this.FHandleSearchPtr=null,this.FSpellCheck=!1,this.FRequiredText="",this.FOnSearch=null},this.$final=function(){this.FOnChange=void 0,this.FOnSearch=void 0,t.TCustomInput.$final.call(this)},this.SetAlignment=function(t){this.FAlignment=t,this.UpdateElement()},this.SetHideSelection=function(t){this.FHideSelection!==t&&(this.FHideSelection=t,this.UpdateElement())},this.SetAutoSelect=function(t){this.FAutoSelect!==t&&(this.FAutoSelect=t,this.UpdateElement())},this.SetAutoSize=function(t){this.FAutoSize!==t&&(this.FAutoSize=t,this.UpdateElement())},this.SetPasswordChar=function(t){this.FPasswordChar=t,this.UpdateElement()},this.SetAutoCompletion=function(t){this.FAutoCompletion!==t&&(this.FAutoCompletion=t,this.UpdateElement())},this.SetAutoFocus=function(t){this.FAutoFocus!==t&&(this.FAutoFocus=t,this.UpdateElement())},this.SetRequired=function(t){this.FRequired!==t&&(this.FRequired=t,this.UpdateElement())},this.SetPattern=function(t){this.FPattern!==t&&(this.FPattern=t,this.UpdateElement())},this.SetEditType=function(t){this.FEditType!==t&&(this.FEditType=t,this.UpdateElement())},this.SetSpellCheck=function(t){this.FSpellCheck!==t&&(this.FSpellCheck=t,this.UpdateElement())},this.GetElementInputHandle=function(){return this.GetContainer()},this.DoHandlePaste=function(t){var e="",i=!1;i=!1;var s=t.clipboardData||window.clipboardData;return s&&(e=s.getData("Text"),i=!0),!i||this.CanPaste(e)&&this.Validate(e)||(t.preventDefault(),t.stopPropagation()),!1,!1},this.DoHandleCut=function(t){return this.CanCut()||(t.preventDefault(),t.stopPropagation()),!1,!1},this.DoHandleChange=function(t){return this.Change(),!0,""!==this.FRequiredText&&this.GetElementInputHandle().setCustomValidity(""),!0},this.DoHandleInvalid=function(t){return this.GetElementInputHandle().setCustomValidity(this.FRequiredText),!0,!0},this.DoHandleSearch=function(t){return!0,null!=this.FOnSearch&&this.FOnSearch(this),!0},this.IsCustomEditor=function(){return!1,!1},this.KeyPress=function(t){var e=!1;pas["WEBLib.Controls"].TControl.KeyPress.call(this,t),e=!0;var i=this.FEditType;3===i?e=t.get().charCodeAt()in rtl.createSet(null,48,57):5===i?e=t.get().charCodeAt()in rtl.createSet(null,48,57,43,45):1===i?e=t.get().charCodeAt()in rtl.createSet(null,48,57,44,46):4===i?e=t.get().charCodeAt()in rtl.createSet(null,48,57,44,46,43,45):2===i&&(e=t.get().charCodeAt()in rtl.createSet(null,48,57,null,65,70)),e||t.set("\0")},this.DoEnter=function(){pas["WEBLib.Controls"].TControl.DoEnter.call(this),this.FAutoSelect&&null!=this.GetElementInputHandle()&&this.GetElementInputHandle().select()},this.GetInputType=function(){return"\0"!==this.FPasswordChar?"PASSWORD":this.FNumeric?"NUMBER":this.FEditType in rtl.createSet(1,3)?"TEL":6===this.FEditType?"SEARCH":"TEXT"},this.GetText=function(){var t="";return t=this.FText,null!=this.GetElementInputHandle()&&(t=this.GetElementInputHandle().value),3===this.FCharCase&&(t=pas.SysUtils.UpperCase(t)),0===this.FCharCase&&(t=pas.SysUtils.LowerCase(t)),t},this.GetDisplayText=function(){return this.FText},this.IsReadOnly=function(){return this.FReadOnly},this.Validate=function(t){var e=!1,i=0,s="\0",n=!1;e=!0;for(var r=1,a=t.length;r<=a;r++){i=r,s=t.charAt(i-1),n=!0;var o=this.FEditType;if(3===o?n=s.charCodeAt()in rtl.createSet(null,48,57):5===o?n=s.charCodeAt()in rtl.createSet(null,48,57,43,45):1===o?n=s.charCodeAt()in rtl.createSet(null,48,57,44,46):4===o?n=s.charCodeAt()in rtl.createSet(null,48,57,44,46,43,45):2===o&&(n=s.charCodeAt()in rtl.createSet(null,48,57,null,65,70)),!n){e=!1;break}}return e},this.ClearMethodPointers=function(){pas["WEBLib.Controls"].TControl.ClearMethodPointers.call(this),this.FHandlePastePtr=null,this.FHandleCutPtr=null,this.FHandleChangePtr=null,this.FHandleInvalidPtr=null,this.FHandleSearchPtr=null},this.GetMethodPointers=function(){pas["WEBLib.Controls"].TControl.GetMethodPointers.call(this),this.FHandlePastePtr=rtl.createCallback(this,"DoHandlePaste"),this.FHandleCutPtr=rtl.createCallback(this,"DoHandleCut"),this.FHandleChangePtr=rtl.createCallback(this,"DoHandleChange"),this.FHandleInvalidPtr=rtl.createCallback(this,"DoHandleInvalid"),this.FHandleSearchPtr=rtl.createCallback(this,"DoHandleSearch")},this.BindEvents=function(){pas["WEBLib.Controls"].TCustomControl.BindEvents.call(this),null!=this.GetElementInputHandle()&&(this.GetElementInputHandle().addEventListener("input",this.FHandleChangePtr),this.GetElementInputHandle().addEventListener("paste",this.FHandlePastePtr),this.GetElementInputHandle().addEventListener("cut",this.FHandleCutPtr),this.GetElementInputHandle().addEventListener("invalid",this.FHandleInvalidPtr),this.GetElementInputHandle().addEventListener("search",this.FHandleSearchPtr))},this.UnbindEvents=function(){pas["WEBLib.Controls"].TControl.UnbindEvents.call(this),null!=this.GetElementInputHandle()&&(this.GetElementInputHandle().removeEventListener("input",this.FHandleChangePtr),this.GetElementInputHandle().removeEventListener("paste",this.FHandlePastePtr),this.GetElementInputHandle().removeEventListener("cut",this.FHandleCutPtr),this.GetElementInputHandle().removeEventListener("invalid",this.FHandleInvalidPtr),this.GetElementInputHandle().removeEventListener("search",this.FHandleSearchPtr))},this.UpdateElementData=function(){var e=null,i=0,s=0,n=!1,r=!1;if(pas["WEBLib.Controls"].TControl.UpdateElementData.call(this),null!=this.GetElementInputHandle()){if(!this.GetIsLinked()){var a=this.FCharCase;3===a?this.GetElementInputHandle().style.setProperty("text-transform","uppercase"):0===a?this.GetElementInputHandle().style.setProperty("text-transform","lowercase"):2===a?this.GetElementInputHandle().style.setProperty("text-transform","capitalize"):1===a&&this.GetElementInputHandle().style.setProperty("text-transform","initial")}if(this.GetElementInputHandle().readOnly=this.IsReadOnly(),""!==this.FTextHint&&(this.GetElementInputHandle().placeholder=this.FTextHint),r=!0,this.GetIsLinked()&&(r=!this.GetElementInputHandle().hasAttribute("autocomplete")),r&&(52===this.FAutoCompletion?(this.GetElementInputHandle().setAttribute("autocomplete","nope"),this.GetIsLinked()||this.GetElementInputHandle().removeAttribute("name")):51===this.FAutoCompletion?(this.GetElementInputHandle().setAttribute("autocomplete","off"),this.GetIsLinked()||this.GetElementInputHandle().removeAttribute("name")):0!==this.FAutoCompletion?(this.GetElementInputHandle().setAttribute("autocomplete","on"),this.GetIsLinked()||this.GetElementInputHandle().setAttribute("name",t.GetAutoCompletionName(this.FAutoCompletion))):(this.GetElementInputHandle().removeAttribute("autocomplete"),this.GetIsLinked()||this.GetElementInputHandle().removeAttribute("name"))),!this.GetIsLinked()){this.GetElementInputHandle().setAttribute("type",this.GetInputType()),this.GetElementInputHandle().setAttribute("role","textbox");var o=this.FAlignment;0===o?this.GetElementInputHandle().style.removeProperty("text-align"):2===o?this.GetElementInputHandle().style.setProperty("text-align","center"):1===o&&this.GetElementInputHandle().style.setProperty("text-align","right")}this.FRequired?this.GetElementInputHandle().setAttribute("required",""):this.GetIsLinked()||this.GetElementInputHandle().removeAttribute("required"),this.FAutoFocus?this.GetElementInputHandle().setAttribute("autofocus",""):this.GetIsLinked()||this.GetElementInputHandle().removeAttribute("autofocus"),""!==this.FPattern?this.GetElementInputHandle().setAttribute("pattern",this.FPattern):this.GetElementInputHandle().removeAttribute("pattern"),this.FMaxLength<=0?this.GetElementInputHandle().removeAttribute("maxLength"):this.GetElementInputHandle().maxLength=this.FMaxLength,this.GetElementInputHandle().value=this.GetDisplayText(),n="NUMBER"===pas.SysUtils.UpperCase(this.GetInputType()),this.FSpellCheck?this.GetElementInputHandle().removeAttribute("spellcheck"):this.GetElementInputHandle().setAttribute("spellcheck","false"),n||this.GetIsLinked()||this.IsCustomEditor()||(i=this.FSelStart,s=this.FSelStart+this.FSelLength,e=this.GetElementInputHandle(),setTimeout((function(){e.setSelectionRange(i,s)}),1))}},this.SetCharCase=function(t){this.FCharCase!==t&&(this.FCharCase=t,this.UpdateElement())},this.SetMaxLength=function(t){this.FMaxLength!==t&&(this.FMaxLength=t,this.UpdateElementData())},this.SetReadOnly=function(t){this.FReadOnly!==t&&(this.FReadOnly=t,this.UpdateElement())},this.SetText=function(t){this.FText=t,null!=this.GetElementInputHandle()&&(this.GetElementInputHandle().value=this.GetDisplayText(),this.GetElementInputHandle().readOnly=this.IsReadOnly())},this.SetTextHint=function(t){this.FTextHint=t,this.UpdateElement()},this.CanPaste=function(t){return!0,!0},this.CanCut=function(){return!0,!0},this.InitCSSLibrary=function(t){1===t&&(this.SetElementFont(1),this.SetElementClassName("form-control"),this.SetHeightStyle(2))},this.CreateInitialize=function(){t.TCustomInput.CreateInitialize.call(this),this.FAutoCompletion=0,this.FEditType=0,this.FText="",this.FCharCase=1,this.FMaxLength=0,this.FReadOnly=!1,this.FTextHint="",this.FPasswordChar="\0",this.FSpellCheck=!0,this.FAutoSelect=!0,this.SetHeight(25)},this.Change=function(){null!=this.GetElementHandle()&&(this.FText=this.GetElementInputHandle().value),null!=this.FOnChange&&this.FOnChange(this)},rtl.addIntf(this,pas["WEBLib.Controls"].IControl),rtl.addIntf(this,pas.System.IUnknown)})),rtl.createClass(this,"TEdit",this.TCustomEdit,(function(){rtl.addIntf(this,pas["WEBLib.Controls"].IControl),rtl.addIntf(this,pas.System.IUnknown);var e=this.$rtti;e.addProperty("Alignment",2,pas.Classes.$rtti.TAlignment,"FAlignment","SetAlignment"),e.addProperty("Align",2,pas["WEBLib.Controls"].$rtti.TAlign,"FAlign","SetAlign",4,{Default:pas["WEBLib.Controls"].TAlign.alNone}),e.addProperty("AlignWithMargins",2,rtl.boolean,"FAlignWithMargins","SetAlignWithMargins",4,{Default:!1}),e.addProperty("Anchors",2,pas["WEBLib.Controls"].$rtti.TAnchors,"FAnchors","SetAnchors",4,{Default:rtl.createSet(0,1)}),e.addProperty("AutoCompletion",2,t.$rtti.TAutoCompletion,"FAutoCompletion","SetAutoCompletion",4,{Default:t.TAutoCompletion.acOff}),e.addProperty("AutoFocus",2,rtl.boolean,"FAutoFocus","SetAutoFocus",4,{Default:!1}),e.addProperty("AutoSize",2,rtl.boolean,"FAutoSize","SetAutoSize",4,{Default:!1}),e.addProperty("AutoSelect",2,rtl.boolean,"FAutoSelect","SetAutoSelect",4,{Default:!0}),e.addProperty("BiDiMode",2,pas["WEBLib.Controls"].$rtti.TBiDiMode,"FBiDiMode","SetBiDiMode",4,{Default:pas["WEBLib.Controls"].TBiDiMode.bdLeftToRight}),e.addProperty("BorderStyle",2,pas["WEBLib.Controls"].$rtti.TBorderStyle,"FBorderStyle","SetBorderStyle",4,{Default:pas["WEBLib.Controls"].TBorderStyle.bsSingle}),e.addProperty("Center",0,pas["WEBLib.Controls"].$rtti.TCenter,"FCenter",""),e.addProperty("CharCase",2,t.$rtti.TEditCharCase,"FCharCase","SetCharCase",4,{Default:t.TEditCharCase.wecNormal}),e.addProperty("ChildOrder",2,rtl.longint,"FChildOrder","SetChildOrderEx",4,{Default:0}),e.addProperty("Color",2,pas["WEBLib.Graphics"].$rtti.TColor,"FColor","SetColor"),e.addProperty("DragMode",2,pas["WEBLib.Controls"].$rtti.TDragMode,"FDragMode","SetDragMode",4,{Default:pas["WEBLib.Controls"].TDragMode.dmManual}),e.addProperty("EditType",2,t.$rtti.TEditType,"FEditType","SetEditType",4,{Default:t.TEditType.weString}),e.addProperty("ElementClassName",2,pas["WEBLib.Controls"].$rtti.TElementClassName,"FElementClassName","SetElementClassName"),e.addProperty("ElementID",3,pas["WEBLib.Controls"].$rtti.TElementID,"GetID","SetID"),e.addProperty("ElementFont",2,pas["WEBLib.Controls"].$rtti.TElementFont,"FElementFont","SetElementFont",4,{Default:pas["WEBLib.Controls"].TElementFont.efProperty}),e.addProperty("ElementPosition",2,pas["WEBLib.Controls"].$rtti.TElementPosition,"FElementPosition","SetElementPosition",4,{Default:pas["WEBLib.Controls"].TElementPosition.epAbsolute}),e.addProperty("Enabled",2,rtl.boolean,"FEnabled","SetEnabled",4,{Default:!0}),e.addProperty("Font",2,pas["WEBLib.Graphics"].$rtti.TFont,"FFont","SetFont"),e.addProperty("Height",3,rtl.longint,"GetHeight","SetHeight"),e.addProperty("HeightPercent",2,rtl.double,"FHeightPercent","SetHeightPercent",4,{Default:100}),e.addProperty("HeightStyle",2,pas["WEBLib.Controls"].$rtti.TSizeStyle,"FHeightStyle","SetHeightStyle",4,{Default:pas["WEBLib.Controls"].TSizeStyle.ssAbsolute}),e.addProperty("Hint",2,rtl.string,"FHint","SetHint"),e.addProperty("HideSelection",2,rtl.boolean,"FHideSelection","SetHideSelection"),e.addProperty("Left",3,rtl.longint,"GetLeft","SetLeft"),e.addProperty("ParentFont",2,rtl.boolean,"FParentFont","SetParentFont",4,{Default:!0}),e.addProperty("PasswordChar",2,rtl.char,"FPasswordChar","SetPasswordChar",4,{Default:"\0"}),e.addProperty("Pattern",2,rtl.string,"FPattern","SetPattern"),e.addProperty("Margins",2,pas["WEBLib.Controls"].$rtti.TMargins,"FMargins","SetMargins"),e.addProperty("MaxLength",2,rtl.longint,"FMaxLength","SetMaxLength",4,{Default:0}),e.addProperty("PopupMenu",0,pas["WEBLib.Menus"].$rtti.TPopupMenu,"FPopupMenu","FPopupMenu"),e.addProperty("ReadOnly",2,rtl.boolean,"FReadOnly","SetReadOnly",4,{Default:!1}),e.addProperty("Required",2,rtl.boolean,"FRequired","SetRequired",4,{Default:!1}),e.addProperty("RequiredText",0,rtl.string,"FRequiredText","FRequiredText"),e.addProperty("ShowFocus",2,rtl.boolean,"FShowFocus","SetShowFocus",4,{Default:!1}),e.addProperty("ShowHint",2,rtl.boolean,"FShowHint","SetShowHint",4,{Default:!1}),e.addProperty("SpellCheck",2,rtl.boolean,"FSpellCheck","SetSpellCheck",4,{Default:!0}),e.addProperty("TabOrder",2,rtl.longint,"FTabOrder","SetTabOrder"),e.addProperty("TabStop",2,rtl.boolean,"FTabStop","SetTabStop",4,{Default:!0}),e.addProperty("Text",3,rtl.string,"GetText","SetText"),e.addProperty("TextDirection",0,pas["WEBLib.Controls"].$rtti.TTextDirection,"FTextDirection","FTextDirection",4,{Default:pas["WEBLib.Controls"].TTextDirection.tdDefault}),e.addProperty("TextHint",2,rtl.string,"FTextHint","SetTextHint"),e.addProperty("Top",3,rtl.longint,"GetTop","SetTop"),e.addProperty("Visible",2,rtl.boolean,"FVisible","SetVisible",4,{Default:!0}),e.addProperty("Width",3,rtl.longint,"GetWidth","SetWidth"),e.addProperty("WidthPercent",2,rtl.double,"FWidthPercent","SetWidthPercent",4,{Default:100}),e.addProperty("WidthStyle",2,pas["WEBLib.Controls"].$rtti.TSizeStyle,"FWidthStyle","SetWidthStyle",4,{Default:pas["WEBLib.Controls"].TSizeStyle.ssAbsolute}),e.addProperty("OnChange",0,pas["WEBLib.Controls"].$rtti.TNotifyEvent,"FOnChange","FOnChange"),e.addProperty("OnClick",0,pas["WEBLib.Controls"].$rtti.TNotifyEvent,"FOnClick","FOnClick"),e.addProperty("OnDblClick",0,pas["WEBLib.Controls"].$rtti.TNotifyEvent,"FOnDblClick","FOnDblClick"),e.addProperty("OnKeyDown",0,pas["WEBLib.Controls"].$rtti.TKeyEvent,"FOnKeyDown","FOnKeyDown"),e.addProperty("OnKeyPress",0,pas["WEBLib.Controls"].$rtti.TKeyPressEvent,"FOnKeyPress","FOnKeyPress"),e.addProperty("OnKeyUp",0,pas["WEBLib.Controls"].$rtti.TKeyEvent,"FOnKeyUp","FOnKeyUp"),e.addProperty("OnMouseDown",0,pas["WEBLib.Controls"].$rtti.TMouseEvent,"FOnMouseDown","FOnMouseDown"),e.addProperty("OnMouseUp",0,pas["WEBLib.Controls"].$rtti.TMouseEvent,"FOnMouseUp","FOnMouseUp"),e.addProperty("OnMouseMove",0,pas["WEBLib.Controls"].$rtti.TMouseMoveEvent,"FOnMouseMove","FOnMouseMove"),e.addProperty("OnMouseLeave",0,pas["WEBLib.Controls"].$rtti.TNotifyEvent,"FOnMouseLeave","FOnMouseLeave"),e.addProperty("OnMouseEnter",0,pas["WEBLib.Controls"].$rtti.TNotifyEvent,"FOnMouseEnter","FOnMouseEnter"),e.addProperty("OnEnter",0,pas["WEBLib.Controls"].$rtti.TNotifyEvent,"FOnEnter","FOnEnter"),e.addProperty("OnExit",0,pas["WEBLib.Controls"].$rtti.TNotifyEvent,"FOnExit","FOnExit"),e.addProperty("OnDragDrop",0,pas["WEBLib.Controls"].$rtti.TDragDropEvent,"FOnDragDrop","FOnDragDrop"),e.addProperty("OnDragOver",0,pas["WEBLib.Controls"].$rtti.TDragOverEvent,"FOnDragOver","FOnDragOver"),e.addProperty("OnEndDrag",0,pas["WEBLib.Controls"].$rtti.TEndDragEvent,"FonEndDrag","FonEndDrag"),e.addProperty("OnSearch",0,pas["WEBLib.Controls"].$rtti.TNotifyEvent,"FOnSearch","FOnSearch"),e.addProperty("OnStartDrag",0,pas["WEBLib.Controls"].$rtti.TStartDragEvent,"FOnStartDrag","FOnStartDrag")})),rtl.createClass(this,"TSpinEdit",this.TCustomInput,(function(){this.$init=function(){t.TCustomInput.$init.call(this),this.FIncrement=0,this.FMaxValue=0,this.FMinValue=0,this.FValue=0,this.FAutoSize=!1,this.FOnChange=null,this.FReadOnly=!1,this.FHandleChangePtr=null,this.FHandleInvalidPtr=null,this.FRequiredText="",this.FRequired=!1},this.$final=function(){this.FOnChange=void 0,t.TCustomInput.$final.call(this)},this.GetText=function(){return pas.SysUtils.IntToStr(this.GetValue())},this.SetText=function(t){var e=0;e=0,pas.SysUtils.TryStrToInt(t,{get:function(){return e},set:function(t){e=t}})?this.SetValue(e):this.SetValue(0)},this.GetElementInputHandle=function(){return this.GetContainer()},this.SetReadOnly=function(t){this.FReadOnly!==t&&(this.FReadOnly=t,this.UpdateElement())},this.SetRequired=function(t){this.FRequired!==t&&(this.FRequired=t,this.UpdateElement())},this.KeyPress=function(t){t.get().charCodeAt()in rtl.createSet(null,48,57)||(t.set("\0"),this.PreventDefault(),this.StopPropagation()),pas["WEBLib.Controls"].TControl.KeyPress.apply(this,arguments)},this.GetInputType=function(){return"NUMBER","NUMBER"},this.UpdateElementData=function(){pas["WEBLib.Controls"].TControl.UpdateElementData.call(this),null!=this.GetContainer()&&(this.GetContainer().setAttribute("inputmode","numeric"),this.GetContainer().setAttribute("pattern","[0-9]*"),this.GetContainer().value=this.GetDisplayText(),this.GetElementInputHandle().readOnly=this.IsReadOnly(),this.FRequired?this.GetElementInputHandle().setAttribute("required",""):this.GetElementInputHandle().removeAttribute("required"))},this.GetValue=function(){var t,e=0;return e=this.FValue,null==this.GetContainer()||""!==(t=this.GetContainer().value)&&(e=pas.SysUtils.StrToInt(t)),e},this.SetIncrement=function(t){this.FIncrement=t,null!=this.GetContainer()&&this.GetContainer().setAttribute("step",pas.SysUtils.IntToStr(t))},this.SetMaxValue=function(t){this.FMaxValue=t,null!=this.GetContainer()&&this.GetContainer().setAttribute("max",pas.SysUtils.IntToStr(t))},this.SetMinValue=function(t){this.FMinValue=t,null!=this.GetContainer()&&this.GetContainer().setAttribute("min",pas.SysUtils.IntToStr(t))},this.SetValue=function(t){this.FValue=t,this.UpdateElement()},this.DoHandleChange=function(t){return this.Change(),!0,""!==this.FRequiredText&&this.GetElementInputHandle().setCustomValidity(""),!0},this.DoHandleInvalid=function(t){return this.GetElementInputHandle().setCustomValidity(this.FRequiredText),!0,!0},this.IsReadOnly=function(){return this.FReadOnly},this.GetDisplayText=function(){return pas.SysUtils.IntToStr(this.FValue)},this.BindEvents=function(){pas["WEBLib.Controls"].TCustomControl.BindEvents.call(this),null!=this.GetElementInputHandle()&&(this.GetElementInputHandle().addEventListener("input",this.FHandleChangePtr),this.GetElementInputHandle().addEventListener("invalid",this.FHandleInvalidPtr))},this.UnbindEvents=function(){pas["WEBLib.Controls"].TControl.UnbindEvents.call(this),null!=this.GetElementInputHandle()&&(this.GetElementInputHandle().removeEventListener("input",this.FHandleChangePtr),this.GetElementInputHandle().removeEventListener("invalid",this.FHandleInvalidPtr))},this.Change=function(){this.FValue=this.GetValue(),null!=this.FOnChange&&this.FOnChange(this)},this.ClearMethodPointers=function(){pas["WEBLib.Controls"].TControl.ClearMethodPointers.call(this),this.FHandleChangePtr=null,this.FHandleInvalidPtr=null},this.GetMethodPointers=function(){pas["WEBLib.Controls"].TControl.GetMethodPointers.call(this),this.FHandleChangePtr=rtl.createCallback(this,"DoHandleChange"),this.FHandleInvalidPtr=rtl.createCallback(this,"DoHandleInvalid")},this.InitCSSLibrary=function(t){1===t&&(this.SetElementFont(1),this.SetElementClassName("form-control"),this.SetHeightStyle(2))},this.CreateInitialize=function(){t.TCustomInput.CreateInitialize.call(this),this.FIncrement=1,this.FMaxValue=100,this.FMinValue=0,this.SetShowFocus(!0),this.SetHeight(25),this.AddControlStyle('input[type="number"]::-webkit-inner-spin-button { opacity: 1 !important; }')},rtl.addIntf(this,pas["WEBLib.Controls"].IControl),rtl.addIntf(this,pas.System.IUnknown);var e=this.$rtti;e.addProperty("Align",2,pas["WEBLib.Controls"].$rtti.TAlign,"FAlign","SetAlign",4,{Default:pas["WEBLib.Controls"].TAlign.alNone}),e.addProperty("AlignWithMargins",2,rtl.boolean,"FAlignWithMargins","SetAlignWithMargins",4,{Default:!1}),e.addProperty("Anchors",2,pas["WEBLib.Controls"].$rtti.TAnchors,"FAnchors","SetAnchors",4,{Default:rtl.createSet(0,1)}),e.addProperty("AutoSize",0,rtl.boolean,"FAutoSize","FAutoSize"),e.addProperty("BiDiMode",2,pas["WEBLib.Controls"].$rtti.TBiDiMode,"FBiDiMode","SetBiDiMode",4,{Default:pas["WEBLib.Controls"].TBiDiMode.bdLeftToRight}),e.addProperty("BorderStyle",2,pas["WEBLib.Controls"].$rtti.TBorderStyle,"FBorderStyle","SetBorderStyle",4,{Default:pas["WEBLib.Controls"].TBorderStyle.bsSingle}),e.addProperty("ChildOrder",2,rtl.longint,"FChildOrder","SetChildOrderEx",4,{Default:0}),e.addProperty("Color",2,pas["WEBLib.Graphics"].$rtti.TColor,"FColor","SetColor"),e.addProperty("DragMode",2,pas["WEBLib.Controls"].$rtti.TDragMode,"FDragMode","SetDragMode",4,{Default:pas["WEBLib.Controls"].TDragMode.dmManual}),e.addProperty("ElementClassName",2,pas["WEBLib.Controls"].$rtti.TElementClassName,"FElementClassName","SetElementClassName"),e.addProperty("ElementID",3,pas["WEBLib.Controls"].$rtti.TElementID,"GetID","SetID"),e.addProperty("ElementFont",2,pas["WEBLib.Controls"].$rtti.TElementFont,"FElementFont","SetElementFont",4,{Default:pas["WEBLib.Controls"].TElementFont.efProperty}),e.addProperty("ElementPosition",2,pas["WEBLib.Controls"].$rtti.TElementPosition,"FElementPosition","SetElementPosition",4,{Default:pas["WEBLib.Controls"].TElementPosition.epAbsolute}),e.addProperty("Enabled",2,rtl.boolean,"FEnabled","SetEnabled",4,{Default:!0}),e.addProperty("Font",2,pas["WEBLib.Graphics"].$rtti.TFont,"FFont","SetFont"),e.addProperty("Height",3,rtl.longint,"GetHeight","SetHeight"),e.addProperty("HeightPercent",2,rtl.double,"FHeightPercent","SetHeightPercent",4,{Default:100}),e.addProperty("HeightStyle",2,pas["WEBLib.Controls"].$rtti.TSizeStyle,"FHeightStyle","SetHeightStyle",4,{Default:pas["WEBLib.Controls"].TSizeStyle.ssAbsolute}),e.addProperty("Hint",2,rtl.string,"FHint","SetHint"),e.addProperty("Increment",2,rtl.longint,"FIncrement","SetIncrement"),e.addProperty("Left",3,rtl.longint,"GetLeft","SetLeft"),e.addProperty("Margins",2,pas["WEBLib.Controls"].$rtti.TMargins,"FMargins","SetMargins"),e.addProperty("MaxValue",2,rtl.longint,"FMaxValue","SetMaxValue",4,{Default:100}),e.addProperty("MinValue",2,rtl.longint,"FMinValue","SetMinValue",4,{Default:0}),e.addProperty("ParentFont",2,rtl.boolean,"FParentFont","SetParentFont",4,{Default:!0}),e.addProperty("ReadOnly",2,rtl.boolean,"FReadOnly","SetReadOnly",4,{Default:!1}),e.addProperty("Required",2,rtl.boolean,"FRequired","SetRequired",4,{Default:!1}),e.addProperty("RequiredText",0,rtl.string,"FRequiredText","FRequiredText"),e.addProperty("Role",3,rtl.string,"GetRole","SetRole"),e.addProperty("ShowFocus",2,rtl.boolean,"FShowFocus","SetShowFocus",4,{Default:!1}),e.addProperty("ShowHint",2,rtl.boolean,"FShowHint","SetShowHint",4,{Default:!1}),e.addProperty("TabStop",2,rtl.boolean,"FTabStop","SetTabStop",4,{Default:!0}),e.addProperty("TabOrder",2,rtl.longint,"FTabOrder","SetTabOrder"),e.addProperty("TextDirection",0,pas["WEBLib.Controls"].$rtti.TTextDirection,"FTextDirection","FTextDirection",4,{Default:pas["WEBLib.Controls"].TTextDirection.tdDefault}),e.addProperty("Value",3,rtl.longint,"GetValue","SetValue"),e.addProperty("Visible",2,rtl.boolean,"FVisible","SetVisible",4,{Default:!0}),e.addProperty("Width",3,rtl.longint,"GetWidth","SetWidth"),e.addProperty("WidthPercent",2,rtl.double,"FWidthPercent","SetWidthPercent",4,{Default:100}),e.addProperty("WidthStyle",2,pas["WEBLib.Controls"].$rtti.TSizeStyle,"FWidthStyle","SetWidthStyle",4,{Default:pas["WEBLib.Controls"].TSizeStyle.ssAbsolute}),e.addProperty("OnChange",0,pas["WEBLib.Controls"].$rtti.TNotifyEvent,"FOnChange","FOnChange"),e.addProperty("OnClick",0,pas["WEBLib.Controls"].$rtti.TNotifyEvent,"FOnClick","FOnClick"),e.addProperty("OnDblClick",0,pas["WEBLib.Controls"].$rtti.TNotifyEvent,"FOnDblClick","FOnDblClick"),e.addProperty("OnKeyDown",0,pas["WEBLib.Controls"].$rtti.TKeyEvent,"FOnKeyDown","FOnKeyDown"),e.addProperty("OnKeyPress",0,pas["WEBLib.Controls"].$rtti.TKeyPressEvent,"FOnKeyPress","FOnKeyPress"),e.addProperty("OnKeyUp",0,pas["WEBLib.Controls"].$rtti.TKeyEvent,"FOnKeyUp","FOnKeyUp"),e.addProperty("OnMouseDown",0,pas["WEBLib.Controls"].$rtti.TMouseEvent,"FOnMouseDown","FOnMouseDown"),e.addProperty("OnMouseUp",0,pas["WEBLib.Controls"].$rtti.TMouseEvent,"FOnMouseUp","FOnMouseUp"),e.addProperty("OnMouseMove",0,pas["WEBLib.Controls"].$rtti.TMouseMoveEvent,"FOnMouseMove","FOnMouseMove"),e.addProperty("OnMouseLeave",0,pas["WEBLib.Controls"].$rtti.TNotifyEvent,"FOnMouseLeave","FOnMouseLeave"),e.addProperty("OnMouseEnter",0,pas["WEBLib.Controls"].$rtti.TNotifyEvent,"FOnMouseEnter","FOnMouseEnter"),e.addProperty("OnEnter",0,pas["WEBLib.Controls"].$rtti.TNotifyEvent,"FOnEnter","FOnEnter"),e.addProperty("OnExit",0,pas["WEBLib.Controls"].$rtti.TNotifyEvent,"FOnExit","FOnExit"),e.addProperty("OnDragDrop",0,pas["WEBLib.Controls"].$rtti.TDragDropEvent,"FOnDragDrop","FOnDragDrop"),e.addProperty("OnDragOver",0,pas["WEBLib.Controls"].$rtti.TDragOverEvent,"FOnDragOver","FOnDragOver"),e.addProperty("OnEndDrag",0,pas["WEBLib.Controls"].$rtti.TEndDragEvent,"FonEndDrag","FonEndDrag"),e.addProperty("OnStartDrag",0,pas["WEBLib.Controls"].$rtti.TStartDragEvent,"FOnStartDrag","FOnStartDrag")})),rtl.createClass(this,"TButton",pas["WEBLib.Menus"].TWebCustomControl,(function(){this.$init=function(){pas["WEBLib.Menus"].TWebCustomControl.$init.call(this),this.FModalResult=0,this.FDefault=!1,this.FCancel=!1,this.FButtonType=""},this.SetButtonType=function(t){this.FButtonType=t,this.UpdateElementData()},this.SetDefault=function(t){this.FDefault=t,this.FDefault&&this.SetFocus()},this.CreateElement=function(){var t=null;return(t=document.createElement("BUTTON")).setAttribute("type","BUTTON"),t},this.SetCaption=function(t){this.FCaption!==t&&(pas["WEBLib.Controls"].TCustomControl.SetCaption.call(this,t),this.UpdateElementData())},this.UpdateElementData=function(){var t="";pas["WEBLib.Controls"].TControl.UpdateElementData.call(this),this.GetIsLinked()&&""===this.FCaption||null!=this.GetElementHandle()&&((0===this.GetElementHandle().childElementCount||pas.System.Pos("</",this.FCaption)>0||!this.GetIsLinked())&&(this.GetElementHandle().innerHTML=pas["WEBLib.WebTools"].ProcessAccelerator(this.FCaption,{get:function(){return t},set:function(e){t=e}})),""!==t&&this.GetElementHandle().setAttribute("accesskey",t),this.GetElementHandle().setAttribute("role","button"),this.GetElementHandle().setAttribute("aria-label",this.FCaption),""!==this.FButtonType?this.GetElementHandle().setAttribute("type",this.FButtonType):this.GetElementHandle().setAttribute("type","BUTTON"))},this.UpdateElementVisual=function(){var t="";pas["WEBLib.Controls"].TCustomControl.UpdateElementVisual.call(this),null!=this.GetElementHandle()&&(this.GetElementHandle().style.removeProperty("outline"),this.GetElementHandle().style.removeProperty("user-select"),"BTN"===(t=pas.SysUtils.UpperCase(this.FElementClassName))||pas.System.Pos("BTN ",t))},this.HandleKeyPreview=function(t){pas["WEBLib.Controls"].TControl.HandleKeyPreview.apply(this,arguments),this.FDefault&&13===t&&this.Click(),this.FCancel&&27===t&&this.Click()},this.InitCSSLibrary=function(t){1===t&&(this.SetElementClassName("btn btn-light"),this.SetElementFont(1),this.SetHeightStyle(2))},this.CreateInitialize=function(){pas["WEBLib.Controls"].TCustomControl.CreateInitialize.call(this),4 in this.FComponentState&&""===this.FCaption&&this.SetCaption(this.FName),this.SetColor(-1),this.FModalResult=0},this.Click=function(){var t=null;pas["WEBLib.Controls"].TControl.Click.call(this),0!==this.FModalResult&&null!=(t=pas["WEBLib.Forms"].GetParentForm(this))&&t.SetModalResult(this.FModalResult)},rtl.addIntf(this,pas["WEBLib.Controls"].IControl),rtl.addIntf(this,pas.System.IUnknown);var t=this.$rtti;t.addProperty("Align",2,pas["WEBLib.Controls"].$rtti.TAlign,"FAlign","SetAlign",4,{Default:pas["WEBLib.Controls"].TAlign.alNone}),t.addProperty("AlignWithMargins",2,rtl.boolean,"FAlignWithMargins","SetAlignWithMargins",4,{Default:!1}),t.addProperty("Anchors",2,pas["WEBLib.Controls"].$rtti.TAnchors,"FAnchors","SetAnchors",4,{Default:rtl.createSet(0,1)}),t.addProperty("BiDiMode",2,pas["WEBLib.Controls"].$rtti.TBiDiMode,"FBiDiMode","SetBiDiMode",4,{Default:pas["WEBLib.Controls"].TBiDiMode.bdLeftToRight}),t.addProperty("BorderStyle",2,pas["WEBLib.Controls"].$rtti.TBorderStyle,"FBorderStyle","SetBorderStyle",4,{Default:pas["WEBLib.Controls"].TBorderStyle.bsSingle}),t.addProperty("ButtonType",2,rtl.string,"FButtonType","SetButtonType"),t.addProperty("Caption",2,rtl.string,"FCaption","SetCaption"),t.addProperty("Cancel",0,rtl.boolean,"FCancel","FCancel",4,{Default:!1}),t.addProperty("Center",0,pas["WEBLib.Controls"].$rtti.TCenter,"FCenter",""),t.addProperty("ChildOrder",2,rtl.longint,"FChildOrder","SetChildOrderEx",4,{Default:0}),t.addProperty("Color",2,pas["WEBLib.Graphics"].$rtti.TColor,"FColor","SetColor"),t.addProperty("Default",2,rtl.boolean,"FDefault","SetDefault",4,{Default:!1}),t.addProperty("DragMode",2,pas["WEBLib.Controls"].$rtti.TDragMode,"FDragMode","SetDragMode",4,{Default:pas["WEBLib.Controls"].TDragMode.dmManual}),t.addProperty("ElementClassName",2,pas["WEBLib.Controls"].$rtti.TElementClassName,"FElementClassName","SetElementClassName"),t.addProperty("ElementID",3,pas["WEBLib.Controls"].$rtti.TElementID,"GetID","SetID"),t.addProperty("ElementFont",2,pas["WEBLib.Controls"].$rtti.TElementFont,"FElementFont","SetElementFont",4,{Default:pas["WEBLib.Controls"].TElementFont.efProperty}),t.addProperty("ElementPosition",2,pas["WEBLib.Controls"].$rtti.TElementPosition,"FElementPosition","SetElementPosition",4,{Default:pas["WEBLib.Controls"].TElementPosition.epAbsolute}),t.addProperty("Enabled",2,rtl.boolean,"FEnabled","SetEnabled",4,{Default:!0}),t.addProperty("Font",2,pas["WEBLib.Graphics"].$rtti.TFont,"FFont","SetFont"),t.addProperty("Height",3,rtl.longint,"GetHeight","SetHeight"),t.addProperty("HeightPercent",2,rtl.double,"FHeightPercent","SetHeightPercent",4,{Default:100}),t.addProperty("HeightStyle",2,pas["WEBLib.Controls"].$rtti.TSizeStyle,"FHeightStyle","SetHeightStyle",4,{Default:pas["WEBLib.Controls"].TSizeStyle.ssAbsolute}),t.addProperty("Hint",2,rtl.string,"FHint","SetHint"),t.addProperty("Left",3,rtl.longint,"GetLeft","SetLeft"),t.addProperty("Margins",2,pas["WEBLib.Controls"].$rtti.TMargins,"FMargins","SetMargins"),t.addProperty("ModalResult",0,rtl.longint,"FModalResult","FModalResult",4,{Default:0}),t.addProperty("PopupMenu",0,pas["WEBLib.Menus"].$rtti.TPopupMenu,"FPopupMenu","FPopupMenu"),t.addProperty("Role",3,rtl.string,"GetRole","SetRole"),t.addProperty("ParentFont",2,rtl.boolean,"FParentFont","SetParentFont",4,{Default:!0}),t.addProperty("ShowHint",2,rtl.boolean,"FShowHint","SetShowHint",4,{Default:!1}),t.addProperty("TabOrder",2,rtl.longint,"FTabOrder","SetTabOrder"),t.addProperty("TabStop",2,rtl.boolean,"FTabStop","SetTabStop",4,{Default:!0}),t.addProperty("TextDirection",0,pas["WEBLib.Controls"].$rtti.TTextDirection,"FTextDirection","FTextDirection",4,{Default:pas["WEBLib.Controls"].TTextDirection.tdDefault}),t.addProperty("Top",3,rtl.longint,"GetTop","SetTop"),t.addProperty("Visible",2,rtl.boolean,"FVisible","SetVisible",4,{Default:!0}),t.addProperty("Width",3,rtl.longint,"GetWidth","SetWidth"),t.addProperty("WidthPercent",2,rtl.double,"FWidthPercent","SetWidthPercent",4,{Default:100}),t.addProperty("WidthStyle",2,pas["WEBLib.Controls"].$rtti.TSizeStyle,"FWidthStyle","SetWidthStyle",4,{Default:pas["WEBLib.Controls"].TSizeStyle.ssAbsolute}),t.addProperty("OnClick",0,pas["WEBLib.Controls"].$rtti.TNotifyEvent,"FOnClick","FOnClick"),t.addProperty("OnKeyDown",0,pas["WEBLib.Controls"].$rtti.TKeyEvent,"FOnKeyDown","FOnKeyDown"),t.addProperty("OnKeyPress",0,pas["WEBLib.Controls"].$rtti.TKeyPressEvent,"FOnKeyPress","FOnKeyPress"),t.addProperty("OnKeyUp",0,pas["WEBLib.Controls"].$rtti.TKeyEvent,"FOnKeyUp","FOnKeyUp"),t.addProperty("OnMouseDown",0,pas["WEBLib.Controls"].$rtti.TMouseEvent,"FOnMouseDown","FOnMouseDown"),t.addProperty("OnMouseUp",0,pas["WEBLib.Controls"].$rtti.TMouseEvent,"FOnMouseUp","FOnMouseUp"),t.addProperty("OnMouseMove",0,pas["WEBLib.Controls"].$rtti.TMouseMoveEvent,"FOnMouseMove","FOnMouseMove"),t.addProperty("OnMouseLeave",0,pas["WEBLib.Controls"].$rtti.TNotifyEvent,"FOnMouseLeave","FOnMouseLeave"),t.addProperty("OnMouseEnter",0,pas["WEBLib.Controls"].$rtti.TNotifyEvent,"FOnMouseEnter","FOnMouseEnter"),t.addProperty("OnEnter",0,pas["WEBLib.Controls"].$rtti.TNotifyEvent,"FOnEnter","FOnEnter"),t.addProperty("OnExit",0,pas["WEBLib.Controls"].$rtti.TNotifyEvent,"FOnExit","FOnExit"),t.addProperty("OnDragDrop",0,pas["WEBLib.Controls"].$rtti.TDragDropEvent,"FOnDragDrop","FOnDragDrop"),t.addProperty("OnDragOver",0,pas["WEBLib.Controls"].$rtti.TDragOverEvent,"FOnDragOver","FOnDragOver"),t.addProperty("OnEndDrag",0,pas["WEBLib.Controls"].$rtti.TEndDragEvent,"FonEndDrag","FonEndDrag"),t.addProperty("OnStartDrag",0,pas["WEBLib.Controls"].$rtti.TStartDragEvent,"FOnStartDrag","FOnStartDrag")})),rtl.createClass(this,"TCheckBox",pas["WEBLib.Menus"].TWebCustomControl,(function(){this.$init=function(){pas["WEBLib.Menus"].TWebCustomControl.$init.call(this),this.FChecked=!1,this.FState=0,this.FElementButtonClassName="",this.FElementLabelClassName="",this.FOnCheckClick=null,this.FAlignment=0,this.FAllowGrayed=!1},this.$final=function(){this.FOnCheckClick=void 0,pas["WEBLib.Menus"].TWebCustomControl.$final.call(this)},this.SetAlignment=function(t){this.FAlignment!==t&&(this.FAlignment=t,this.UpdateElementVisual())},this.Loaded=function(){pas["WEBLib.Controls"].TCustomControl.Loaded.call(this),null!=this.GetContainer()&&(this.GetIsLinked()||(this.GetContainer().children.item(1).onclick=rtl.createSafeCallback(this,"HandleLabelClick")))},this.UpdateElementData=function(){var t=null;pas["WEBLib.Controls"].TControl.UpdateElementData.call(this),null!=this.GetContainer()&&(null!=(t=this.GetCheckElement())&&(t.disabled=!this.IsEnabled(),t.checked=this.FChecked,t.indeterminate=1===this.GetState()),this.GetIsLinked()||(""!==this.FCaption&&(this.GetContainer().lastElementChild.innerHTML=this.FCaption),this.GetElementHandle().setAttribute("tabindex","-1"),this.GetElementHandle().firstChild.setAttribute("tabindex","-1")),this.FTabStop&&this.GetContainer().setAttribute("tabindex",pas.SysUtils.IntToStr(this.FTabOrder)))},this.UpdateElementSize=function(){pas["WEBLib.Controls"].TControl.UpdateElementSize.call(this),null==this.GetContainer()||this.GetIsLinked()||0!==this.FElementPosition||(2!==this.FHeightStyle?this.GetContainer().firstElementChild.style.setProperty("height","100%"):this.GetContainer().firstElementChild.style.removeProperty("height"))},this.UpdateElementVisual=function(){var e=null,i=null,s=null,n=!1;pas["WEBLib.Controls"].TCustomControl.UpdateElementVisual.call(this),null!=this.GetElementHandle()&&(null!=(e=this.GetElementHandle().firstChild)&&(null!=e.style&&e.style.setProperty("margin-right","4px"),""===this.FElementClassName&&(e.style.setProperty("vertical-align","middle"),e.style.setProperty("margin-top","0px")),""!==this.FElementButtonClassName?e.setAttribute("class",this.FElementButtonClassName):e.removeAttribute("class")),null!=(i=this.GetElementHandle().lastElementChild)&&(""!==this.FElementLabelClassName?i.setAttribute("class",this.FElementLabelClassName):i.removeAttribute("class")),this.FTabStop&&this.FShowFocus&&""===this.FElementClassName||this.GetElementHandle().style.setProperty("outline","none"),this.GetIsLinked()||(this.GetElementHandle().style.setProperty("user-select","none"),0===this.FElementPosition&&(""===this.FElementButtonClassName&&(1===this.FAlignment?e.style.removeProperty("float"):e.style.setProperty("float","right"),2===this.FHeightStyle?e.style.removeProperty("height"):0===this.FElementPosition&&e.style.setProperty("height","100%"),e.style.setProperty("vertical-align","middle"),t.TCheckGroup.isPrototypeOf(this.FParent)||(e.style.setProperty("margin-top","0px"),e.style.setProperty("margin-bottom","0px"))),n=null!=(s=pas["WEBLib.Forms"].GetParentForm(this))&&1===s.FCSSLibrary,(""===this.FElementLabelClassName||n)&&((i=this.GetContainer().lastElementChild).style.setProperty("vertical-align","middle"),i.style.setProperty("min-height","100%"),i.style.setProperty("height","100%"),i.style.setProperty("overflow","hidden"),i.style.setProperty("display","inline-flex"),i.style.setProperty("align-items","center")))))},this.CreateElement=function(){var t=null,e=null,i=null;return t=document.createElement("SPAN"),e=document.createElement("INPUT"),i=document.createElement("SPAN"),e.setAttribute("TYPE","CHECKBOX"),e.setAttribute("id",this.GetID()+"ck"),e.setAttribute("role","checkbox"),i.setAttribute("id",this.GetID()+"lbl"),i.setAttribute("value",this.GetID()),t.appendChild(e),t.appendChild(i),rtl.asExt(e,HTMLInputElement).onclick=rtl.createSafeCallback(this,"HandleCheckClick"),t},this.SetChecked=function(t){this.FChecked=t,this.FState=t?0:2,this.UpdateElement()},this.GetChecked=function(){var t=null;return null!=this.GetContainer()&&null!=(t=this.GetCheckElement())&&(this.FChecked=t.checked),this.FChecked},this.SetState=function(t){this.FState=t,this.FChecked=0===this.FState,this.UpdateElement()},this.GetState=function(){return this.FState},this.SetCaption=function(t){this.FCaption!==t&&(pas["WEBLib.Controls"].TCustomControl.SetCaption.call(this,t),null!=this.GetContainer()&&(this.GetIsLinked()?null!=this.GetContainer().lastElementChild&&"SPAN"===this.GetContainer().lastElementChild.tagName&&(this.GetContainer().lastElementChild.innerHTML=t):null!=this.GetContainer().lastElementChild&&(this.GetContainer().lastElementChild.innerHTML=t)))},this.SetEnabled=function(t){var e=null;pas["WEBLib.Controls"].TControl.SetEnabled.apply(this,arguments),null!=this.GetContainer()&&null!=(e=this.GetCheckElement())&&(e.disabled=!t)},this.HandleLabelClick=function(t){var e=null;return null!=this.GetContainer()&&this.FEnabled&&(this.FAllowGrayed?(2===this.FState?this.FState=1:1===this.FState?this.FState=0:0===this.FState&&(this.FState=2),(e=this.GetCheckElement()).checked=0===this.FState,e.indeterminate=1===this.FState):(e=this.GetCheckElement()).checked=!e.checked),this.DoCheckClick(),!0,!0},this.HandleCheckClick=function(t){var e=null;return this.FAllowGrayed&&this.FEnabled&&(2===this.FState?this.FState=1:1===this.FState?this.FState=0:0===this.FState&&(this.FState=2),(e=this.GetCheckElement()).checked=0===this.FState,e.indeterminate=1===this.FState),this.DoCheckClick(),!0,!0},this.Click=function(){pas["WEBLib.Controls"].TControl.Click.call(this),this.FAllowGrayed||(this.FChecked=this.GetChecked(),this.FChecked?this.FState=0:this.FState=2),this.SetFocus()},this.DoCheckClick=function(){null!=this.FOnCheckClick&&this.FOnCheckClick(this)},this.GetCheckElement=function(){return this.GetIsLinked()&&"INPUT"===this.GetElementHandle().tagName?this.GetElementHandle():this.GetContainer().firstElementChild},this.KeyPress=function(t){var e=null;pas["WEBLib.Controls"].TControl.KeyPress.apply(this,arguments)," "===t.get()&&(null==this.GetContainer()||this.GetIsLinked()||((e=this.GetCheckElement()).checked=!e.checked))},this.InitCSSLibrary=function(t){1===t&&(this.SetElementFont(1),this.SetElementClassName("custom-control custom-checkbox"),this.FElementButtonClassName="custom-control-input",this.FElementLabelClassName="custom-control-label",this.SetHeightStyle(2))},this.CreateInitialize=function(){pas["WEBLib.Controls"].TCustomControl.CreateInitialize.call(this),this.SetColor(-1),this.FChecked=!1,this.FState=2,this.SetAlignment(1),4 in this.FComponentState&&""===this.FCaption&&this.SetCaption(this.FName),this.SetShowFocus(!0)},rtl.addIntf(this,pas["WEBLib.Controls"].IControl),rtl.addIntf(this,pas.System.IUnknown);var e=this.$rtti;e.addProperty("Align",2,pas["WEBLib.Controls"].$rtti.TAlign,"FAlign","SetAlign",4,{Default:pas["WEBLib.Controls"].TAlign.alNone}),e.addProperty("Alignment",2,pas.Classes.$rtti.TAlignment,"FAlignment","SetAlignment",4,{Default:pas.Classes.TAlignment.taRightJustify}),e.addProperty("AlignWithMargins",2,rtl.boolean,"FAlignWithMargins","SetAlignWithMargins",4,{Default:!1}),e.addProperty("AllowGrayed",0,rtl.boolean,"FAllowGrayed","FAllowGrayed",4,{Default:!1}),e.addProperty("Anchors",2,pas["WEBLib.Controls"].$rtti.TAnchors,"FAnchors","SetAnchors",4,{Default:rtl.createSet(0,1)}),e.addProperty("Caption",2,rtl.string,"FCaption","SetCaption"),e.addProperty("Checked",3,rtl.boolean,"GetChecked","SetChecked",4,{Default:!1}),e.addProperty("ChildOrder",2,rtl.longint,"FChildOrder","SetChildOrderEx",4,{Default:0}),e.addProperty("Color",2,pas["WEBLib.Graphics"].$rtti.TColor,"FColor","SetColor",4,{Default:-1}),e.addProperty("DragMode",2,pas["WEBLib.Controls"].$rtti.TDragMode,"FDragMode","SetDragMode",4,{Default:pas["WEBLib.Controls"].TDragMode.dmManual}),e.addProperty("ElementClassName",2,pas["WEBLib.Controls"].$rtti.TElementClassName,"FElementClassName","SetElementClassName"),e.addProperty("ElementButtonClassName",0,pas["WEBLib.Controls"].$rtti.TElementClassName,"FElementButtonClassName","FElementButtonClassName"),e.addProperty("ElementLabelClassName",0,pas["WEBLib.Controls"].$rtti.TElementClassName,"FElementLabelClassName","FElementLabelClassName"),e.addProperty("ElementID",3,pas["WEBLib.Controls"].$rtti.TElementID,"GetID","SetID"),e.addProperty("ElementFont",2,pas["WEBLib.Controls"].$rtti.TElementFont,"FElementFont","SetElementFont",4,{Default:pas["WEBLib.Controls"].TElementFont.efProperty}),e.addProperty("ElementPosition",2,pas["WEBLib.Controls"].$rtti.TElementPosition,"FElementPosition","SetElementPosition",4,{Default:pas["WEBLib.Controls"].TElementPosition.epAbsolute}),e.addProperty("Enabled",2,rtl.boolean,"FEnabled","SetEnabled",4,{Default:!0}),e.addProperty("Font",2,pas["WEBLib.Graphics"].$rtti.TFont,"FFont","SetFont"),e.addProperty("Height",3,rtl.longint,"GetHeight","SetHeight"),e.addProperty("HeightPercent",2,rtl.double,"FHeightPercent","SetHeightPercent",4,{Default:100}),e.addProperty("HeightStyle",2,pas["WEBLib.Controls"].$rtti.TSizeStyle,"FHeightStyle","SetHeightStyle",4,{Default:pas["WEBLib.Controls"].TSizeStyle.ssAbsolute}),e.addProperty("Hint",2,rtl.string,"FHint","SetHint"),e.addProperty("Left",3,rtl.longint,"GetLeft","SetLeft"),e.addProperty("Margins",2,pas["WEBLib.Controls"].$rtti.TMargins,"FMargins","SetMargins"),e.addProperty("ParentFont",2,rtl.boolean,"FParentFont","SetParentFont",4,{Default:!0}),e.addProperty("PopupMenu",0,pas["WEBLib.Menus"].$rtti.TPopupMenu,"FPopupMenu","FPopupMenu"),e.addProperty("Role",3,rtl.string,"GetRole","SetRole"),e.addProperty("ShowFocus",2,rtl.boolean,"FShowFocus","SetShowFocus",4,{Default:!1}),e.addProperty("ShowHint",2,rtl.boolean,"FShowHint","SetShowHint",4,{Default:!1}),e.addProperty("State",3,t.$rtti.TCheckBoxState,"GetState","SetState",4,{Default:t.TCheckBoxState.cbUnchecked}),e.addProperty("TabOrder",2,rtl.longint,"FTabOrder","SetTabOrder"),e.addProperty("TabStop",2,rtl.boolean,"FTabStop","SetTabStop",4,{Default:!0}),e.addProperty("Top",3,rtl.longint,"GetTop","SetTop"),e.addProperty("Visible",2,rtl.boolean,"FVisible","SetVisible",4,{Default:!0}),e.addProperty("Width",3,rtl.longint,"GetWidth","SetWidth"),e.addProperty("WidthPercent",2,rtl.double,"FWidthPercent","SetWidthPercent",4,{Default:100}),e.addProperty("WidthStyle",2,pas["WEBLib.Controls"].$rtti.TSizeStyle,"FWidthStyle","SetWidthStyle",4,{Default:pas["WEBLib.Controls"].TSizeStyle.ssAbsolute}),e.addProperty("OnClick",0,pas["WEBLib.Controls"].$rtti.TNotifyEvent,"FOnClick","FOnClick"),e.addProperty("OnKeyDown",0,pas["WEBLib.Controls"].$rtti.TKeyEvent,"FOnKeyDown","FOnKeyDown"),e.addProperty("OnKeyPress",0,pas["WEBLib.Controls"].$rtti.TKeyPressEvent,"FOnKeyPress","FOnKeyPress"),e.addProperty("OnKeyUp",0,pas["WEBLib.Controls"].$rtti.TKeyEvent,"FOnKeyUp","FOnKeyUp"),e.addProperty("OnMouseDown",0,pas["WEBLib.Controls"].$rtti.TMouseEvent,"FOnMouseDown","FOnMouseDown"),e.addProperty("OnMouseUp",0,pas["WEBLib.Controls"].$rtti.TMouseEvent,"FOnMouseUp","FOnMouseUp"),e.addProperty("OnMouseMove",0,pas["WEBLib.Controls"].$rtti.TMouseMoveEvent,"FOnMouseMove","FOnMouseMove"),e.addProperty("OnMouseLeave",0,pas["WEBLib.Controls"].$rtti.TNotifyEvent,"FOnMouseLeave","FOnMouseLeave"),e.addProperty("OnMouseEnter",0,pas["WEBLib.Controls"].$rtti.TNotifyEvent,"FOnMouseEnter","FOnMouseEnter"),e.addProperty("OnEnter",0,pas["WEBLib.Controls"].$rtti.TNotifyEvent,"FOnEnter","FOnEnter"),e.addProperty("OnExit",0,pas["WEBLib.Controls"].$rtti.TNotifyEvent,"FOnExit","FOnExit"),e.addProperty("OnDragDrop",0,pas["WEBLib.Controls"].$rtti.TDragDropEvent,"FOnDragDrop","FOnDragDrop"),e.addProperty("OnDragOver",0,pas["WEBLib.Controls"].$rtti.TDragOverEvent,"FOnDragOver","FOnDragOver"),e.addProperty("OnEndDrag",0,pas["WEBLib.Controls"].$rtti.TEndDragEvent,"FonEndDrag","FonEndDrag"),e.addProperty("OnStartDrag",0,pas["WEBLib.Controls"].$rtti.TStartDragEvent,"FOnStartDrag","FOnStartDrag")})),rtl.createClass(this,"TRadioButton",pas["WEBLib.Menus"].TWebCustomControl,(function(){this.$init=function(){pas["WEBLib.Menus"].TWebCustomControl.$init.call(this),this.FChecked=!1,this.FGroupName="",this.FElementButtonClassName="",this.FElementLabelClassName=""},this.CreateElement=function(){var t=null,e=null,i=null;return t=document.createElement("SPAN"),e=document.createElement("INPUT"),i=document.createElement("SPAN"),t.addEventListener("click",rtl.createSafeCallback(this,"HandleLabelClick")),e.setAttribute("TYPE","RADIO"),e.setAttribute("id",this.GetID()+"rd"),e.setAttribute("name",this.FGroupName),e.setAttribute("role","radio"),e.setAttribute("tabindex","-1"),e.addEventListener("click",rtl.createSafeCallback(this,"HandleRadioClick")),i.setAttribute("id",this.GetID()+"lbl"),i.setAttribute("value",this.GetID()),t.appendChild(e),t.appendChild(i),t},this.SetChecked=function(t){var e=null;this.FChecked=t,null!=this.GetContainer()&&null!=(e=this.GetRadioElement())&&(e.checked=t)},this.GetChecked=function(){var t=!1,e=null;return t=this.FChecked,null!=this.GetContainer()&&null!=(e=this.GetRadioElement())&&(t=e.checked),t},this.SetEnabled=function(t){var e=null;pas["WEBLib.Controls"].TControl.SetEnabled.apply(this,arguments),null!=this.GetContainer()&&null!=(e=this.GetRadioElement())&&(e.disabled=!t)},this.SetCaption=function(t){this.FCaption!==t&&(pas["WEBLib.Controls"].TCustomControl.SetCaption.call(this,t),null==this.GetContainer()||this.GetIsLinked()||(this.GetContainer().lastElementChild.innerHTML=t))},this.SetGroupName=function(t){this.FGroupName=t,this.UpdateElementData()},this.HandleLabelClick=function(t){return null!=this.GetContainer()&&this.FEnabled&&(this.GetRadioElement().checked=!0),!0,!0},this.HandleRadioClick=function(t){return this.SetFocus(),!0,!0},this.UpdateElementSize=function(){pas["WEBLib.Controls"].TControl.UpdateElementSize.call(this),null==this.GetContainer()||this.GetIsLinked()||(2!==this.FHeightStyle?this.GetContainer().firstElementChild.style.setProperty("height","100%"):this.GetContainer().firstElementChild.style.removeProperty("height"))},this.UpdateElementData=function(){var t=null;pas["WEBLib.Controls"].TControl.UpdateElementData.call(this),null!=this.GetContainer()&&(this.GetIsLinked()?this.GetElementHandle().setAttribute("name",this.FGroupName):(this.GetContainer().firstElementChild.setAttribute("name",this.FGroupName),(t=this.GetElementHandle().firstChild).disabled=!this.FEnabled),this.GetIsLinked()||(""!==this.FCaption&&(this.GetContainer().lastElementChild.innerHTML=this.FCaption),this.GetElementHandle().setAttribute("tabindex","-1"),this.FTabStop&&null!=t&&t.setAttribute("tabindex","-1")),this.FTabStop&&this.GetContainer().setAttribute("tabindex",pas.SysUtils.IntToStr(this.FTabOrder)))},this.UpdateElementVisual=function(){var e=null,i=null,s=!1,n=null;pas["WEBLib.Controls"].TCustomControl.UpdateElementVisual.call(this),null!=this.GetElementHandle()&&(this.GetIsLinked()||((e=this.GetElementHandle().firstChild).style.setProperty("margin-right","4px"),e.style.setProperty("vertical-align","middle"),e.style.setProperty("margin-top","0px"),null!=e&&(""!==this.FElementButtonClassName?e.setAttribute("class",this.FElementButtonClassName):e.removeAttribute("class")),null!=(i=this.GetElementHandle().lastElementChild)&&(""!==this.FElementLabelClassName?i.setAttribute("class",this.FElementLabelClassName):i.removeAttribute("class"))),this.FTabStop&&this.FShowFocus&&""===this.FElementClassName||this.GetElementHandle().style.setProperty("outline","none"),this.GetIsLinked()||(this.GetElementHandle().style.setProperty("user-select","none"),this.GetElementHandle().style.setProperty("white-space","normal"),0===this.FElementPosition&&(""===this.FElementButtonClassName&&(2!==this.FHeightStyle?e.style.setProperty("height","100%"):e.style.removeProperty("height"),e.style.setProperty("vertical-align","middle"),t.TRadioGroup.isPrototypeOf(this.FParent)||(e.style.setProperty("margin-top","0px"),e.style.setProperty("margin-bottom","0px"))),s=null!=(n=pas["WEBLib.Forms"].GetParentForm(this))&&1===n.FCSSLibrary,(""===this.FElementLabelClassName||s)&&((i=this.GetContainer().lastElementChild).style.setProperty("vertical-align","middle"),i.style.setProperty("min-height","100%"),i.style.setProperty("height","100%"),t.TRadioGroup.isPrototypeOf(this.FParent)||i.style.setProperty("position","absolute"),i.style.setProperty("overflow","hidden"),i.style.setProperty("display","inline-flex"),i.style.setProperty("align-items","center")))))},this.GetRadioElement=function(){return this.GetIsLinked()?this.GetElementHandle():this.GetContainer().firstElementChild},this.KeyPress=function(t){pas["WEBLib.Controls"].TControl.KeyPress.apply(this,arguments)," "===t.get()&&(this.GetRadioElement().checked=!0)},this.InitCSSLibrary=function(t){1===t&&(this.SetElementFont(1),this.SetElementClassName("form-control"),this.SetHeightStyle(2))},this.CreateInitialize=function(){pas["WEBLib.Controls"].TCustomControl.CreateInitialize.call(this),this.SetColor(-1),4 in this.FComponentState&&""===this.FCaption&&this.SetCaption(this.FName),this.FGroupName="",this.SetShowFocus(!0)},rtl.addIntf(this,pas["WEBLib.Controls"].IControl),rtl.addIntf(this,pas.System.IUnknown);var e=this.$rtti;e.addProperty("Align",2,pas["WEBLib.Controls"].$rtti.TAlign,"FAlign","SetAlign",4,{Default:pas["WEBLib.Controls"].TAlign.alNone}),e.addProperty("AlignWithMargins",2,rtl.boolean,"FAlignWithMargins","SetAlignWithMargins",4,{Default:!1}),e.addProperty("Anchors",2,pas["WEBLib.Controls"].$rtti.TAnchors,"FAnchors","SetAnchors",4,{Default:rtl.createSet(0,1)}),e.addProperty("Caption",2,rtl.string,"FCaption","SetCaption"),e.addProperty("Checked",3,rtl.boolean,"GetChecked","SetChecked",4,{Default:!1}),e.addProperty("ChildOrder",2,rtl.longint,"FChildOrder","SetChildOrderEx",4,{Default:0}),e.addProperty("Color",2,pas["WEBLib.Graphics"].$rtti.TColor,"FColor","SetColor",4,{Default:-1}),e.addProperty("DragMode",2,pas["WEBLib.Controls"].$rtti.TDragMode,"FDragMode","SetDragMode",4,{Default:pas["WEBLib.Controls"].TDragMode.dmManual}),e.addProperty("ElementClassName",2,pas["WEBLib.Controls"].$rtti.TElementClassName,"FElementClassName","SetElementClassName"),e.addProperty("ElementButtonClassName",0,pas["WEBLib.Controls"].$rtti.TElementClassName,"FElementButtonClassName","FElementButtonClassName"),e.addProperty("ElementLabelClassName",0,pas["WEBLib.Controls"].$rtti.TElementClassName,"FElementLabelClassName","FElementLabelClassName"),e.addProperty("ElementID",3,pas["WEBLib.Controls"].$rtti.TElementID,"GetID","SetID"),e.addProperty("ElementFont",2,pas["WEBLib.Controls"].$rtti.TElementFont,"FElementFont","SetElementFont",4,{Default:pas["WEBLib.Controls"].TElementFont.efProperty}),e.addProperty("ElementPosition",2,pas["WEBLib.Controls"].$rtti.TElementPosition,"FElementPosition","SetElementPosition",4,{Default:pas["WEBLib.Controls"].TElementPosition.epAbsolute}),e.addProperty("Enabled",2,rtl.boolean,"FEnabled","SetEnabled",4,{Default:!0}),e.addProperty("Font",2,pas["WEBLib.Graphics"].$rtti.TFont,"FFont","SetFont"),e.addProperty("GroupName",2,rtl.string,"FGroupName","SetGroupName"),e.addProperty("Height",3,rtl.longint,"GetHeight","SetHeight"),e.addProperty("HeightPercent",2,rtl.double,"FHeightPercent","SetHeightPercent",4,{Default:100}),e.addProperty("HeightStyle",2,pas["WEBLib.Controls"].$rtti.TSizeStyle,"FHeightStyle","SetHeightStyle",4,{Default:pas["WEBLib.Controls"].TSizeStyle.ssAbsolute}),e.addProperty("Hint",2,rtl.string,"FHint","SetHint"),e.addProperty("Left",3,rtl.longint,"GetLeft","SetLeft"),e.addProperty("ParentFont",2,rtl.boolean,"FParentFont","SetParentFont",4,{Default:!0}),e.addProperty("PopupMenu",0,pas["WEBLib.Menus"].$rtti.TPopupMenu,"FPopupMenu","FPopupMenu"),e.addProperty("Role",3,rtl.string,"GetRole","SetRole"),e.addProperty("ShowFocus",2,rtl.boolean,"FShowFocus","SetShowFocus",4,{Default:!1}),e.addProperty("ShowHint",2,rtl.boolean,"FShowHint","SetShowHint",4,{Default:!1}),e.addProperty("TabOrder",2,rtl.longint,"FTabOrder","SetTabOrder"),e.addProperty("TabStop",2,rtl.boolean,"FTabStop","SetTabStop",4,{Default:!0}),e.addProperty("Visible",2,rtl.boolean,"FVisible","SetVisible",4,{Default:!0}),e.addProperty("Width",3,rtl.longint,"GetWidth","SetWidth"),e.addProperty("WidthPercent",2,rtl.double,"FWidthPercent","SetWidthPercent",4,{Default:100}),e.addProperty("WidthStyle",2,pas["WEBLib.Controls"].$rtti.TSizeStyle,"FWidthStyle","SetWidthStyle",4,{Default:pas["WEBLib.Controls"].TSizeStyle.ssAbsolute}),e.addProperty("OnClick",0,pas["WEBLib.Controls"].$rtti.TNotifyEvent,"FOnClick","FOnClick"),e.addProperty("OnDblClick",0,pas["WEBLib.Controls"].$rtti.TNotifyEvent,"FOnDblClick","FOnDblClick"),e.addProperty("OnKeyDown",0,pas["WEBLib.Controls"].$rtti.TKeyEvent,"FOnKeyDown","FOnKeyDown"),e.addProperty("OnKeyPress",0,pas["WEBLib.Controls"].$rtti.TKeyPressEvent,"FOnKeyPress","FOnKeyPress"),e.addProperty("OnKeyUp",0,pas["WEBLib.Controls"].$rtti.TKeyEvent,"FOnKeyUp","FOnKeyUp"),e.addProperty("OnMouseDown",0,pas["WEBLib.Controls"].$rtti.TMouseEvent,"FOnMouseDown","FOnMouseDown"),e.addProperty("OnMouseUp",0,pas["WEBLib.Controls"].$rtti.TMouseEvent,"FOnMouseUp","FOnMouseUp"),e.addProperty("OnMouseMove",0,pas["WEBLib.Controls"].$rtti.TMouseMoveEvent,"FOnMouseMove","FOnMouseMove"),e.addProperty("OnMouseLeave",0,pas["WEBLib.Controls"].$rtti.TNotifyEvent,"FOnMouseLeave","FOnMouseLeave"),e.addProperty("OnMouseEnter",0,pas["WEBLib.Controls"].$rtti.TNotifyEvent,"FOnMouseEnter","FOnMouseEnter"),e.addProperty("OnEnter",0,pas["WEBLib.Controls"].$rtti.TNotifyEvent,"FOnEnter","FOnEnter"),e.addProperty("OnExit",0,pas["WEBLib.Controls"].$rtti.TNotifyEvent,"FOnExit","FOnExit"),e.addProperty("OnDragDrop",0,pas["WEBLib.Controls"].$rtti.TDragDropEvent,"FOnDragDrop","FOnDragDrop"),e.addProperty("OnDragOver",0,pas["WEBLib.Controls"].$rtti.TDragOverEvent,"FOnDragOver","FOnDragOver"),e.addProperty("OnEndDrag",0,pas["WEBLib.Controls"].$rtti.TEndDragEvent,"FonEndDrag","FonEndDrag"),e.addProperty("OnStartDrag",0,pas["WEBLib.Controls"].$rtti.TStartDragEvent,"FOnStartDrag","FOnStartDrag")})),rtl.createClass(this,"TCustomMemo",pas["WEBLib.Menus"].TWebCustomControl,(function(){this.$init=function(){pas["WEBLib.Menus"].TWebCustomControl.$init.call(this),this.FWordWrap=!1,this.FBlockChange=!1,this.FLines=null,this.FSelStart=0,this.FSelLength=0,this.FAutoSize=!1,this.FOnChange=null,this.FReadOnly=!1,this.FTextHint="",this.FHandleChangePtr=null,this.FHandlePastePtr=null,this.FHandleCutPtr=null,this.FHandleInputPtr=null,this.FHandleInvalidPtr=null,this.FWantTabs=!1,this.FAutoCompletion=0,this.FSpellCheck=!1,this.FModified=!1,this.FScrollbars=0,this.FRequiredText="",this.FRequired=!1},this.$final=function(){this.FLines=void 0,this.FOnChange=void 0,pas["WEBLib.Menus"].TWebCustomControl.$final.call(this)},this.GetText=function(){return null!=this.GetElementInputHandle()&&(this.FBlockChange=!0,this.FLines.SetTextStr(this.GetElementInputHandle().value),this.FBlockChange=!1),this.FLines.GetTextStr()},this.SetText=function(t){this.FLines.SetTextStr(t)},this.SetSelLength=function(t){this.FSelLength!==t&&(this.FSelLength=t,this.UpdateElement())},this.SetSelStart=function(t){this.FSelStart!==t&&(this.FSelStart=t,this.UpdateElement())},this.SetAutoSize=function(t){this.FAutoSize!==t&&(this.FAutoSize=t,this.UpdateElement())},this.GetElementInputHandle=function(){return this.GetContainer()},this.SetReadOnly=function(t){this.FReadOnly!==t&&(this.FReadOnly=t,this.UpdateElement())},this.GetSelLength=function(){var t=0;return t=-1,null!=this.GetElementInputHandle()&&(t=this.GetElementInputHandle().selectionEnd-this.GetElementInputHandle().selectionStart),t},this.GetSelStart=function(){var t=0;return t=-1,null!=this.GetElementInputHandle()&&(t=this.GetElementInputHandle().selectionStart),t},this.SetTextHint=function(t){this.FTextHint!==t&&(this.FTextHint=t,this.UpdateElement())},this.SetSpellCheck=function(t){this.FSpellCheck!==t&&(this.FSpellCheck=t,this.UpdateElement())},this.SetRequired=function(t){this.FRequired!==t&&(this.FRequired=t,this.UpdateElement())},this.IsInputControl=function(){return!0,!0},this.HandleDoKeyDown=function(t){var e=!1,i=null,s=null;if(s=t,9===this.GetKeyCode(s.key,!0)&&this.FWantTabs){var n=(i=this.GetElementInputHandle()).selectionStart,r=i.selectionEnd;i.value=i.value.substring(0,n)+"\t"+i.value.substring(r),i.selectionStart=i.selectionEnd=n+1,s.stopPropagation(),s.preventDefault()}else pas["WEBLib.Controls"].TControl.HandleDoKeyDown.apply(this,arguments);return e},this.CreateElement=function(){return document.createElement("TEXTAREA")},this.DoHandlePaste=function(t){var e="",i=!1;i=!1;var s=t.clipboardData||window.clipboardData;return s&&(e=s.getData("Text"),i=!0),i&&!this.CanPaste(e)&&(t.preventDefault(),t.stopPropagation()),!1,!1},this.DoHandleCut=function(t){return this.CanCut()||(t.preventDefault(),t.stopPropagation()),!1,!1},this.DoHandleInput=function(t){return this.GetText(),this.Change(),this.FAutoSize&&this.DoAutoSize(),!0,!0},this.DoHandleChange=function(t){return this.FModified=!0,this.Change(),""!==this.FRequiredText&&this.GetElementInputHandle().setCustomValidity(""),!0,!0},this.DoHandleInvalid=function(t){return this.GetElementInputHandle().setCustomValidity(this.FRequiredText),!0,!0},this.IsReadOnly=function(){return this.FReadOnly},this.GetDisplayText=function(){return this.FLines.GetTextStr()},this.DoAutoSize=function(){var t,e=0;this.GetElementInputHandle().style.setProperty("overflow","hidden"),this.GetElementInputHandle().style.setProperty("height","auto"),t=this.GetElementInputHandle(),e=t.scrollHeight,this.GetElementInputHandle().style.setProperty("height",pas.SysUtils.TIntegerHelper.ToString$1.call({get:function(){return e},set:function(t){e=t}})+"px")},this.BindEvents=function(){pas["WEBLib.Controls"].TCustomControl.BindEvents.call(this),null!=this.GetElementInputHandle()&&(this.GetElementInputHandle().addEventListener("input",this.FHandleInputPtr),this.GetElementInputHandle().addEventListener("change",this.FHandleChangePtr),this.GetElementInputHandle().addEventListener("paste",this.FHandlePastePtr),this.GetElementInputHandle().addEventListener("cut",this.FHandleCutPtr),this.GetElementInputHandle().addEventListener("invalid",this.FHandleInvalidPtr))},this.UnbindEvents=function(){pas["WEBLib.Controls"].TControl.UnbindEvents.call(this),null!=this.GetElementInputHandle()&&(this.GetElementInputHandle().removeEventListener("input",this.FHandleInputPtr),this.GetElementInputHandle().removeEventListener("change",this.FHandleChangePtr),this.GetElementInputHandle().removeEventListener("paste",this.FHandlePastePtr),this.GetElementInputHandle().removeEventListener("cut",this.FHandleCutPtr),this.GetElementInputHandle().removeEventListener("invalid",this.FHandleInvalidPtr))},this.UpdateElementData=function(){var e=0,i=0,s=null;pas["WEBLib.Controls"].TControl.UpdateElementData.call(this),null==this.GetElementInputHandle()||this.FBlockChange||(this.FRequired?this.GetElementInputHandle().setAttribute("required",""):this.GetIsLinked()||this.GetElementInputHandle().removeAttribute("required"),this.GetElementInputHandle().value=this.GetDisplayText(),"TEXTAREA"===this.GetElementInputHandle().tagName&&this.GetElementInputHandle().setSelectionRange(this.GetSelStart(),this.GetSelStart()+this.GetSelLength()),this.GetIsLinked()||this.GetElementInputHandle().style.setProperty("resize","none"),this.GetElementInputHandle().readOnly=this.IsReadOnly(),""!==this.FTextHint&&(this.GetElementInputHandle().placeholder=this.FTextHint),this.GetIsLinked()||(51===this.FAutoCompletion?(this.GetElementInputHandle().setAttribute("autocomplete","none"),this.GetIsLinked()||this.GetElementInputHandle().removeAttribute("name")):0!==this.FAutoCompletion?(this.GetElementInputHandle().setAttribute("autocomplete","on"),this.GetIsLinked()||this.GetElementInputHandle().setAttribute("name",t.GetAutoCompletionName(this.FAutoCompletion))):(this.GetElementInputHandle().removeAttribute("autocomplete"),this.GetIsLinked()||this.GetElementInputHandle().removeAttribute("name")),e=this.FSelStart,i=this.FSelStart+this.FSelLength,s=this.GetElementInputHandle(),setTimeout((function(){s.setSelectionRange(e,i)}),1)))},this.UpdateElementVisual=function(){if(pas["WEBLib.Controls"].TCustomControl.UpdateElementVisual.call(this),null!=this.GetElementInputHandle()&&!this.FBlockChange&&!this.GetIsLinked()){if(this.FAutoSize)this.GetElementInputHandle().style.setProperty("overflow","hidden"),this.GetElementInputHandle().style.setProperty("height","auto");else{this.GetElementInputHandle().style.setProperty("overflow","auto");var t=this.FScrollbars;0===t?this.GetElementInputHandle().style.setProperty("overflow","hidden"):2===t?(this.GetElementInputHandle().style.removeProperty("overflow"),this.GetElementInputHandle().style.setProperty("overflow-x","hidden"),this.GetElementInputHandle().style.setProperty("overflow-y","auto")):1===t?(this.GetElementInputHandle().style.removeProperty("overflow"),this.GetElementInputHandle().style.setProperty("overflow-x","auto"),this.GetElementInputHandle().style.setProperty("overflow-y","hidden")):3===t&&this.GetElementInputHandle().style.setProperty("overflow","auto")}this.GetElementInputHandle().style.setProperty("margin","0"),-1!==this.FColor&&16711422!==this.FColor?this.GetElementInputHandle().style.setProperty("background-color",pas["WEBLib.Graphics"].ColorToHTML(this.FColor)):this.GetElementInputHandle().style.removeProperty("background-color"),this.FSpellCheck?this.GetElementInputHandle().hasAttribute("spellcheck")&&this.GetElementInputHandle().removeAttribute("spellcheck"):this.GetElementInputHandle().setAttribute("spellcheck","false"),this.FWordWrap?this.GetElementInputHandle().hasAttribute("wrap")&&this.GetElementInputHandle().removeAttribute("wrap"):this.GetElementInputHandle().setAttribute("wrap","off")}},this.UpdateElementSize=function(){pas["WEBLib.Controls"].TControl.UpdateElementSize.call(this),this.FAutoSize&&this.DoAutoSize()},this.SetLines=function(t){this.FLines.Assign(t)},this.ClearMethodPointers=function(){pas["WEBLib.Controls"].TControl.ClearMethodPointers.call(this),this.FHandleChangePtr=null,this.FHandleInputPtr=null,this.FHandlePastePtr=null,this.FHandleCutPtr=null,this.FHandleInvalidPtr=null},this.GetMethodPointers=function(){pas["WEBLib.Controls"].TControl.GetMethodPointers.call(this),this.FHandleChangePtr=rtl.createCallback(this,"DoHandleChange"),this.FHandleInputPtr=rtl.createCallback(this,"DoHandleInput"),this.FHandlePastePtr=rtl.createCallback(this,"DoHandlePaste"),this.FHandleCutPtr=rtl.createCallback(this,"DoHandleCut"),this.FHandleInvalidPtr=rtl.createCallback(this,"DoHandleInvalid")},this.DoLinesChange=function(t){null==this.GetElementInputHandle()||this.FBlockChange||(this.GetElementInputHandle().value=this.GetDisplayText(),this.GetElementInputHandle().readOnly=this.IsReadOnly())},this.CanPaste=function(t){return!0,!0},this.CanCut=function(){return!0,!0},this.Change=function(){null!=this.FOnChange&&this.FOnChange(this)},this.InitCSSLibrary=function(t){1===t&&(this.SetElementFont(1),this.SetElementClassName("form-control"))},this.CreateInitialize=function(){pas["WEBLib.Controls"].TCustomControl.CreateInitialize.call(this),this.FSpellCheck=!0,this.FLines=pas.Classes.TStringList.$create("Create$1"),this.FLines.SetSkipLastLineBreak(!0),this.FLines.FOnChange=rtl.createCallback(this,"DoLinesChange"),4 in this.FComponentState&&(this.SetWidth(400),this.SetHeight(300)),this.SetShowFocus(!0),this.SetClipChildren(!1),this.FWantTabs=!1,this.FAutoSize=!1,this.FAutoCompletion=0,this.FWordWrap=!0,this.FScrollbars=3,this.FNoUserSelect=!1},this.Destroy=function(){rtl.free(this,"FLines"),pas["WEBLib.Controls"].TCustomControl.Destroy.call(this)},this.Clear=function(){this.FLines.Clear()},rtl.addIntf(this,pas["WEBLib.Controls"].IControl),rtl.addIntf(this,pas.System.IUnknown)})),rtl.createClass(this,"TMemo",this.TCustomMemo,(function(){rtl.addIntf(this,pas["WEBLib.Controls"].IControl),rtl.addIntf(this,pas.System.IUnknown);var t=this.$rtti;t.addProperty("Align",2,pas["WEBLib.Controls"].$rtti.TAlign,"FAlign","SetAlign",4,{Default:pas["WEBLib.Controls"].TAlign.alNone}),t.addProperty("AlignWithMargins",2,rtl.boolean,"FAlignWithMargins","SetAlignWithMargins",4,{Default:!1}),t.addProperty("Anchors",2,pas["WEBLib.Controls"].$rtti.TAnchors,"FAnchors","SetAnchors",4,{Default:rtl.createSet(0,1)}),t.addProperty("AutoSize",2,rtl.boolean,"FAutoSize","SetAutoSize"),t.addProperty("BiDiMode",2,pas["WEBLib.Controls"].$rtti.TBiDiMode,"FBiDiMode","SetBiDiMode",4,{Default:pas["WEBLib.Controls"].TBiDiMode.bdLeftToRight}),t.addProperty("BorderStyle",2,pas["WEBLib.Controls"].$rtti.TBorderStyle,"FBorderStyle","SetBorderStyle",4,{Default:pas["WEBLib.Controls"].TBorderStyle.bsSingle}),t.addProperty("ChildOrder",2,rtl.longint,"FChildOrder","SetChildOrderEx",4,{Default:0}),t.addProperty("Color",2,pas["WEBLib.Graphics"].$rtti.TColor,"FColor","SetColor"),t.addProperty("DragMode",2,pas["WEBLib.Controls"].$rtti.TDragMode,"FDragMode","SetDragMode",4,{Default:pas["WEBLib.Controls"].TDragMode.dmManual}),t.addProperty("ElementClassName",2,pas["WEBLib.Controls"].$rtti.TElementClassName,"FElementClassName","SetElementClassName"),t.addProperty("ElementID",3,pas["WEBLib.Controls"].$rtti.TElementID,"GetID","SetID"),t.addProperty("ElementFont",2,pas["WEBLib.Controls"].$rtti.TElementFont,"FElementFont","SetElementFont",4,{Default:pas["WEBLib.Controls"].TElementFont.efProperty}),t.addProperty("ElementPosition",2,pas["WEBLib.Controls"].$rtti.TElementPosition,"FElementPosition","SetElementPosition",4,{Default:pas["WEBLib.Controls"].TElementPosition.epAbsolute}),t.addProperty("Enabled",2,rtl.boolean,"FEnabled","SetEnabled",4,{Default:!0}),t.addProperty("Font",2,pas["WEBLib.Graphics"].$rtti.TFont,"FFont","SetFont"),t.addProperty("Height",3,rtl.longint,"GetHeight","SetHeight"),t.addProperty("HeightPercent",2,rtl.double,"FHeightPercent","SetHeightPercent",4,{Default:100}),t.addProperty("HeightStyle",2,pas["WEBLib.Controls"].$rtti.TSizeStyle,"FHeightStyle","SetHeightStyle",4,{Default:pas["WEBLib.Controls"].TSizeStyle.ssAbsolute}),t.addProperty("Hint",2,rtl.string,"FHint","SetHint"),t.addProperty("Left",3,rtl.longint,"GetLeft","SetLeft"),t.addProperty("Lines",2,pas.Classes.$rtti.TStrings,"FLines","SetLines"),t.addProperty("Margins",2,pas["WEBLib.Controls"].$rtti.TMargins,"FMargins","SetMargins"),t.addProperty("ParentColor",2,rtl.boolean,"FParentColor","SetParentColor",4,{Default:!1}),t.addProperty("ParentFont",2,rtl.boolean,"FParentFont","SetParentFont",4,{Default:!0}),t.addProperty("PopupMenu",0,pas["WEBLib.Menus"].$rtti.TPopupMenu,"FPopupMenu","FPopupMenu"),t.addProperty("ReadOnly",2,rtl.boolean,"FReadOnly","SetReadOnly"),t.addProperty("Required",2,rtl.boolean,"FRequired","SetRequired",4,{Default:!1}),t.addProperty("RequiredText",0,rtl.string,"FRequiredText","FRequiredText"),t.addProperty("Role",3,rtl.string,"GetRole","SetRole"),t.addProperty("SelStart",3,rtl.longint,"GetSelStart","SetSelStart"),t.addProperty("SelLength",3,rtl.longint,"GetSelLength","SetSelLength"),t.addProperty("ShowFocus",2,rtl.boolean,"FShowFocus","SetShowFocus",4,{Default:!1}),t.addProperty("ShowHint",2,rtl.boolean,"FShowHint","SetShowHint",4,{Default:!1}),t.addProperty("Spellcheck",2,rtl.boolean,"FSpellCheck","SetSpellCheck",4,{Default:!0}),t.addProperty("TabOrder",2,rtl.longint,"FTabOrder","SetTabOrder"),t.addProperty("TabStop",2,rtl.boolean,"FTabStop","SetTabStop",4,{Default:!0}),t.addProperty("TextDirection",0,pas["WEBLib.Controls"].$rtti.TTextDirection,"FTextDirection","FTextDirection",4,{Default:pas["WEBLib.Controls"].TTextDirection.tdDefault}),t.addProperty("Top",3,rtl.longint,"GetTop","SetTop"),t.addProperty("Visible",2,rtl.boolean,"FVisible","SetVisible",4,{Default:!0}),t.addProperty("Width",3,rtl.longint,"GetWidth","SetWidth"),t.addProperty("WidthPercent",2,rtl.double,"FWidthPercent","SetWidthPercent",4,{Default:100}),t.addProperty("WidthStyle",2,pas["WEBLib.Controls"].$rtti.TSizeStyle,"FWidthStyle","SetWidthStyle",4,{Default:pas["WEBLib.Controls"].TSizeStyle.ssAbsolute}),t.addProperty("OnChange",0,pas["WEBLib.Controls"].$rtti.TNotifyEvent,"FOnChange","FOnChange"),t.addProperty("OnClick",0,pas["WEBLib.Controls"].$rtti.TNotifyEvent,"FOnClick","FOnClick"),t.addProperty("OnDblClick",0,pas["WEBLib.Controls"].$rtti.TNotifyEvent,"FOnDblClick","FOnDblClick"),t.addProperty("OnKeyDown",0,pas["WEBLib.Controls"].$rtti.TKeyEvent,"FOnKeyDown","FOnKeyDown"),t.addProperty("OnKeyPress",0,pas["WEBLib.Controls"].$rtti.TKeyPressEvent,"FOnKeyPress","FOnKeyPress"),t.addProperty("OnKeyUp",0,pas["WEBLib.Controls"].$rtti.TKeyEvent,"FOnKeyUp","FOnKeyUp"),t.addProperty("OnMouseDown",0,pas["WEBLib.Controls"].$rtti.TMouseEvent,"FOnMouseDown","FOnMouseDown"),t.addProperty("OnMouseUp",0,pas["WEBLib.Controls"].$rtti.TMouseEvent,"FOnMouseUp","FOnMouseUp"),t.addProperty("OnMouseMove",0,pas["WEBLib.Controls"].$rtti.TMouseMoveEvent,"FOnMouseMove","FOnMouseMove"),t.addProperty("OnMouseLeave",0,pas["WEBLib.Controls"].$rtti.TNotifyEvent,"FOnMouseLeave","FOnMouseLeave"),t.addProperty("OnMouseEnter",0,pas["WEBLib.Controls"].$rtti.TNotifyEvent,"FOnMouseEnter","FOnMouseEnter"),t.addProperty("OnMouseWheel",0,pas["WEBLib.Controls"].$rtti.TMouseWheelEvent,"FOnMouseWheel","FOnMouseWheel"),t.addProperty("OnEnter",0,pas["WEBLib.Controls"].$rtti.TNotifyEvent,"FOnEnter","FOnEnter"),t.addProperty("OnExit",0,pas["WEBLib.Controls"].$rtti.TNotifyEvent,"FOnExit","FOnExit"),t.addProperty("OnDragDrop",0,pas["WEBLib.Controls"].$rtti.TDragDropEvent,"FOnDragDrop","FOnDragDrop"),t.addProperty("OnDragOver",0,pas["WEBLib.Controls"].$rtti.TDragOverEvent,"FOnDragOver","FOnDragOver"),t.addProperty("OnEndDrag",0,pas["WEBLib.Controls"].$rtti.TEndDragEvent,"FonEndDrag","FonEndDrag"),t.addProperty("OnStartDrag",0,pas["WEBLib.Controls"].$rtti.TStartDragEvent,"FOnStartDrag","FOnStartDrag")})),rtl.createClass(this,"TControlGroup",pas["WEBLib.Menus"].TWebCustomControl,(function(){this.$init=function(){pas["WEBLib.Menus"].TWebCustomControl.$init.call(this),this.FControls$1=null,this.FOldCount=0,this.FColumns=0,this.FItems=null,this.FOnChange=null,this.FElementButtonClassName="",this.FElementLabelClassName="",this.FElementGroupClassName="",this.FControlPosition=0,this.FElementLegendClassName=""},this.$final=function(){this.FControls$1=void 0,this.FItems=void 0,this.FOnChange=void 0,pas["WEBLib.Menus"].TWebCustomControl.$final.call(this)},this.SetControlPosition=function(t){this.FControlPosition!==t&&(this.FControlPosition=t,this.DoUpdateList())},this.CreateElement=function(){var t=null,e=null;return t=document.createElement("FIELDSET"),e=document.createElement("LEGEND"),t.appendChild(e),e.innerHTML=this.FCaption,e.setAttribute("class","w-auto "+this.FElementLegendClassName),""===this.FCaption?e.style.setProperty("display","none"):e.style.setProperty("display",""),e.style.setProperty("float","none"),t.style.setProperty("display","inline-block"),t.style.setProperty("-webkit-padding-before","0px"),t.style.setProperty("-webkit-padding-after","0px"),t.style.setProperty("-webkit-padding-end","0px"),t.style.setProperty("-webkit-padding-start","0px"),t.style.setProperty("border","1px"),t},this.DoHandleClick=function(t){this.Change()},this.DoItemsChange=function(t){this.DoUpdateList()},this.DoControlClick=function(t){this.DoHandleClick(rtl.as(t,pas["WEBLib.Controls"].TCustomControl))},this.SetCaption=function(t){var e=null;pas["WEBLib.Controls"].TCustomControl.SetCaption.call(this,t),null!=this.GetContainer()&&null!=(e=this.GetContainer().firstElementChild)&&(e.innerHTML=t,""===t?e.style.setProperty("display","none"):e.style.setProperty("display",""))},this.SetColumns=function(t){this.FColumns>0&&this.FColumns!==t&&(this.FColumns=t,this.DoUpdateList())},this.SetItems=function(t){this.FItems.Assign(t),this.DoUpdateList()},this.DoUpdateList=function(){var e,i,s=0,n="",r=null,a=0,o=0,l=0,h=0,d=null,u=[];if(null!=this.GetContainer()&&0!==this.FItems.GetCount()){i=Math.round(2.5*this.FFont.FSize),e=rtl.trunc(this.GetWidth()/this.FColumns),a=""!==this.FCaption?this.FFont.FSize:4,o=0,l=0,this.FOldCount>0&&(u=rtl.arraySetLength(u,!1,this.FOldCount));for(var c=0,F=this.FOldCount-1;c<=F;c++)s=c,r=rtl.getObject(this.FControls$1.Get(s)),t.TRadioButton.isPrototypeOf(r)&&(u[s]=rtl.as(r,t.TRadioButton).GetChecked()),t.TCheckBox.isPrototypeOf(r)&&(u[s]=rtl.as(r,t.TCheckBox).GetChecked()),r=rtl.freeLoc(r);for(this.FControls$1.Clear();this.GetContainer().childElementCount>0;)this.GetContainer().removeChild(this.GetContainer().firstChild);""!==this.FCaption&&(d=document.createElement("LEGEND"),this.GetElementHandle().appendChild(d),d.innerHTML=this.FCaption,d.setAttribute("class","w-auto "+this.FElementLegendClassName),d.style.setProperty("float","none"),pas["WEBLib.Controls"].SetHTMLElementFont(d,this.FFont,!(0===this.FElementFont&&""===this.FElementClassName))),""!==this.FElementGroupClassName?this.GetElementHandle().setAttribute("class",this.FElementGroupClassName):this.GetElementHandle().setAttribute("class","border p-2"),this.GetContainer().style.setProperty("margin","0px");for(var p=0,S=this.FItems.GetCount()-1;p<=S;p++)s=p,h=a+l*i,n=this.FItems.Get(s),(r=this.CreateGroupControl(4+o*e,h,s,n,this.FControlPosition,this.GetGroupControlState(s),!0)).SetEnabled(this.FEnabled),this.FControls$1.Add(r),s<=this.FOldCount&&(t.TRadioButton.isPrototypeOf(r)&&rtl.as(r,t.TRadioButton).SetChecked(u[s]),t.TCheckBox.isPrototypeOf(r)&&rtl.as(r,t.TCheckBox).SetChecked(u[s])),this.GetIsLinked()||(r.GetContainer().style.setProperty("float","left"),r.GetContainer().style.setProperty("width",pas.SysUtils.IntToStr(pas.System.Trunc(100/this.FColumns)-5)+"%"),this.FTabStop?(r.GetContainer().setAttribute("tabindex",pas.SysUtils.TIntegerHelper.ToString$1.call({p:this,get:function(){return this.p.FTabOrder},set:function(t){this.p.FTabOrder=t}})),this.GetContainer().setAttribute("tabindex","-1")):r.GetContainer().setAttribute("tabindex","-1")),s%this.FColumns==0&&r.GetContainer().style.setProperty("clear","left"),this.GetElementHandle().appendChild(r.GetContainer()),o<this.FColumns-1?o+=1:(o=0,l+=1);this.FOldCount=this.FItems.GetCount()}},this.Change=function(){null!=this.FOnChange&&this.FOnChange(this)},this.Loaded=function(){pas["WEBLib.Controls"].TCustomControl.Loaded.call(this),this.DoUpdateList()},this.FontChanged=function(){pas["WEBLib.Controls"].TControl.FontChanged.call(this),this.DoUpdateList()},this.CreateGroupControl=function(t,e,i,s,n,r,a){return null,null},this.GetGroupControlState=function(t){return!1,!1},this.GetGroupControl=function(t){return rtl.getObject(this.FControls$1.Get(t))},this.SetEnabled=function(t){var e=0;pas["WEBLib.Controls"].TControl.SetEnabled.apply(this,arguments);for(var i=0,s=this.FControls$1.GetCount()-1;i<=s;i++)e=i,rtl.getObject(this.FControls$1.Get(e)).SetEnabled(t)},this.CreateInitialize=function(){pas["WEBLib.Controls"].TCustomControl.CreateInitialize.call(this),this.FColumns=1,this.FControls$1=pas.Classes.TList.$create("Create$1"),this.FItems=pas.Classes.TStringList.$create("Create$1"),this.FItems.FOnChange=rtl.createCallback(this,"DoItemsChange"),this.FOldCount=-1,this.FControlPosition=0,4 in this.FComponentState&&(this.SetWidth(200),this.SetHeight(200))},this.Destroy=function(){rtl.free(this,"FControls$1"),rtl.free(this,"FItems"),pas["WEBLib.Controls"].TCustomControl.Destroy.call(this)},this.EndUpdate=function(){pas["WEBLib.Controls"].TCustomControl.EndUpdate.call(this),this.DoUpdateList()},this.SetHeight=function(t){pas["WEBLib.Controls"].TControl.SetHeight.apply(this,arguments),this.DoUpdateList()},this.SetWidth=function(t){pas["WEBLib.Controls"].TControl.SetWidth.apply(this,arguments),this.DoUpdateList()},rtl.addIntf(this,pas["WEBLib.Controls"].IControl),rtl.addIntf(this,pas.System.IUnknown);var e=this.$rtti;e.addProperty("Align",2,pas["WEBLib.Controls"].$rtti.TAlign,"FAlign","SetAlign",4,{Default:pas["WEBLib.Controls"].TAlign.alNone}),e.addProperty("AlignWithMargins",2,rtl.boolean,"FAlignWithMargins","SetAlignWithMargins",4,{Default:!1}),e.addProperty("Anchors",2,pas["WEBLib.Controls"].$rtti.TAnchors,"FAnchors","SetAnchors",4,{Default:rtl.createSet(0,1)}),e.addProperty("Caption",2,rtl.string,"FCaption","SetCaption"),e.addProperty("ChildOrder",2,rtl.longint,"FChildOrder","SetChildOrderEx",4,{Default:0}),e.addProperty("Columns",2,rtl.longint,"FColumns","SetColumns"),e.addProperty("ControlPosition",2,pas["WEBLib.Controls"].$rtti.TElementPosition,"FControlPosition","SetControlPosition",4,{Default:pas["WEBLib.Controls"].TElementPosition.epAbsolute}),e.addProperty("DragMode",2,pas["WEBLib.Controls"].$rtti.TDragMode,"FDragMode","SetDragMode",4,{Default:pas["WEBLib.Controls"].TDragMode.dmManual}),e.addProperty("ElementClassName",2,pas["WEBLib.Controls"].$rtti.TElementClassName,"FElementClassName","SetElementClassName"),e.addProperty("ElementButtonClassName",0,pas["WEBLib.Controls"].$rtti.TElementClassName,"FElementButtonClassName","FElementButtonClassName"),e.addProperty("ElementGroupClassName",0,pas["WEBLib.Controls"].$rtti.TElementClassName,"FElementGroupClassName","FElementGroupClassName"),e.addProperty("ElementLabelClassName",0,pas["WEBLib.Controls"].$rtti.TElementClassName,"FElementLabelClassName","FElementLabelClassName"),e.addProperty("ElementLegendClassName",0,pas["WEBLib.Controls"].$rtti.TElementClassName,"FElementLegendClassName","FElementLegendClassName"),e.addProperty("ElementID",3,pas["WEBLib.Controls"].$rtti.TElementID,"GetID","SetID"),e.addProperty("ElementFont",2,pas["WEBLib.Controls"].$rtti.TElementFont,"FElementFont","SetElementFont",4,{Default:pas["WEBLib.Controls"].TElementFont.efProperty}),e.addProperty("ElementPosition",2,pas["WEBLib.Controls"].$rtti.TElementPosition,"FElementPosition","SetElementPosition",4,{Default:pas["WEBLib.Controls"].TElementPosition.epAbsolute}),e.addProperty("Enabled",2,rtl.boolean,"FEnabled","SetEnabled",4,{Default:!0}),e.addProperty("Font",2,pas["WEBLib.Graphics"].$rtti.TFont,"FFont","SetFont"),e.addProperty("Height",3,rtl.longint,"GetHeight","SetHeight"),e.addProperty("HeightPercent",2,rtl.double,"FHeightPercent","SetHeightPercent",4,{Default:100}),e.addProperty("HeightStyle",2,pas["WEBLib.Controls"].$rtti.TSizeStyle,"FHeightStyle","SetHeightStyle",4,{Default:pas["WEBLib.Controls"].TSizeStyle.ssAbsolute}),e.addProperty("Items",2,pas.Classes.$rtti.TStrings,"FItems","SetItems"),e.addProperty("Margins",2,pas["WEBLib.Controls"].$rtti.TMargins,"FMargins","SetMargins"),e.addProperty("ParentFont",2,rtl.boolean,"FParentFont","SetParentFont",4,{Default:!0}),e.addProperty("PopupMenu",0,pas["WEBLib.Menus"].$rtti.TPopupMenu,"FPopupMenu","FPopupMenu"),e.addProperty("Role",3,rtl.string,"GetRole","SetRole"),e.addProperty("TabStop",2,rtl.boolean,"FTabStop","SetTabStop",4,{Default:!0}),e.addProperty("TabOrder",2,rtl.longint,"FTabOrder","SetTabOrder"),e.addProperty("Visible",2,rtl.boolean,"FVisible","SetVisible",4,{Default:!0}),e.addProperty("Width",3,rtl.longint,"GetWidth","SetWidth"),e.addProperty("WidthPercent",2,rtl.double,"FWidthPercent","SetWidthPercent",4,{Default:100}),e.addProperty("WidthStyle",2,pas["WEBLib.Controls"].$rtti.TSizeStyle,"FWidthStyle","SetWidthStyle",4,{Default:pas["WEBLib.Controls"].TSizeStyle.ssAbsolute}),e.addProperty("OnChange",0,pas["WEBLib.Controls"].$rtti.TNotifyEvent,"FOnChange","FOnChange"),e.addProperty("OnDragDrop",0,pas["WEBLib.Controls"].$rtti.TDragDropEvent,"FOnDragDrop","FOnDragDrop"),e.addProperty("OnDragOver",0,pas["WEBLib.Controls"].$rtti.TDragOverEvent,"FOnDragOver","FOnDragOver"),e.addProperty("OnEndDrag",0,pas["WEBLib.Controls"].$rtti.TEndDragEvent,"FonEndDrag","FonEndDrag"),e.addProperty("OnStartDrag",0,pas["WEBLib.Controls"].$rtti.TStartDragEvent,"FOnStartDrag","FOnStartDrag")})),rtl.createClass(this,"TRadioGroup",this.TControlGroup,(function(){this.$init=function(){t.TControlGroup.$init.call(this),this.FItemIndex=0,this.FOldItemIndex=0},this.DoHandleClick=function(t){this.GetItemIndex()!==this.FOldItemIndex&&(this.Change(),this.FOldItemIndex=this.GetItemIndex())},this.GetItemIndex=function(){var t=0,e=null,i=0;t=this.FItemIndex;for(var s=0,n=this.FItems.GetCount()-1;s<=n;s++)i=s,null!=(e=document.getElementById(this.GetID()+pas.SysUtils.IntToStr(i)+"rd"))&&e.checked&&(t=i);return t},this.SetItemIndex=function(t){var e=null;-1===t&&this.GetItemIndex()>=0?(null!=(e=document.getElementById(this.GetID()+pas.SysUtils.IntToStr(this.GetItemIndex())+"rd"))&&(e.checked=!1),this.FItemIndex=-1):(this.FItemIndex=t,t>=0&&t<this.FItems.GetCount()&&null!=(e=document.getElementById(this.GetID()+pas.SysUtils.IntToStr(t)+"rd"))&&(e.checked=!0))},this.CreateGroupControl=function(e,i,s,n,r,a,o){var l=null,h="";return""===(h=this.GetID())&&(h=this.FName),(l=t.TRadioButton.$create("Create$2",[h+pas.SysUtils.IntToStr(s)])).SetElementPosition(r),l.SetElementFont(this.FElementFont),l.SetElementClassName(this.FElementClassName),l.FElementButtonClassName=this.FElementButtonClassName,l.FElementLabelClassName=this.FElementLabelClassName,l.SetHeightStyle(2),l.SetParentFont(!1),l.FFont.Assign(this.FFont),l.SetParent(this),l.SetCaption(n),l.SetGroupName(h),l.SetTop(i),l.SetLeft(e),l.SetWidthStyle(2),l.SetWidthPercent(100),l.FOnClick=rtl.createCallback(this,"DoControlClick"),l.SetChecked(a),l.SetEnabled(o),l.FTag$1=s,l.SetTabStop(!0),l},this.GetGroupControlState=function(t){return t===this.FItemIndex},this.CreateInitialize=function(){t.TControlGroup.CreateInitialize.call(this),this.FItemIndex=-1,this.FOldItemIndex=-2},this.SetFocus=function(){var t=0,e=null;0!==this.FItems.GetCount()&&((t=this.GetItemIndex())<0&&(t=0),null!=(e=this.GetGroupControl(t))&&e.SetFocus())},rtl.addIntf(this,pas["WEBLib.Controls"].IControl),rtl.addIntf(this,pas.System.IUnknown),this.$rtti.addProperty("ItemIndex",3,rtl.longint,"GetItemIndex","SetItemIndex")})),this.$rtti.$MethodVar("TCheckClickEvent",{procsig:rtl.newTIProcSig([["Sender",pas.System.$rtti.TObject],["AIndex",rtl.longint]]),methodkind:0}),rtl.createClass(this,"TCheckGroup",this.TControlGroup,(function(){this.$init=function(){t.TControlGroup.$init.call(this),this.FOnCheckClick=null},this.$final=function(){this.FOnCheckClick=void 0,t.TControlGroup.$final.call(this)},this.DoHandleClick=function(e){t.TControlGroup.DoHandleClick.apply(this,arguments),null!=this.FOnCheckClick&&this.FOnCheckClick(this,e.FTag$1)},this.CreateGroupControl=function(e,i,s,n,r,a,o){var l=null,h="";return""===(h=this.GetID())&&(h=this.FName),(l=t.TCheckBox.$create("Create$2",[h+pas.SysUtils.IntToStr(s)])).SetCaption(n),l.SetElementPosition(r),l.SetElementFont(this.FElementFont),l.SetElementClassName(this.FElementClassName),l.FElementButtonClassName=this.FElementButtonClassName,l.FElementLabelClassName=this.FElementLabelClassName,l.SetParentFont(!1),l.FFont.Assign(this.FFont),l.SetParent(this),l.SetTop(i),l.SetLeft(e),l.SetWidthStyle(0),l.SetWidthPercent(100),l.SetHeightStyle(2),l.FOnCheckClick=rtl.createCallback(this,"DoControlClick"),l.SetChecked(a),l.SetEnabled(o),l.FTag$1=s,l.SetTabStop(!0),l},this.GetGroupControlState=function(t){return!1,!1},this.CreateInitialize=function(){t.TControlGroup.CreateInitialize.call(this)},this.SetFocus=function(){var t=null;this.FItems.GetCount()>0&&null!=(t=this.GetGroupControl(0))&&t.SetFocus()},rtl.addIntf(this,pas["WEBLib.Controls"].IControl),rtl.addIntf(this,pas.System.IUnknown),this.$rtti.addProperty("OnCheckClick",0,t.$rtti.TCheckClickEvent,"FOnCheckClick","FOnCheckClick")})),this.GetAutoCompletionName=function(t){var e="";return 0===t?e="":1===t?e="honorific-prefix":2===t?e="given-name":3===t?e="additional-name":4===t?e="family-name":5===t?e="honorific-suffix":6===t?e="nickname":7===t?e="email":8===t?e="username":9===t?e="new-password":10===t?e="current-password":11===t?e="organization-title":12===t?e="organization":13===t?e="street-address":14===t?e="address-line1":15===t?e="address-line2":16===t?e="address-line3":17===t?e="address-level1":18===t?e="address-level2":19===t?e="address-level3":20===t?e="address-level4":21===t?e="country":22===t?e="country-name":23===t?e="postal-code":24===t?e="cc-name":25===t?e="cc-given-name":26===t?e="cc-additional-name":27===t?e="cc-family-name":28===t?e="cc-number":29===t?e="cc-exp":30===t?e="cc-exp-month":31===t?e="cc-exp-year":32===t?e="cc-csc":33===t?e="cc-type":34===t?e="transaction-currency":35===t?e="transaction-amount":36===t?e="language":37===t?e="bday":38===t?e="bday-day":39===t?e="bday-month":40===t?e="bday-year":41===t?e="sex":42===t?e="tel":43===t?e="tel-country-code":44===t?e="tel-national":45===t?e="tel-area-code":46===t?e="tel-local":47===t?e="tel-extension":48===t?e="impp":49===t?e="url":50===t?e="photo":52===t&&(e="nope"),e}})),rtl.module("mpoView.ErrorPage",["System","SysUtils","Classes","WEBLib.Graphics","WEBLib.Controls","WEBLib.Forms","WEBLib.Dialogs","WEBLib.Controls","WEBLib.StdCtrls","XData.Web.Connection","WEBLib.StdCtrls"],(function(){"use strict";var t=this;rtl.createClass(this,"TFViewErrorPage",pas["WEBLib.Forms"].TForm,(function(){this.$init=function(){pas["WEBLib.Forms"].TForm.$init.call(this),this.lbTitle=null,this.lbMessage=null},this.$final=function(){this.lbTitle=void 0,this.lbMessage=void 0,pas["WEBLib.Forms"].TForm.$final.call(this)},this.Display=function(e){null!=t.FViewErrorPage&&rtl.free(t,"FViewErrorPage"),t.FViewErrorPage=t.TFViewErrorPage.$create("CreateNew$3",[function(t){t.lbMessage.SetCaption(e)}])},this.DisplayConnectionError=function(t){this.Display(t.FErrorMessage+": "+t.FRequestUrl)},this.LoadDFMValues=function(){pas["WEBLib.Forms"].TCustomForm.LoadDFMValues.call(this),this.lbTitle=pas["WEBLib.StdCtrls"].TLabel.$create("Create$2",["view.errorpage.title"]),this.lbMessage=pas["WEBLib.StdCtrls"].TLabel.$create("Create$2",["view.errorpage.message"]),this.lbTitle.BeforeLoadDFMValues(),this.lbMessage.BeforeLoadDFMValues();try{this.SetName("FViewErrorPage"),this.SetWidth(534),this.SetHeight(426),this.FFont.FCharset=1,this.FFont.SetColor(65793),this.FFont.SetHeight(-11),this.FFont.SetName("Tahoma"),this.FFont.SetStyle({}),this.SetParentFont(!1),this.lbTitle.SetParentComponent(this),this.lbTitle.SetName("lbTitle"),this.lbTitle.SetLeft(24),this.lbTitle.SetTop(24),this.lbTitle.SetWidth(128),this.lbTitle.SetHeight(13),this.lbTitle.SetCaption("Oops... an error occurred!"),this.lbTitle.SetHeightPercent(100),this.lbTitle.SetTransparent(!1),this.lbTitle.SetWidthPercent(100),this.lbMessage.SetParentComponent(this),this.lbMessage.SetName("lbMessage"),this.lbMessage.SetLeft(24),this.lbMessage.SetTop(56),this.lbMessage.SetWidth(42),this.lbMessage.SetHeight(13),this.lbMessage.SetCaption("Message"),this.lbMessage.SetHeightPercent(100),this.lbMessage.SetTransparent(!1),this.lbMessage.SetWidthPercent(100)}finally{this.lbTitle.AfterLoadDFMValues(),this.lbMessage.AfterLoadDFMValues()}},rtl.addIntf(this,pas["WEBLib.Controls"].IControl),rtl.addIntf(this,pas.System.IUnknown);var e=this.$rtti;e.addField("lbTitle",pas["WEBLib.StdCtrls"].$rtti.TLabel,4),e.addField("lbMessage",pas["WEBLib.StdCtrls"].$rtti.TLabel,4)})),this.FViewErrorPage=null})),rtl.module("mpoweb.ConnectionModule",["System","SysUtils","Classes","WEBLib.Modules","WEBLib.Forms","WEBLib.Dialogs","XData.Web.Connection","mpoweb.App.Types","mpoweb.App.Config"],(function(){"use strict";rtl.createClass(this,"TDMConnection",pas["WEBLib.Modules"].TDataModule,(function(){this.$init=function(){pas["WEBLib.Modules"].TDataModule.$init.call(this),this.AuthConnection=null,this.ApiConnection=null,this.FUnauthorizedAccessProc=null,this.URL_UploadUrl="",this.URL_DownloadUrl=""},this.$final=function(){this.AuthConnection=void 0,this.ApiConnection=void 0,this.FUnauthorizedAccessProc=void 0,pas["WEBLib.Modules"].TDataModule.$final.call(this)},this.DataModuleCreate=function(t){pas["WEBLib.Forms"].Application.FOnError=rtl.createCallback(this,"AppException")},this.ApiConnectionError=function(t){pas["mpoView.ErrorPage"].TFViewErrorPage.DisplayConnectionError(t)},this.ApiConnectionRequest=function(t){pas["mpoweb.Auth.Service"].AuthService().Authenticated()&&t.FRequest.GetHeaders().SetValue("Authorization","Bearer "+pas["mpoweb.Auth.Service"].AuthService().GetToken())},this.ApiConnectionResponse=function(t){401===t.FResponse.GetStatusCode()&&this.FUnauthorizedAccessProc(pas.SysUtils.Format("%d: %s",pas.System.VarRecs(0,t.FResponse.GetStatusCode(),18,t.FResponse.GetContentAsText())))},this.AuthConnectionError=function(t){pas["mpoView.ErrorPage"].TFViewErrorPage.DisplayConnectionError(t)},this.AppException=function(t,e,i){i.set(!0),pas["WEBLib.Dialogs"].MessageDlg("WCM Fehlermeldung: "+e.AMessage,1,{},null)},this.InitApp=function(t,e){var i=this;this.FUnauthorizedAccessProc=e,pas["mpoweb.App.Config"].LoadConfig((function(e){""!==e.FAuthUrl&&i.AuthConnection.SetURL(e.FAuthUrl),""!==e.FApiUrl&&i.ApiConnection.SetURL(e.FApiUrl),""!==e.FUploadUrl&&(i.URL_UploadUrl=e.FUploadUrl),""!==e.FDownloadUrl&&(i.URL_DownloadUrl=e.FDownloadUrl),i.AuthConnection.Open(t,null)}))},this.LoadDFMValues=function(){pas["WEBLib.Modules"].TDataModule.LoadDFMValues.call(this),this.AuthConnection=pas["XData.Web.Connection"].TXDataWebConnection.$create("Create$1",[this]),this.ApiConnection=pas["XData.Web.Connection"].TXDataWebConnection.$create("Create$1",[this]),this.AuthConnection.BeforeLoadDFMValues(),this.ApiConnection.BeforeLoadDFMValues();try{this.SetName("DMConnection"),this.SetEvent(this,"OnCreate","DataModuleCreate"),this.FHeight=150,this.FWidth=215,this.AuthConnection.SetParentComponent(this),this.AuthConnection.SetName("AuthConnection"),this.AuthConnection.SetURL("http://localhost:2010/gbw/mpo/auth/"),this.SetEvent$1(this.AuthConnection,this,"OnError","AuthConnectionError"),this.AuthConnection.SetLeft(48),this.AuthConnection.SetTop(16),this.ApiConnection.SetParentComponent(this),this.ApiConnection.SetName("ApiConnection"),this.ApiConnection.SetURL("http://localhost:2010/gbw/mpo/api/"),this.SetEvent$1(this.ApiConnection,this,"OnError","ApiConnectionError"),this.SetEvent$1(this.ApiConnection,this,"OnRequest","ApiConnectionRequest"),this.SetEvent$1(this.ApiConnection,this,"OnResponse","ApiConnectionResponse"),this.ApiConnection.SetLeft(48),this.ApiConnection.SetTop(80)}finally{this.AuthConnection.AfterLoadDFMValues(),this.ApiConnection.AfterLoadDFMValues()}},rtl.addIntf(this,pas.System.IUnknown);var t=this.$rtti;t.addField("AuthConnection",pas["XData.Web.Connection"].$rtti.TXDataWebConnection,4),t.addField("ApiConnection",pas["XData.Web.Connection"].$rtti.TXDataWebConnection,4),t.addMethod("DataModuleCreate",0,[["Sender",pas.System.$rtti.TObject]],4),t.addMethod("ApiConnectionError",0,[["error",pas["XData.Web.Connection"].$rtti.TXDataWebConnectionError]],4),t.addMethod("ApiConnectionRequest",0,[["Args",pas["XData.Web.Connection"].$rtti.TXDataWebConnectionRequest]],4),t.addMethod("ApiConnectionResponse",0,[["Args",pas["XData.Web.Connection"].$rtti.TXDataWebConnectionResponse]],4),t.addMethod("AuthConnectionError",0,[["error",pas["XData.Web.Connection"].$rtti.TXDataWebConnectionError]],4)})),this.DMConnection=null}),["JS","Web","XData.Web.Request","XData.Web.Response","mpoweb.Auth.Service","mpoView.ErrorPage"]),rtl.module("WEBLib.ExtCtrls",["System","Classes","SysUtils","Types","WEBLib.Controls","WEBLib.StdCtrls","WEBLib.Graphics","Web","JS","WEBLib.WebTools","WEBLib.Menus","WEBLib.REST"],(function(){"use strict";var t=this;this.TLinkTarget={0:"ltCurrentTab",ltCurrentTab:0,1:"ltNewTab",ltNewTab:1},this.$rtti.$Enum("TLinkTarget",{minvalue:0,maxvalue:1,ordtype:1,enumtype:this.TLinkTarget}),rtl.createClass(this,"TCustomLinkLabel",pas["WEBLib.StdCtrls"].TCustomLabel,(function(){this.$init=function(){pas["WEBLib.StdCtrls"].TCustomLabel.$init.call(this),this.FDisplText="",this.FOnLinkClick=null,this.FWidthStyle$1=0,this.FHeightPercent$1=0,this.FHeightStyle$1=0,this.FWidthPercent$1=0,this.FTarget=0},this.$final=function(){this.FOnLinkClick=void 0,pas["WEBLib.StdCtrls"].TCustomLabel.$final.call(this)},this.SetTarget=function(t){this.FTarget!==t&&(this.FTarget=t,this.SetCaption(this.FCaption))},this.SetWidthStyle$1=function(t){this.FWidthStyle$1=t},this.SetHeightStyle$1=function(t){this.FHeightStyle$1=t},this.SetHeightPercent$1=function(t){this.FHeightPercent$1=t},this.SetWidthPercent$1=function(t){this.FWidthPercent$1=t},this.GetOuterWidth=function(){return 0!==this.FAlign?pas["WEBLib.Controls"].TControl.GetOuterWidth.call(this):this.GetWidth()},this.GetOuterHeight=function(){return 0!==this.FAlign?pas["WEBLib.Controls"].TControl.GetOuterHeight.call(this):this.GetHeight()},this.GetDisplayText=function(){return this.FDisplText},this.SetCaption=function(t){var e,i,s=0,n=0,r=0,a=0,o=0,l=0,h="",d="",u="",c="",F=null,p=null,S=null;if(pas["WEBLib.StdCtrls"].TCustomLabel.SetCaption.call(this,t),null!=this.GetContainer())if(S=this.GetContentHandle(),""!==this.GetID()&&(S=document.getElementById(this.GetID())),null!=S&&pas.System.Assigned(S.nodeValue)&&(S.nodeValue=""),h=t,i=pas.SysUtils.LowerCase(h),1!==pas.System.Pos("https://",i)&&1!==pas.System.Pos("http://",i)||(h='<a href="'+h+'"',1===this.FTarget&&(h+=' target="_blank"'),h=h+">"+this.FCaption+"</a>",null!=this.FOnLinkClick))if('<a href="',e='<a id="',null!=this.FOnLinkClick&&(pas.System.Pos('<a href="',h)>0||pas.System.Pos(e,h)>0)){for(S.innerHTML="";pas.System.Pos('<a href="',h)>0||pas.System.Pos(e,h)>0;)((n=pas.System.Pos('<a href="',h))<(r=pas.System.Pos(e,h))||r<=0)&&n>0?(c="#url#",s=n+'<a href="'.length):(c="#id#",s=r+e.length),a=pas.System.Pos('">',h),(o=pas.System.Pos('" ',h))>0&&o<a&&(a=o),l=pas.System.Pos("</a>",h),d=pas.System.Copy(h,s,a-s),a=pas.System.Pos('">',h),l=pas.System.Pos("</a>",h),u=pas.System.Copy(h,a+2,l-(a+2)),(p=document.createElement("SPAN")).innerHTML=pas.System.Copy(h,0,s),S.appendChild(p),(F=document.createElement("A")).setAttribute("href","#"),F.setAttribute("id",c+d),F.innerHTML=u,F.onclick=rtl.createSafeCallback(this,"DoLinkClick"),S.appendChild(F),pas.System.Delete({get:function(){return h},set:function(t){h=t}},1,pas.System.Pos("</a>",h)+3);(p=document.createElement("SPAN")).innerHTML=h,S.appendChild(p),this.FDisplText=h}else this.FDisplText=pas.SysUtils.StringReplace(t,"> <",">&nbsp;<",rtl.createSet(0)),null!=S&&pas.System.Assigned(S.nodeValue)?S.nodeValue=this.FDisplText:null!=S&&S.childElementCount<=1&&(S.innerHTML=this.FDisplText);else S.innerHTML=h},this.DoLinkClick=function(t){var e,i,s="",n=0;return i=t.target.getAttribute("id"),s="#url#",n=1,pas.System.Pos(s,i)>0||(s="#id#",n=0),e=pas.SysUtils.StringReplace(i,s,"",{}),null!=this.FOnLinkClick&&this.FOnLinkClick(this,e,n),!0,!0},this.Create$1=function(t){return pas["WEBLib.Controls"].TControl.Create$1.apply(this,arguments),this.FWidthStyle$1=1,this.FWidthPercent$1=100,this.FHeightStyle$1=1,this.FHeightPercent$1=100,this.SetTransparent(!0),this},rtl.addIntf(this,pas["WEBLib.Controls"].IControl),rtl.addIntf(this,pas.System.IUnknown);var e=this.$rtti;e.addProperty("Align",2,pas["WEBLib.Controls"].$rtti.TAlign,"FAlign","SetAlign",4,{Default:pas["WEBLib.Controls"].TAlign.alNone}),e.addProperty("Alignment",2,pas.Classes.$rtti.TAlignment,"FAlignment","SetAlignment",4,{Default:pas.Classes.TAlignment.taLeftJustify}),e.addProperty("AlignWithMargins",2,rtl.boolean,"FAlignWithMargins","SetAlignWithMargins",4,{Default:!1}),e.addProperty("Anchors",2,pas["WEBLib.Controls"].$rtti.TAnchors,"FAnchors","SetAnchors",4,{Default:rtl.createSet(0,1)}),e.addProperty("AutoSize",2,rtl.boolean,"FAutoSize","SetAutoSize",4,{Default:!0}),e.addProperty("Caption",2,rtl.string,"FCaption","SetCaption"),e.addProperty("Color",2,pas["WEBLib.Graphics"].$rtti.TColor,"FColor$1","SetColorEx",4,{Default:16777215}),e.addProperty("DragMode",2,pas["WEBLib.Controls"].$rtti.TDragMode,"FDragMode","SetDragMode",4,{Default:pas["WEBLib.Controls"].TDragMode.dmManual}),e.addProperty("EllipsisPosition",2,pas["WEBLib.StdCtrls"].$rtti.TEllipsisPosition,"FEllipsisPosition","SetEllipsisPosition",4,{Default:pas["WEBLib.StdCtrls"].TEllipsisPosition.epNone}),e.addProperty("ElementClassName",2,pas["WEBLib.Controls"].$rtti.TElementClassName,"FElementClassName","SetElementClassName"),e.addProperty("ElementID",3,pas["WEBLib.Controls"].$rtti.TElementID,"GetID","SetID"),e.addProperty("ElementFont",2,pas["WEBLib.Controls"].$rtti.TElementFont,"FElementFont","SetElementFont",4,{Default:pas["WEBLib.Controls"].TElementFont.efProperty}),e.addProperty("ElementPosition",2,pas["WEBLib.Controls"].$rtti.TElementPosition,"FElementPosition","SetElementPosition",4,{Default:pas["WEBLib.Controls"].TElementPosition.epAbsolute}),e.addProperty("Enabled",2,rtl.boolean,"FEnabled","SetEnabled",4,{Default:!0}),e.addProperty("Font",2,pas["WEBLib.Graphics"].$rtti.TFont,"FFont","SetFont"),e.addProperty("Height",3,rtl.longint,"GetHeight","SetHeight"),e.addProperty("Hint",2,rtl.string,"FHint","SetHint"),e.addProperty("Layout",2,pas["WEBLib.StdCtrls"].$rtti.TTextLayout,"FLayout","SetLayout",4,{Default:pas["WEBLib.StdCtrls"].TTextLayout.tlTop}),e.addProperty("Left",3,rtl.longint,"GetLeft","SetLeft"),e.addProperty("Margins",2,pas["WEBLib.Controls"].$rtti.TMargins,"FMargins","SetMargins"),e.addProperty("ShowHint",2,rtl.boolean,"FShowHint","SetShowHint",4,{Default:!1}),e.addProperty("Target",2,t.$rtti.TLinkTarget,"FTarget","SetTarget",4,{Default:t.TLinkTarget.ltCurrentTab}),e.addProperty("Top",3,rtl.longint,"GetTop","SetTop"),e.addProperty("Transparent",2,rtl.boolean,"FTransparent","SetTransparent",4,{Default:!0}),e.addProperty("Visible",2,rtl.boolean,"FVisible","SetVisible",4,{Default:!0}),e.addProperty("Width",3,rtl.longint,"GetWidth","SetWidth"),e.addProperty("WordWrap",0,rtl.boolean,"FWordWrap","FWordWrap",4,{Default:!1}),e.addProperty("HeightStyle",2,pas["WEBLib.Controls"].$rtti.TSizeStyle,"FHeightStyle$1","SetHeightStyle$1",4,{Default:pas["WEBLib.Controls"].TSizeStyle.ssAbsolute}),e.addProperty("WidthStyle",2,pas["WEBLib.Controls"].$rtti.TSizeStyle,"FWidthStyle$1","SetWidthStyle$1",4,{Default:pas["WEBLib.Controls"].TSizeStyle.ssAbsolute}),e.addProperty("HeightPercent",2,rtl.double,"FHeightPercent$1","SetHeightPercent$1",4,{Default:100}),e.addProperty("WidthPercent",2,rtl.double,"FWidthPercent$1","SetWidthPercent$1",4,{Default:100}),e.addProperty("OnClick",0,pas["WEBLib.Controls"].$rtti.TNotifyEvent,"FOnClick","FOnClick"),e.addProperty("OnDblClick",0,pas["WEBLib.Controls"].$rtti.TNotifyEvent,"FOnDblClick","FOnDblClick"),e.addProperty("OnLinkClick",0,pas["WEBLib.StdCtrls"].$rtti.TLinkClickEvent,"FOnLinkClick","FOnLinkClick"),e.addProperty("OnDragDrop",0,pas["WEBLib.Controls"].$rtti.TDragDropEvent,"FOnDragDrop","FOnDragDrop"),e.addProperty("OnDragOver",0,pas["WEBLib.Controls"].$rtti.TDragOverEvent,"FOnDragOver","FOnDragOver"),e.addProperty("OnEndDrag",0,pas["WEBLib.Controls"].$rtti.TEndDragEvent,"FonEndDrag","FonEndDrag"),e.addProperty("OnStartDrag",0,pas["WEBLib.Controls"].$rtti.TStartDragEvent,"FOnStartDrag","FOnStartDrag")})),rtl.createClass(this,"TLinkLabel",this.TCustomLinkLabel,(function(){rtl.addIntf(this,pas["WEBLib.Controls"].IControl),rtl.addIntf(this,pas.System.IUnknown);var t=this.$rtti;t.addProperty("Caption",2,rtl.string,"FCaption","SetCaption"),t.addProperty("ParentFont",2,rtl.boolean,"FParentFont","SetParentFont",4,{Default:!0})})),rtl.createClass(this,"TTimer",pas.Classes.TComponent,(function(){this.$init=function(){pas.Classes.TComponent.$init.call(this),this.FInterval=0,this.FTimerID=0,this.FOnTimer=null,this.FEnabled=!1},this.$final=function(){this.FOnTimer=void 0,pas.Classes.TComponent.$final.call(this)},this.SetEnabled=function(t){this.FEnabled=t,this.DoUpdateTimer()},this.SetInterval=function(t){this.FInterval=t,this.DoUpdateTimer()},this.DoTimer=function(){null!=this.FOnTimer&&this.FOnTimer(this)},this.DoUpdateTimer=function(){this.DoClearTimer(),this.FEnabled&&(this.FTimerID=window.setInterval(rtl.createSafeCallback(this,"DoTimer"),this.FInterval))},this.DoClearTimer=function(){-1!==this.FTimerID&&(window.clearInterval(this.FTimerID),this.FTimerID=-1)},this.Create$1=function(t){return pas.Classes.TComponent.Create$1.apply(this,arguments),this.FInterval=1e3,this.FTimerID=-1,this.SetEnabled(!0),this},this.Destroy=function(){this.DoClearTimer(),pas.Classes.TComponent.Destroy.call(this)},rtl.addIntf(this,pas.System.IUnknown);var t=this.$rtti;t.addProperty("Enabled",2,rtl.boolean,"FEnabled","SetEnabled",4,{Default:!0}),t.addProperty("Interval",2,rtl.longint,"FInterval","SetInterval",4,{Default:1e3}),t.addProperty("OnTimer",0,pas["WEBLib.Controls"].$rtti.TNotifyEvent,"FOnTimer","FOnTimer")})),rtl.createClass(this,"TCustomPanel",pas["WEBLib.Menus"].TWebCustomControl,(function(){this.$init=function(){pas["WEBLib.Menus"].TWebCustomControl.$init.call(this),this.FAutoSize=!1,this.FIsSizing=!1,this.FPadding=null,this.FShowCaption=!1,this.FLabel=null,this.FPanelBody=null,this.FElementBodyClassName="",this.FAlignment=0},this.$final=function(){this.FPadding=void 0,this.FLabel=void 0,this.FPanelBody=void 0,pas["WEBLib.Menus"].TWebCustomControl.$final.call(this)},this.SetShowCaption=function(t){this.FShowCaption!==t&&(this.FShowCaption=t,this.UpdateElementVisual())},this.SetPadding=function(t){this.FPadding.Assign(t),this.Realign()},this.SetAlignment=function(t){this.FAlignment!==t&&(this.FAlignment=t,this.UpdateElement())},this.CreateElement=function(){var t=null;return t=document.createElement("SPAN"),this.FPanelBody=document.createElement("DIV"),this.FPanelBody.setAttribute("class","card-body"),t.appendChild(this.FPanelBody),t},this.SetCaption=function(t){pas["WEBLib.Controls"].TCustomControl.SetCaption.call(this,t),null!=this.GetElementHandle()&&this.FShowCaption&&(null==this.FLabel?(this.FLabel=document.createElement("SPAN"),this.FLabel.innerHTML=this.FCaption,null!=this.GetChildContainer()?this.GetChildContainer().appendChild(this.FLabel):this.GetElementHandle().appendChild(this.FLabel),this.UpdateElementVisual()):this.FLabel.innerHTML=this.FCaption)},this.SetBorderStyle=function(t){pas["WEBLib.Controls"].TCustomControl.SetBorderStyle.apply(this,arguments),this.UpdateElement()},this.SetAutoSize=function(t){this.FAutoSize=t,this.FAutoSize&&!this.IsUpdating()&&this.DoAutoSize()},this.UpdateElementVisual=function(){if(pas["WEBLib.Controls"].TCustomControl.UpdateElementVisual.call(this),null!=this.GetElementHandle()){if(this.GetIsLinked()||(this.FAutoSize?(this.GetElementHandle().style.setProperty("overflow",""),this.GetElementHandle().style.setProperty("white-space","normal"),this.FVisible&&this.GetElementHandle().style.setProperty("display","inline")):(this.GetElementHandle().style.setProperty("overflow","hidden"),this.GetElementHandle().style.setProperty("white-space","nowrap"),this.FVisible&&this.GetElementHandle().style.setProperty("display","inline-block")),this.GetElementHandle().style.setProperty("padding-left",pas.SysUtils.IntToStr(this.FPadding.FLeft)+"px"),this.GetElementHandle().style.setProperty("padding-right",pas.SysUtils.IntToStr(this.FPadding.FRight)+"px"),this.GetElementHandle().style.setProperty("padding-top",pas.SysUtils.IntToStr(this.FPadding.FTop)+"px"),this.GetElementHandle().style.setProperty("padding-bottom",pas.SysUtils.IntToStr(this.FPadding.FBottom)+"px"),this.GetElementHandle().style.setProperty("box-sizing","border-box"),""!==this.FElementBodyClassName?this.GetChildContainer().setAttribute("class",this.FElementBodyClassName):this.GetChildContainer().removeAttribute("class")),null!=this.FLabel&&(this.FShowCaption?this.FLabel.innerHTML=this.FCaption:this.FLabel.innerHTML="",this.FVisible)){this.GetElementHandle().style.setProperty("display","flex");var t=this.FAlignment;0===t?this.GetElementHandle().style.setProperty("justify-content","flex-start"):2===t?this.GetElementHandle().style.setProperty("justify-content","center"):1===t&&this.GetElementHandle().style.setProperty("justify-content","flex-end"),this.GetElementHandle().style.setProperty("align-items","center")}this.GetElementHandle().style.setProperty("user-select",""),0===this.FCursor&&this.GetElementHandle().style.setProperty("cursor","")}},this.HandleKeyPreview=function(t){for(var e=0,i=0,s=this.GetControlsCount()-1;i<=s;i++)e=i,13!==t&&27!==t||this.GetControls(e).HandleKeyPreview(t)},this.GetOuterWidth=function(){return pas["WEBLib.Controls"].TControl.GetOuterWidth.call(this)},this.GetOuterHeight=function(){return pas["WEBLib.Controls"].TControl.GetOuterHeight.call(this)},this.GetChildContainer=function(){return null!=this.FPanelBody?this.FPanelBody:pas["WEBLib.Controls"].TControl.GetChildContainer.call(this)},this.RegisterParent=function(t){pas["WEBLib.Controls"].TControl.RegisterParent.apply(this,arguments),this.FAutoSize&&this.DoAutoSize()},this.UnRegisterParent=function(t){pas["WEBLib.Controls"].TControl.UnRegisterParent.apply(this,arguments),this.FAutoSize&&this.DoAutoSize()},this.UpdatePadding=function(t){t.Left=this.FPadding.FLeft,t.Top=this.FPadding.FTop,t.Right=t.Right-this.FPadding.FRight,t.Bottom=t.Bottom-this.FPadding.FBottom},this.DoAutoSize=function(){var t=0,e=0,i=0,s=0,n=0,r=null,a=null;if(!this.FIsSizing){if(this.FIsSizing=!0,1===this.FWidthStyle&&1===this.FHeightStyle){s=0,n=0,e=65535,i=65535;for(var o=0,l=this.GetControlsCount()-1;o<=l;o++)t=o,1===this.GetControls(t).FWidthStyle?(this.GetControls(t).GetLeft()+this.GetControls(t).GetWidth()>s&&(s=this.GetControls(t).GetLeft()+this.GetControls(t).GetWidth()),this.GetControls(t).GetLeft()<e&&(e=this.GetControls(t).GetLeft())):null!=(a=this.GetControls(t).GetElementHandle())&&((r=a.getBoundingClientRect()).x-this.GetLeft()+r.width>s&&(s=Math.round(r.x-this.GetLeft()+r.width)),e=0),1===this.GetControls(t).FHeightStyle?(this.GetControls(t).GetTop()+this.GetControls(t).GetHeight()>n&&(n=this.GetControls(t).GetTop()+this.GetControls(t).GetHeight()),this.GetControls(t).GetTop()<i&&(i=this.GetControls(t).GetTop())):null!=(a=this.GetControls(t).GetElementHandle())&&((r=a.getBoundingClientRect()).y-this.GetTop()+r.height>n&&(n=Math.round(r.y-this.GetTop()+r.height)),i=0);if(4 in this.FComponentState&&(0===this.GetControlsCount()||0===s||0===n))return;1===this.FBorderStyle&&(s+=1,n+=1);for(var h=0,d=this.GetControlsCount()-1;h<=d;h++)t=h,this.GetControls(t).SetLeft(this.GetControls(t).GetLeft()-e),this.GetControls(t).SetTop(this.GetControls(t).GetTop()-i);this.SetWidth(s-e),this.SetHeight(n-i)}else this.SetWidth(-1),this.SetHeight(-1);this.UpdateElement(),this.FIsSizing=!1}},this.AlignControl=function(t){pas["WEBLib.Controls"].TControl.AlignControl.apply(this,arguments),this.FAutoSize&&this.DoAutoSize()},this.CreateInitialize=function(){pas["WEBLib.Controls"].TCustomControl.CreateInitialize.call(this),4 in this.FComponentState&&(this.FEnablePropagation=!0),this.FAutoSize=!1,this.FAlignment=2,this.SetColor(15790320),this.SetTabStop(!1),this.FCustomBorder=!0,this.SetShowCaption(!0),this.FControlStyle=rtl.unionSet(this.FControlStyle,rtl.createSet(0)),this.FLabel=null,this.FPadding=pas["WEBLib.Controls"].TPadding.$create("Create$1"),4 in this.FComponentState&&(this.SetWidth(400),this.SetHeight(300))},this.Destroy=function(){rtl.free(this,"FPadding"),pas["WEBLib.Controls"].TCustomControl.Destroy.call(this)},this.EndUpdate=function(){pas["WEBLib.Controls"].TCustomControl.EndUpdate.call(this),this.FAutoSize&&this.SetAutoSize(!0)},rtl.addIntf(this,pas["WEBLib.Controls"].IControl),rtl.addIntf(this,pas.System.IUnknown)})),rtl.createClass(this,"TPanel",this.TCustomPanel,(function(){rtl.addIntf(this,pas["WEBLib.Controls"].IControl),rtl.addIntf(this,pas.System.IUnknown);var t=this.$rtti;t.addProperty("Align",2,pas["WEBLib.Controls"].$rtti.TAlign,"FAlign","SetAlign",4,{Default:pas["WEBLib.Controls"].TAlign.alNone}),t.addProperty("Alignment",2,pas.Classes.$rtti.TAlignment,"FAlignment","SetAlignment",4,{Default:pas.Classes.TAlignment.taCenter}),t.addProperty("AlignWithMargins",2,rtl.boolean,"FAlignWithMargins","SetAlignWithMargins",4,{Default:!1}),t.addProperty("Anchors",2,pas["WEBLib.Controls"].$rtti.TAnchors,"FAnchors","SetAnchors",4,{Default:rtl.createSet(0,1)}),t.addProperty("AutoSize",2,rtl.boolean,"FAutoSize","SetAutoSize",4,{Default:!1}),t.addProperty("BorderColor",2,pas["WEBLib.Graphics"].$rtti.TColor,"FBorderColor","SetBorderColor",4,{Default:12632256}),t.addProperty("BorderStyle",2,pas["WEBLib.Controls"].$rtti.TBorderStyle,"FBorderStyle","SetBorderStyle",4,{Default:pas["WEBLib.Controls"].TBorderStyle.bsSingle}),t.addProperty("Caption",2,rtl.string,"FCaption","SetCaption"),t.addProperty("Center",0,pas["WEBLib.Controls"].$rtti.TCenter,"FCenter",""),t.addProperty("ChildOrder",2,rtl.longint,"FChildOrder","SetChildOrderEx",4,{Default:0}),t.addProperty("Color",2,pas["WEBLib.Graphics"].$rtti.TColor,"FColor","SetColor"),t.addProperty("DragMode",2,pas["WEBLib.Controls"].$rtti.TDragMode,"FDragMode","SetDragMode",4,{Default:pas["WEBLib.Controls"].TDragMode.dmManual}),t.addProperty("ElementBodyClassName",0,pas["WEBLib.Controls"].$rtti.TElementClassName,"FElementBodyClassName","FElementBodyClassName"),t.addProperty("ElementID",3,pas["WEBLib.Controls"].$rtti.TElementID,"GetID","SetID"),t.addProperty("ElementFont",2,pas["WEBLib.Controls"].$rtti.TElementFont,"FElementFont","SetElementFont",4,{Default:pas["WEBLib.Controls"].TElementFont.efProperty}),t.addProperty("ElementPosition",2,pas["WEBLib.Controls"].$rtti.TElementPosition,"FElementPosition","SetElementPosition",4,{Default:pas["WEBLib.Controls"].TElementPosition.epAbsolute}),t.addProperty("Font",2,pas["WEBLib.Graphics"].$rtti.TFont,"FFont","SetFont"),t.addProperty("HeightPercent",2,rtl.double,"FHeightPercent","SetHeightPercent",4,{Default:100}),t.addProperty("HeightStyle",2,pas["WEBLib.Controls"].$rtti.TSizeStyle,"FHeightStyle","SetHeightStyle",4,{Default:pas["WEBLib.Controls"].TSizeStyle.ssAbsolute}),t.addProperty("Margins",2,pas["WEBLib.Controls"].$rtti.TMargins,"FMargins","SetMargins"),t.addProperty("Padding",2,pas["WEBLib.Controls"].$rtti.TPadding,"FPadding","SetPadding"),t.addProperty("ParentFont",2,rtl.boolean,"FParentFont","SetParentFont",4,{Default:!0}),t.addProperty("PopupMenu",0,pas["WEBLib.Menus"].$rtti.TPopupMenu,"FPopupMenu","FPopupMenu"),t.addProperty("Role",3,rtl.string,"GetRole","SetRole"),t.addProperty("ShowCaption",2,rtl.boolean,"FShowCaption","SetShowCaption",4,{Default:!0}),t.addProperty("TabOrder",2,rtl.longint,"FTabOrder","SetTabOrder"),t.addProperty("TabStop",2,rtl.boolean,"FTabStop","SetTabStop",4,{Default:!0}),t.addProperty("WidthPercent",2,rtl.double,"FWidthPercent","SetWidthPercent",4,{Default:100}),t.addProperty("WidthStyle",2,pas["WEBLib.Controls"].$rtti.TSizeStyle,"FWidthStyle","SetWidthStyle",4,{Default:pas["WEBLib.Controls"].TSizeStyle.ssAbsolute}),t.addProperty("OnClick",0,pas["WEBLib.Controls"].$rtti.TNotifyEvent,"FOnClick","FOnClick"),t.addProperty("OnDblClick",0,pas["WEBLib.Controls"].$rtti.TNotifyEvent,"FOnDblClick","FOnDblClick"),t.addProperty("OnDragDrop",0,pas["WEBLib.Controls"].$rtti.TDragDropEvent,"FOnDragDrop","FOnDragDrop"),t.addProperty("OnDragOver",0,pas["WEBLib.Controls"].$rtti.TDragOverEvent,"FOnDragOver","FOnDragOver"),t.addProperty("OnEndDrag",0,pas["WEBLib.Controls"].$rtti.TEndDragEvent,"FonEndDrag","FonEndDrag"),t.addProperty("OnStartDrag",0,pas["WEBLib.Controls"].$rtti.TStartDragEvent,"FOnStartDrag","FOnStartDrag"),t.addProperty("OnTouchStart",0,pas["WEBLib.Controls"].$rtti.TTouchEvent,"FOnTouchStart","FOnTouchStart"),t.addProperty("OnTouchMove",0,pas["WEBLib.Controls"].$rtti.TTouchEvent,"FOnTouchMove","FOnTouchMove"),t.addProperty("OnTouchEnd",0,pas["WEBLib.Controls"].$rtti.TTouchEvent,"FOnTouchEnd","FOnTouchEnd"),t.addProperty("OnTouchCancel",0,pas["WEBLib.Controls"].$rtti.TTouchEvent,"FOnTouchCancel","FOnTouchCancel")}))}),["WEBLib.Utils","Math"]),rtl.module("WEBLib.WebCtrls",["System","Classes","WEBLib.Controls","WEBLib.Graphics","SysUtils","Web","JS","WEBLib.Menus"],(function(){"use strict";rtl.createClass(this,"THTMLDiv",pas["WEBLib.Controls"].TCustomControl,(function(){this.$init=function(){pas["WEBLib.Controls"].TCustomControl.$init.call(this),this.FHTML=null,this.FOldText=""},this.$final=function(){this.FHTML=void 0,pas["WEBLib.Controls"].TCustomControl.$final.call(this)},this.SetHTML=function(t){this.FHTML.Assign(t)},this.UpdateElementData=function(){pas["WEBLib.Controls"].TControl.UpdateElementData.call(this),null!=this.GetElementHandle()?(""===this.FOldText&&""===this.FHTML.GetTextStr()||(this.GetElementHandle().innerHTML=this.FHTML.GetTextStr()),this.FOldText=this.FHTML.GetTextStr()):!this.GetIsLinked()&&4 in this.FComponentState&&this.RenderDesigning(this.$classname,this.GetContainer(),this,!0,"")},this.HTMLChanged=function(t){this.UpdateElementData()},this.CreateElement=function(){return document.createElement("DIV")},this.CreateInitialize=function(){this.FHTML=pas.Classes.TStringList.$create("Create$1"),this.FHTML.SetSkipLastLineBreak(!0),rtl.as(this.FHTML,pas.Classes.TStringList).FOnChange=rtl.createCallback(this,"HTMLChanged"),pas["WEBLib.Controls"].TCustomControl.CreateInitialize.call(this),this.FControlStyle=rtl.unionSet(this.FControlStyle,rtl.createSet(0)),this.SetClipChildren(!1),this.SetTabStop(!1),4 in this.FComponentState&&(this.SetWidth(240),this.SetHeight(160))},this.Destroy=function(){rtl.free(this,"FHTML"),pas["WEBLib.Controls"].TCustomControl.Destroy.call(this)},rtl.addIntf(this,pas["WEBLib.Controls"].IControl),rtl.addIntf(this,pas.System.IUnknown);var t=this.$rtti;t.addProperty("Align",2,pas["WEBLib.Controls"].$rtti.TAlign,"FAlign","SetAlign",4,{Default:pas["WEBLib.Controls"].TAlign.alNone}),t.addProperty("AlignWithMargins",2,rtl.boolean,"FAlignWithMargins","SetAlignWithMargins",4,{Default:!1}),t.addProperty("Anchors",2,pas["WEBLib.Controls"].$rtti.TAnchors,"FAnchors","SetAnchors",4,{Default:rtl.createSet(0,1)}),t.addProperty("Center",0,pas["WEBLib.Controls"].$rtti.TCenter,"FCenter",""),t.addProperty("ChildOrder",2,rtl.longint,"FChildOrder","SetChildOrderEx",4,{Default:0}),t.addProperty("DragMode",2,pas["WEBLib.Controls"].$rtti.TDragMode,"FDragMode","SetDragMode",4,{Default:pas["WEBLib.Controls"].TDragMode.dmManual}),t.addProperty("ElementClassName",2,pas["WEBLib.Controls"].$rtti.TElementClassName,"FElementClassName","SetElementClassName"),t.addProperty("ElementFont",2,pas["WEBLib.Controls"].$rtti.TElementFont,"FElementFont","SetElementFont",4,{Default:pas["WEBLib.Controls"].TElementFont.efProperty}),t.addProperty("ElementID",3,pas["WEBLib.Controls"].$rtti.TElementID,"GetID","SetID"),t.addProperty("ElementPosition",2,pas["WEBLib.Controls"].$rtti.TElementPosition,"FElementPosition","SetElementPosition",4,{Default:pas["WEBLib.Controls"].TElementPosition.epAbsolute}),t.addProperty("HeightPercent",2,rtl.double,"FHeightPercent","SetHeightPercent",4,{Default:100}),t.addProperty("HeightStyle",2,pas["WEBLib.Controls"].$rtti.TSizeStyle,"FHeightStyle","SetHeightStyle",4,{Default:pas["WEBLib.Controls"].TSizeStyle.ssAbsolute}),t.addProperty("HTML",2,pas.Classes.$rtti.TStrings,"FHTML","SetHTML"),t.addProperty("Role",3,rtl.string,"GetRole","SetRole"),t.addProperty("Visible",2,rtl.boolean,"FVisible","SetVisible",4,{Default:!0}),t.addProperty("WidthPercent",2,rtl.double,"FWidthPercent","SetWidthPercent",4,{Default:100}),t.addProperty("WidthStyle",2,pas["WEBLib.Controls"].$rtti.TSizeStyle,"FWidthStyle","SetWidthStyle",4,{Default:pas["WEBLib.Controls"].TSizeStyle.ssAbsolute}),t.addProperty("OnClick",0,pas["WEBLib.Controls"].$rtti.TNotifyEvent,"FOnClick","FOnClick"),t.addProperty("OnDblClick",0,pas["WEBLib.Controls"].$rtti.TNotifyEvent,"FOnDblClick","FOnDblClick"),t.addProperty("OnMouseDown",0,pas["WEBLib.Controls"].$rtti.TMouseEvent,"FOnMouseDown","FOnMouseDown"),t.addProperty("OnMouseUp",0,pas["WEBLib.Controls"].$rtti.TMouseEvent,"FOnMouseUp","FOnMouseUp"),t.addProperty("OnMouseMove",0,pas["WEBLib.Controls"].$rtti.TMouseMoveEvent,"FOnMouseMove","FOnMouseMove"),t.addProperty("OnMouseLeave",0,pas["WEBLib.Controls"].$rtti.TNotifyEvent,"FOnMouseLeave","FOnMouseLeave"),t.addProperty("OnMouseEnter",0,pas["WEBLib.Controls"].$rtti.TNotifyEvent,"FOnMouseEnter","FOnMouseEnter"),t.addProperty("OnTouchStart",0,pas["WEBLib.Controls"].$rtti.TTouchEvent,"FOnTouchStart","FOnTouchStart"),t.addProperty("OnTouchEnd",0,pas["WEBLib.Controls"].$rtti.TTouchEvent,"FOnTouchEnd","FOnTouchEnd"),t.addProperty("OnTouchMove",0,pas["WEBLib.Controls"].$rtti.TTouchEvent,"FOnTouchMove","FOnTouchMove"),t.addProperty("OnTouchCancel",0,pas["WEBLib.Controls"].$rtti.TTouchEvent,"FOnTouchCancel","FOnTouchCancel"),t.addProperty("OnDragDrop",0,pas["WEBLib.Controls"].$rtti.TDragDropEvent,"FOnDragDrop","FOnDragDrop"),t.addProperty("OnDragOver",0,pas["WEBLib.Controls"].$rtti.TDragOverEvent,"FOnDragOver","FOnDragOver"),t.addProperty("OnEndDrag",0,pas["WEBLib.Controls"].$rtti.TEndDragEvent,"FonEndDrag","FonEndDrag"),t.addProperty("OnStartDrag",0,pas["WEBLib.Controls"].$rtti.TStartDragEvent,"FOnStartDrag","FOnStartDrag")}))}),["WEBLib.Dialogs","WEBLib.WebTools"]),rtl.module("mpoView.LoginNew",["System","SysUtils","Classes","WEBLib.Graphics","WEBLib.Controls","WEBLib.Forms","WEBLib.Dialogs","WEBLib.Controls","WEBLib.StdCtrls","WEBLib.StdCtrls","XData.Web.Connection","WEBLib.ExtCtrls","mpoweb.App.Types","mpoweb.ConnectionModule","WEBLib.WebCtrls"],(function(){"use strict";var t=this;rtl.createClass(this,"TFViewLoginNew",pas["WEBLib.Forms"].TForm,(function(){this.$init=function(){pas["WEBLib.Forms"].TForm.$init.call(this),this.btLoginNew=null,this.pnlMessage=null,this.lbMessage=null,this.WebButton1=null,this.WebLabel1=null,this.edEmail=null,this.edNachname=null,this.edVorname=null,this.WebMessageDlg1=null,this.btBack=null,this.FLoginProc=null,this.FMessage=""},this.$final=function(){this.btLoginNew=void 0,this.pnlMessage=void 0,this.lbMessage=void 0,this.WebButton1=void 0,this.WebLabel1=void 0,this.edEmail=void 0,this.edNachname=void 0,this.edVorname=void 0,this.WebMessageDlg1=void 0,this.btBack=void 0,this.FLoginProc=void 0,pas["WEBLib.Forms"].TForm.$final.call(this)},this.btBackClick=function(t){this.FLoginProc()},this.btLoginNewClick=function(t){var e=this;var i="";i="",pas.SysUtils.TStringHelper.GetLength.call({a:pas.SysUtils.Trim(this.edEmail.GetText()),get:function(){return this.a},set:function(t){this.a=t}})<2&&(i=i+pas.System.sLineBreak+'Bitte Feld "Email-Adresse" prüfen. '),pas.SysUtils.TStringHelper.GetLength.call({a:pas.SysUtils.Trim(this.edVorname.GetText()),get:function(){return this.a},set:function(t){this.a=t}})<2&&(i=i+pas.System.sLineBreak+'Bitte Feld "Vorname" prüfen. '),pas.SysUtils.TStringHelper.GetLength.call({a:pas.SysUtils.Trim(this.edNachname.GetText()),get:function(){return this.a},set:function(t){this.a=t}})<2&&(i=i+pas.System.sLineBreak+'Bitte Feld "Nachname" prüfen. '),""===i?pas["mpoweb.Auth.Service"].AuthService().LoginNew(this.edEmail.GetText(),this.edVorname.GetText(),this.edNachname.GetText(),(function(){e.WebMessageDlg1.ShowDialog$2(pas["mpoweb.Auth.Service"].AuthService().GetLoginNewResult(),2,rtl.createSet(2)),e.FLoginProc()}),(function(t){e.ShowNotification("Login Error: "+t)})):this.ShowNotification("Fehler: "+i)},this.edNachnameKeyPress=function(t,e){"\r"===e.get()&&this.btLoginNew.SetFocus()},this.WebFormCreate=function(t){""!==this.FMessage?this.ShowNotification(this.FMessage):this.HiddenNotification()},this.edEmailKeyPress=function(t,e){"\r"===e.get()&&this.edVorname.SetFocus()},this.edVornameKeyPress=function(t,e){"\r"===e.get()&&this.edNachname.SetFocus()},this.WebButton1Click=function(t){this.HiddenNotification()},this.ShowNotification=function(t){""!==t&&(this.lbMessage.SetCaption(t),this.pnlMessage.GetElementHandle().hidden=!1)},this.HiddenNotification=function(){this.pnlMessage.GetElementHandle().hidden=!0},this.Display=function(e){t.TFViewLoginNew.Display$1(e,"")},this.Display$1=function(e,i){null!=t.FViewLoginNew&&rtl.free(t,"FViewLoginNew"),t.FViewLoginNew=t.TFViewLoginNew.$create("CreateNew$3",[function(t){t.FMessage=i}]),t.FViewLoginNew.FLoginProc=e},this.LoadDFMValues=function(){pas["WEBLib.Forms"].TCustomForm.LoadDFMValues.call(this),this.WebLabel1=pas["WEBLib.StdCtrls"].TLabel.$create("Create$2",["view.loginnew.title"]),this.btLoginNew=pas["WEBLib.StdCtrls"].TButton.$create("Create$2",["view.loginnew.btlogin"]),this.pnlMessage=pas["WEBLib.ExtCtrls"].TPanel.$create("Create$2",["view.loginnew.message"]),this.lbMessage=pas["WEBLib.StdCtrls"].TLabel.$create("Create$2",["view.loginnew.message.label"]),this.WebButton1=pas["WEBLib.StdCtrls"].TButton.$create("Create$2",["view.loginnew.message.button"]),this.edEmail=pas["WEBLib.StdCtrls"].TEdit.$create("Create$2",["view.loginnew.Email"]),this.edNachname=pas["WEBLib.StdCtrls"].TEdit.$create("Create$2",["view.loginnew.Nachname"]),this.edVorname=pas["WEBLib.StdCtrls"].TEdit.$create("Create$2",["view.loginnew.Vorname"]),this.WebMessageDlg1=pas["WEBLib.Dialogs"].TMessageDlg.$create("Create$1",[this]),this.btBack=pas["WEBLib.StdCtrls"].TButton.$create("Create$2",["view.loginnew.btback"]),this.WebLabel1.BeforeLoadDFMValues(),this.btLoginNew.BeforeLoadDFMValues(),this.pnlMessage.BeforeLoadDFMValues(),this.lbMessage.BeforeLoadDFMValues(),this.WebButton1.BeforeLoadDFMValues(),this.edEmail.BeforeLoadDFMValues(),this.edNachname.BeforeLoadDFMValues(),this.edVorname.BeforeLoadDFMValues(),this.WebMessageDlg1.BeforeLoadDFMValues(),this.btBack.BeforeLoadDFMValues();try{this.SetName("FViewLoginNew"),this.SetWidth(640),this.SetHeight(480),this.FFont.FCharset=1,this.FFont.SetColor(65793),this.FFont.SetHeight(-11),this.FFont.SetName("Tahoma"),this.FFont.SetStyle({}),this.SetParentFont(!1),this.SetEvent(this,"OnCreate","WebFormCreate"),this.WebLabel1.SetParentComponent(this),this.WebLabel1.SetName("WebLabel1"),this.WebLabel1.SetLeft(184),this.WebLabel1.SetTop(8),this.WebLabel1.SetWidth(135),this.WebLabel1.SetHeight(13),this.WebLabel1.SetCaption("Neuen Benutzer registrieren"),this.WebLabel1.SetElementFont(1),this.WebLabel1.SetElementPosition(2),this.WebLabel1.SetHeightStyle(2),this.WebLabel1.SetHeightPercent(100),this.WebLabel1.SetWidthStyle(2),this.WebLabel1.SetWidthPercent(100),this.btLoginNew.SetParentComponent(this),this.btLoginNew.SetName("btLoginNew"),this.btLoginNew.SetLeft(184),this.btLoginNew.SetTop(182),this.btLoginNew.SetWidth(96),this.btLoginNew.SetHeight(25),this.btLoginNew.SetCaption("Neuen Benutzer registrieren"),this.btLoginNew.SetElementPosition(2),this.btLoginNew.SetHeightStyle(2),this.btLoginNew.SetHeightPercent(100),this.btLoginNew.SetWidthStyle(2),this.btLoginNew.SetWidthPercent(100),this.SetEvent$1(this.btLoginNew,this,"OnClick","btLoginNewClick"),this.pnlMessage.SetParentComponent(this),this.pnlMessage.SetName("pnlMessage"),this.pnlMessage.SetLeft(325),this.pnlMessage.SetTop(80),this.pnlMessage.SetWidth(121),this.pnlMessage.SetHeight(33),this.pnlMessage.SetChildOrderEx(8),this.lbMessage.SetParentComponent(this.pnlMessage),this.lbMessage.SetName("lbMessage"),this.lbMessage.SetLeft(16),this.lbMessage.SetTop(11),this.lbMessage.SetWidth(42),this.lbMessage.SetHeight(13),this.lbMessage.SetCaption("Message"),this.lbMessage.SetHeightPercent(100),this.lbMessage.SetWidthPercent(100),this.WebButton1.SetParentComponent(this.pnlMessage),this.WebButton1.SetName("WebButton1"),this.WebButton1.SetLeft(96),this.WebButton1.SetTop(3),this.WebButton1.SetWidth(22),this.WebButton1.SetHeight(25),this.WebButton1.SetCaption("x"),this.WebButton1.SetChildOrderEx(1),this.WebButton1.SetHeightPercent(100),this.WebButton1.SetWidthPercent(100),this.SetEvent$1(this.WebButton1,this,"OnClick","WebButton1Click"),this.edEmail.SetParentComponent(this),this.edEmail.SetName("edEmail"),this.edEmail.SetLeft(96),this.edEmail.SetTop(85),this.edEmail.SetWidth(96),this.edEmail.SetHeight(25),this.edEmail.SetChildOrderEx(3),this.edEmail.SetElementFont(1),this.edEmail.SetElementPosition(2),this.edEmail.SetHeightStyle(2),this.edEmail.SetHeightPercent(100),this.edEmail.SetTextHint("Email-Adresse"),this.edEmail.SetWidthStyle(2),this.edEmail.SetWidthPercent(100),this.SetEvent$1(this.edEmail,this,"OnKeyPress","edEmailKeyPress"),this.edNachname.SetParentComponent(this),this.edNachname.SetName("edNachname"),this.edNachname.SetLeft(96),this.edNachname.SetTop(151),this.edNachname.SetWidth(96),this.edNachname.SetHeight(25),this.edNachname.SetChildOrderEx(4),this.edNachname.SetElementFont(1),this.edNachname.SetElementPosition(2),this.edNachname.SetHeightStyle(2),this.edNachname.SetHeightPercent(100),this.edNachname.SetTextHint("Nachname"),this.edNachname.SetWidthStyle(2),this.edNachname.SetWidthPercent(100),this.SetEvent$1(this.edNachname,this,"OnKeyPress","edNachnameKeyPress"),this.edVorname.SetParentComponent(this),this.edVorname.SetName("edVorname"),this.edVorname.SetLeft(96),this.edVorname.SetTop(120),this.edVorname.SetWidth(96),this.edVorname.SetHeight(25),this.edVorname.SetChildOrderEx(5),this.edVorname.SetElementFont(1),this.edVorname.SetElementPosition(2),this.edVorname.SetHeightStyle(2),this.edVorname.SetHeightPercent(100),this.edVorname.SetTextHint("Vorname"),this.edVorname.SetWidthStyle(2),this.edVorname.SetWidthPercent(100),this.SetEvent$1(this.edVorname,this,"OnKeyPress","edVornameKeyPress"),this.WebMessageDlg1.SetParentComponent(this),this.WebMessageDlg1.SetName("WebMessageDlg1"),this.WebMessageDlg1.SetLeft(312),this.WebMessageDlg1.SetTop(232),this.WebMessageDlg1.SetWidth(24),this.WebMessageDlg1.SetHeight(24),this.WebMessageDlg1.FButtons={},this.WebMessageDlg1.FOpacity=.2,this.btBack.SetParentComponent(this),this.btBack.SetName("btBack"),this.btBack.SetLeft(184),this.btBack.SetTop(213),this.btBack.SetWidth(96),this.btBack.SetHeight(25),this.btBack.SetCaption("Zurück"),this.btBack.SetChildOrderEx(7),this.btBack.SetElementFont(1),this.btBack.SetElementPosition(2),this.btBack.SetHeightStyle(2),this.btBack.SetHeightPercent(100),this.btBack.SetWidthStyle(2),this.btBack.SetWidthPercent(100),this.SetEvent$1(this.btBack,this,"OnClick","btBackClick")}finally{this.WebLabel1.AfterLoadDFMValues(),this.btLoginNew.AfterLoadDFMValues(),this.pnlMessage.AfterLoadDFMValues(),this.lbMessage.AfterLoadDFMValues(),this.WebButton1.AfterLoadDFMValues(),this.edEmail.AfterLoadDFMValues(),this.edNachname.AfterLoadDFMValues(),this.edVorname.AfterLoadDFMValues(),this.WebMessageDlg1.AfterLoadDFMValues(),this.btBack.AfterLoadDFMValues()}},rtl.addIntf(this,pas["WEBLib.Controls"].IControl),rtl.addIntf(this,pas.System.IUnknown);var e=this.$rtti;e.addField("btLoginNew",pas["WEBLib.StdCtrls"].$rtti.TButton,4),e.addField("pnlMessage",pas["WEBLib.ExtCtrls"].$rtti.TPanel,4),e.addField("lbMessage",pas["WEBLib.StdCtrls"].$rtti.TLabel,4),e.addField("WebButton1",pas["WEBLib.StdCtrls"].$rtti.TButton,4),e.addField("WebLabel1",pas["WEBLib.StdCtrls"].$rtti.TLabel,4),e.addField("edEmail",pas["WEBLib.StdCtrls"].$rtti.TEdit,4),e.addField("edNachname",pas["WEBLib.StdCtrls"].$rtti.TEdit,4),e.addField("edVorname",pas["WEBLib.StdCtrls"].$rtti.TEdit,4),e.addField("WebMessageDlg1",pas["WEBLib.Dialogs"].$rtti.TMessageDlg,4),e.addField("btBack",pas["WEBLib.StdCtrls"].$rtti.TButton,4),e.addMethod("btBackClick",0,[["Sender",pas.System.$rtti.TObject]],4),e.addMethod("btLoginNewClick",0,[["Sender",pas.System.$rtti.TObject]],4),e.addMethod("edNachnameKeyPress",0,[["Sender",pas.System.$rtti.TObject],["Key",rtl.char,1]],4),e.addMethod("WebFormCreate",0,[["Sender",pas.System.$rtti.TObject]],4),e.addMethod("edEmailKeyPress",0,[["Sender",pas.System.$rtti.TObject],["Key",rtl.char,1]],4),e.addMethod("edVornameKeyPress",0,[["Sender",pas.System.$rtti.TObject],["Key",rtl.char,1]],4),e.addMethod("WebButton1Click",0,[["Sender",pas.System.$rtti.TObject]],4)})),this.FViewLoginNew=null}),["mpoweb.Auth.Service","mpoView.ErrorPage"]),rtl.module("mpoView.LoginPW",["System","SysUtils","Classes","WEBLib.Graphics","WEBLib.Controls","WEBLib.Forms","WEBLib.Dialogs","WEBLib.Controls","WEBLib.StdCtrls","WEBLib.StdCtrls","XData.Web.Connection","WEBLib.ExtCtrls","mpoweb.App.Types","mpoweb.ConnectionModule","WEBLib.WebCtrls"],(function(){"use strict";var t=this;rtl.createClass(this,"TFViewLoginPW",pas["WEBLib.Forms"].TForm,(function(){this.$init=function(){pas["WEBLib.Forms"].TForm.$init.call(this),this.btLoginPW=null,this.pnlMessage=null,this.lbMessage=null,this.btMessageAus=null,this.WebLabel1=null,this.edEmail=null,this.edNachname=null,this.WebMessageDlg1=null,this.btBack=null,this.FLoginProc=null,this.FMessage=""},this.$final=function(){this.btLoginPW=void 0,this.pnlMessage=void 0,this.lbMessage=void 0,this.btMessageAus=void 0,this.WebLabel1=void 0,this.edEmail=void 0,this.edNachname=void 0,this.WebMessageDlg1=void 0,this.btBack=void 0,this.FLoginProc=void 0,pas["WEBLib.Forms"].TForm.$final.call(this)},this.btLoginPWClick=function(t){var e=this;var i="";i="",pas.SysUtils.TStringHelper.GetLength.call({a:pas.SysUtils.Trim(this.edEmail.GetText()),get:function(){return this.a},set:function(t){this.a=t}})<2&&(i=i+pas.System.sLineBreak+'Bitte Feld "Email-Adresse" prüfen. '),pas.SysUtils.TStringHelper.GetLength.call({a:pas.SysUtils.Trim(this.edNachname.GetText()),get:function(){return this.a},set:function(t){this.a=t}})<2&&(i=i+pas.System.sLineBreak+'Bitte Feld "Nachname" prüfen. '),""===i?pas["mpoweb.Auth.Service"].AuthService().LoginPW(this.edEmail.GetText(),this.edNachname.GetText(),(function(){e.WebMessageDlg1.ShowDialog$2(pas["mpoweb.Auth.Service"].AuthService().GetLoginPWResult(),2,rtl.createSet(2)),e.FLoginProc()}),(function(t){e.ShowNotification("Login Error: "+t)})):this.ShowNotification("Fehler: "+i)},this.edEmailKeyPress=function(t,e){"\r"===e.get()&&this.edNachname.SetFocus()},this.edNachnameKeyPress=function(t,e){"\r"===e.get()&&this.btLoginPW.SetFocus()},this.WebFormCreate=function(t){""!==this.FMessage?this.ShowNotification(this.FMessage):this.HiddenNotification()},this.btMessageAusClick=function(t){this.HiddenNotification()},this.btBackClick=function(t){this.FLoginProc()},this.ShowNotification=function(t){""!==t&&(this.lbMessage.SetCaption(t),this.pnlMessage.GetElementHandle().hidden=!1)},this.HiddenNotification=function(){this.pnlMessage.GetElementHandle().hidden=!0},this.Display=function(e){t.TFViewLoginPW.Display$1(e,"")},this.Display$1=function(e,i){null!=t.FViewLoginPW&&rtl.free(t,"FViewLoginPW"),t.FViewLoginPW=t.TFViewLoginPW.$create("CreateNew$3",[function(t){t.FMessage=i}]),t.FViewLoginPW.FLoginProc=e},this.LoadDFMValues=function(){pas["WEBLib.Forms"].TCustomForm.LoadDFMValues.call(this),this.WebLabel1=pas["WEBLib.StdCtrls"].TLabel.$create("Create$2",["view.loginpw.title"]),this.btLoginPW=pas["WEBLib.StdCtrls"].TButton.$create("Create$2",["view.loginpw.btlogin"]),this.pnlMessage=pas["WEBLib.ExtCtrls"].TPanel.$create("Create$2",["view.loginpw.message"]),this.lbMessage=pas["WEBLib.StdCtrls"].TLabel.$create("Create$2",["view.loginpw.message.label"]),this.btMessageAus=pas["WEBLib.StdCtrls"].TButton.$create("Create$2",["view.loginpw.message.button"]),this.edEmail=pas["WEBLib.StdCtrls"].TEdit.$create("Create$2",["view.loginpw.Email"]),this.edNachname=pas["WEBLib.StdCtrls"].TEdit.$create("Create$2",["view.loginpw.Nachname"]),this.WebMessageDlg1=pas["WEBLib.Dialogs"].TMessageDlg.$create("Create$1",[this]),this.btBack=pas["WEBLib.StdCtrls"].TButton.$create("Create$2",["view.loginpw.btback"]),this.WebLabel1.BeforeLoadDFMValues(),this.btLoginPW.BeforeLoadDFMValues(),this.pnlMessage.BeforeLoadDFMValues(),this.lbMessage.BeforeLoadDFMValues(),this.btMessageAus.BeforeLoadDFMValues(),this.edEmail.BeforeLoadDFMValues(),this.edNachname.BeforeLoadDFMValues(),this.WebMessageDlg1.BeforeLoadDFMValues(),this.btBack.BeforeLoadDFMValues();try{this.SetName("FViewLoginPW"),this.SetWidth(640),this.SetHeight(480),this.SetElementFont(1),this.FFont.FCharset=1,this.FFont.SetColor(65793),this.FFont.SetHeight(-11),this.FFont.SetName("Tahoma"),this.FFont.SetStyle({}),this.SetParentFont(!1),this.SetEvent(this,"OnCreate","WebFormCreate"),this.WebLabel1.SetParentComponent(this),this.WebLabel1.SetName("WebLabel1"),this.WebLabel1.SetLeft(184),this.WebLabel1.SetTop(8),this.WebLabel1.SetWidth(120),this.WebLabel1.SetHeight(13),this.WebLabel1.SetCaption("Zugangsdaten anfordern"),this.WebLabel1.SetElementFont(1),this.WebLabel1.SetElementPosition(2),this.WebLabel1.SetHeightStyle(2),this.WebLabel1.SetHeightPercent(100),this.WebLabel1.SetWidthStyle(2),this.WebLabel1.SetWidthPercent(100),this.btLoginPW.SetParentComponent(this),this.btLoginPW.SetName("btLoginPW"),this.btLoginPW.SetLeft(184),this.btLoginPW.SetTop(182),this.btLoginPW.SetWidth(161),this.btLoginPW.SetHeight(25),this.btLoginPW.SetCaption("Neues Passwort anfordern"),this.btLoginPW.SetElementPosition(2),this.btLoginPW.SetHeightStyle(2),this.btLoginPW.SetHeightPercent(100),this.btLoginPW.SetWidthStyle(2),this.btLoginPW.SetWidthPercent(100),this.SetEvent$1(this.btLoginPW,this,"OnClick","btLoginPWClick"),this.pnlMessage.SetParentComponent(this),this.pnlMessage.SetName("pnlMessage"),this.pnlMessage.SetLeft(325),this.pnlMessage.SetTop(80),this.pnlMessage.SetWidth(121),this.pnlMessage.SetHeight(33),this.pnlMessage.SetChildOrderEx(8),this.lbMessage.SetParentComponent(this.pnlMessage),this.lbMessage.SetName("lbMessage"),this.lbMessage.SetLeft(16),this.lbMessage.SetTop(11),this.lbMessage.SetWidth(42),this.lbMessage.SetHeight(13),this.lbMessage.SetCaption("Message"),this.lbMessage.SetHeightPercent(100),this.lbMessage.SetWidthPercent(100),this.btMessageAus.SetParentComponent(this.pnlMessage),this.btMessageAus.SetName("btMessageAus"),this.btMessageAus.SetLeft(96),this.btMessageAus.SetTop(3),this.btMessageAus.SetWidth(22),this.btMessageAus.SetHeight(25),this.btMessageAus.SetCaption("x"),this.btMessageAus.SetChildOrderEx(1),this.btMessageAus.SetHeightPercent(100),this.btMessageAus.SetWidthPercent(100),this.SetEvent$1(this.btMessageAus,this,"OnClick","btMessageAusClick"),this.edEmail.SetParentComponent(this),this.edEmail.SetName("edEmail"),this.edEmail.SetLeft(96),this.edEmail.SetTop(64),this.edEmail.SetWidth(96),this.edEmail.SetHeight(25),this.edEmail.SetChildOrderEx(3),this.edEmail.SetElementFont(1),this.edEmail.SetElementPosition(2),this.edEmail.SetHeightStyle(2),this.edEmail.SetHeightPercent(100),this.edEmail.SetTextHint("Email-Adresse"),this.edEmail.SetWidthStyle(2),this.edEmail.SetWidthPercent(100),this.SetEvent$1(this.edEmail,this,"OnKeyPress","edEmailKeyPress"),this.edNachname.SetParentComponent(this),this.edNachname.SetName("edNachname"),this.edNachname.SetLeft(96),this.edNachname.SetTop(126),this.edNachname.SetWidth(96),this.edNachname.SetHeight(25),this.edNachname.SetChildOrderEx(4),this.edNachname.SetElementFont(1),this.edNachname.SetElementPosition(2),this.edNachname.SetHeightStyle(2),this.edNachname.SetHeightPercent(100),this.edNachname.SetTextHint("Nachname"),this.edNachname.SetWidthStyle(2),this.edNachname.SetWidthPercent(100),this.SetEvent$1(this.edNachname,this,"OnKeyPress","edNachnameKeyPress"),this.WebMessageDlg1.SetParentComponent(this),this.WebMessageDlg1.SetName("WebMessageDlg1"),this.WebMessageDlg1.SetLeft(80),this.WebMessageDlg1.SetTop(336),this.WebMessageDlg1.SetWidth(24),this.WebMessageDlg1.SetHeight(24),this.WebMessageDlg1.FButtons={},this.WebMessageDlg1.FOpacity=.2,this.btBack.SetParentComponent(this),this.btBack.SetName("btBack"),this.btBack.SetLeft(184),this.btBack.SetTop(213),this.btBack.SetWidth(161),this.btBack.SetHeight(25),this.btBack.SetCaption("Zurück"),this.btBack.SetChildOrderEx(6),this.btBack.SetElementFont(1),this.btBack.SetElementPosition(2),this.btBack.SetHeightStyle(2),this.btBack.SetHeightPercent(100),this.btBack.SetWidthStyle(2),this.btBack.SetWidthPercent(100),this.SetEvent$1(this.btBack,this,"OnClick","btBackClick")}finally{this.WebLabel1.AfterLoadDFMValues(),this.btLoginPW.AfterLoadDFMValues(),this.pnlMessage.AfterLoadDFMValues(),this.lbMessage.AfterLoadDFMValues(),this.btMessageAus.AfterLoadDFMValues(),this.edEmail.AfterLoadDFMValues(),this.edNachname.AfterLoadDFMValues(),this.WebMessageDlg1.AfterLoadDFMValues(),this.btBack.AfterLoadDFMValues()}},rtl.addIntf(this,pas["WEBLib.Controls"].IControl),rtl.addIntf(this,pas.System.IUnknown);var e=this.$rtti;e.addField("btLoginPW",pas["WEBLib.StdCtrls"].$rtti.TButton,4),e.addField("pnlMessage",pas["WEBLib.ExtCtrls"].$rtti.TPanel,4),e.addField("lbMessage",pas["WEBLib.StdCtrls"].$rtti.TLabel,4),e.addField("btMessageAus",pas["WEBLib.StdCtrls"].$rtti.TButton,4),e.addField("WebLabel1",pas["WEBLib.StdCtrls"].$rtti.TLabel,4),e.addField("edEmail",pas["WEBLib.StdCtrls"].$rtti.TEdit,4),e.addField("edNachname",pas["WEBLib.StdCtrls"].$rtti.TEdit,4),e.addField("WebMessageDlg1",pas["WEBLib.Dialogs"].$rtti.TMessageDlg,4),e.addField("btBack",pas["WEBLib.StdCtrls"].$rtti.TButton,4),e.addMethod("btLoginPWClick",0,[["Sender",pas.System.$rtti.TObject]],4),e.addMethod("edEmailKeyPress",0,[["Sender",pas.System.$rtti.TObject],["Key",rtl.char,1]],4),e.addMethod("edNachnameKeyPress",0,[["Sender",pas.System.$rtti.TObject],["Key",rtl.char,1]],4),e.addMethod("WebFormCreate",0,[["Sender",pas.System.$rtti.TObject]],4),e.addMethod("btMessageAusClick",0,[["Sender",pas.System.$rtti.TObject]],4),e.addMethod("btBackClick",0,[["Sender",pas.System.$rtti.TObject]],4)})),this.FViewLoginPW=null}),["mpoweb.Auth.Service","mpoView.ErrorPage"]),rtl.module("mpoView.Login",["System","SysUtils","Classes","WEBLib.Graphics","WEBLib.Controls","WEBLib.Forms","WEBLib.Dialogs","WEBLib.Controls","WEBLib.StdCtrls","WEBLib.StdCtrls","XData.Web.Connection","WEBLib.ExtCtrls","mpoweb.App.Types","mpoweb.ConnectionModule"],(function(){"use strict";var t=this;rtl.createClass(this,"TFViewLogin",pas["WEBLib.Forms"].TForm,(function(){this.$init=function(){pas["WEBLib.Forms"].TForm.$init.call(this),this.WebLabel1=null,this.edUser=null,this.edPassword=null,this.btLogin=null,this.pnlMessage=null,this.lbMessage=null,this.WebButton1=null,this.btLoginNew=null,this.btNewPassword=null,this.FLoginProc=null,this.FLoginNewProc=null,this.FLoginPWProc=null,this.FMessage=""},this.$final=function(){this.WebLabel1=void 0,this.edUser=void 0,this.edPassword=void 0,this.btLogin=void 0,this.pnlMessage=void 0,this.lbMessage=void 0,this.WebButton1=void 0,this.btLoginNew=void 0,this.btNewPassword=void 0,this.FLoginProc=void 0,this.FLoginNewProc=void 0,this.FLoginPWProc=void 0,pas["WEBLib.Forms"].TForm.$final.call(this)},this.btLoginClick=function(t){var e=this;pas["mpoweb.Auth.Service"].AuthService().Login(this.edUser.GetText(),this.edPassword.GetText(),(function(){e.FLoginProc()}),(function(t){e.ShowNotification("Login Error: "+t)}))},this.btLoginNewClick=function(t){this.FMessage="",this.FLoginNewProc()},this.btNewPasswordClick=function(t){this.FMessage="",this.FLoginPWProc()},this.WebButton1Click=function(t){this.HiddenNotification()},this.WebFormCreate=function(t){""!==this.FMessage?this.ShowNotification(this.FMessage):this.HiddenNotification()},this.edUserKeyPress=function(t,e){"\r"===e.get()&&this.edPassword.SetFocus()},this.edPasswordKeyPress=function(t,e){"\r"===e.get()&&this.btLogin.Click()},this.ShowNotification=function(t){""!==t&&(pas.SysUtils.TStringHelper.Contains.call({get:function(){return t},set:function(e){t=e}},"xLogin not authenticated: Invalid Password")&&(t="Fehler: Unbekannter Benutzer oder unbekanntes Passwort"),pas.SysUtils.TStringHelper.Contains.call({get:function(){return t},set:function(e){t=e}},"Too many failed login attempts.  Please try again later.")&&(t="Fehler: Zu viele fehlerhafte Anmeldeversuche. Bitte probieren sie es später noch einmal"),this.lbMessage.SetCaption(t),this.pnlMessage.GetElementHandle().hidden=!1)},this.HiddenNotification=function(){this.pnlMessage.GetElementHandle().hidden=!0},this.Display$2=function(e,i,s,n){null!=t.FViewLogin&&rtl.free(t,"FViewLogin"),t.FViewLogin=t.TFViewLogin.$create("CreateNew$3",[function(t){t.FMessage=n}]),t.FViewLogin.FLoginProc=e,t.FViewLogin.FLoginNewProc=i,t.FViewLogin.FLoginPWProc=s},this.LoadDFMValues=function(){pas["WEBLib.Forms"].TCustomForm.LoadDFMValues.call(this),this.WebLabel1=pas["WEBLib.StdCtrls"].TLabel.$create("Create$2",["view.login.title"]),this.edUser=pas["WEBLib.StdCtrls"].TEdit.$create("Create$2",["view.login.eduser"]),this.edPassword=pas["WEBLib.StdCtrls"].TEdit.$create("Create$2",["view.login.edpassword"]),this.btLogin=pas["WEBLib.StdCtrls"].TButton.$create("Create$2",["view.login.btlogin"]),this.pnlMessage=pas["WEBLib.ExtCtrls"].TPanel.$create("Create$2",["view.login.message"]),this.lbMessage=pas["WEBLib.StdCtrls"].TLabel.$create("Create$2",["view.login.message.label"]),this.WebButton1=pas["WEBLib.StdCtrls"].TButton.$create("Create$2",["view.login.message.button"]),this.btLoginNew=pas["WEBLib.StdCtrls"].TButton.$create("Create$2",["view.login.btloginnew"]),this.btNewPassword=pas["WEBLib.StdCtrls"].TButton.$create("Create$2",["view.login.btnewpassword"]),this.WebLabel1.BeforeLoadDFMValues(),this.edUser.BeforeLoadDFMValues(),this.edPassword.BeforeLoadDFMValues(),this.btLogin.BeforeLoadDFMValues(),this.pnlMessage.BeforeLoadDFMValues(),this.lbMessage.BeforeLoadDFMValues(),this.WebButton1.BeforeLoadDFMValues(),this.btLoginNew.BeforeLoadDFMValues(),this.btNewPassword.BeforeLoadDFMValues();try{this.SetName("FViewLogin"),this.SetWidth(640),this.SetHeight(480),this.FFont.FCharset=1,this.FFont.SetColor(65793),this.FFont.SetHeight(-11),this.FFont.SetName("Tahoma"),this.FFont.SetStyle({}),this.SetParentFont(!1),this.SetEvent(this,"OnCreate","WebFormCreate"),this.WebLabel1.SetParentComponent(this),this.WebLabel1.SetName("WebLabel1"),this.WebLabel1.SetLeft(240),this.WebLabel1.SetTop(112),this.WebLabel1.SetWidth(71),this.WebLabel1.SetHeight(13),this.WebLabel1.SetCaption("Bitte anmelden"),this.WebLabel1.SetHeightPercent(100),this.WebLabel1.SetTransparent(!1),this.WebLabel1.SetWidthPercent(100),this.edUser.SetParentComponent(this),this.edUser.SetName("edUser"),this.edUser.SetLeft(240),this.edUser.SetTop(136),this.edUser.SetWidth(121),this.edUser.SetHeight(21),this.edUser.SetHeightPercent(100),this.edUser.SetTextHint("Email-Adresse"),this.edUser.SetWidthPercent(100),this.SetEvent$1(this.edUser,this,"OnKeyPress","edUserKeyPress"),this.edPassword.SetParentComponent(this),this.edPassword.SetName("edPassword"),this.edPassword.SetLeft(240),this.edPassword.SetTop(163),this.edPassword.SetWidth(121),this.edPassword.SetHeight(21),this.edPassword.SetHeightPercent(100),this.edPassword.SetPasswordChar("*"),this.edPassword.SetTabOrder(1),this.edPassword.SetTextHint("Password"),this.edPassword.SetWidthPercent(100),this.SetEvent$1(this.edPassword,this,"OnKeyPress","edPasswordKeyPress"),this.btLogin.SetParentComponent(this),this.btLogin.SetName("btLogin"),this.btLogin.SetLeft(237),this.btLogin.SetTop(283),this.btLogin.SetWidth(121),this.btLogin.SetHeight(25),this.btLogin.SetCaption("Login"),this.btLogin.SetHeightPercent(100),this.btLogin.SetTabOrder(2),this.btLogin.SetWidthPercent(100),this.SetEvent$1(this.btLogin,this,"OnClick","btLoginClick"),this.pnlMessage.SetParentComponent(this),this.pnlMessage.SetName("pnlMessage"),this.pnlMessage.SetLeft(240),this.pnlMessage.SetTop(32),this.pnlMessage.SetWidth(121),this.pnlMessage.SetHeight(33),this.lbMessage.SetParentComponent(this.pnlMessage),this.lbMessage.SetName("lbMessage"),this.lbMessage.SetLeft(16),this.lbMessage.SetTop(11),this.lbMessage.SetWidth(42),this.lbMessage.SetHeight(13),this.lbMessage.SetCaption("Message"),this.lbMessage.SetHeightPercent(100),this.lbMessage.SetWidthPercent(100),this.WebButton1.SetParentComponent(this.pnlMessage),this.WebButton1.SetName("WebButton1"),this.WebButton1.SetLeft(96),this.WebButton1.SetTop(3),this.WebButton1.SetWidth(22),this.WebButton1.SetHeight(25),this.WebButton1.SetCaption("x"),this.WebButton1.SetHeightPercent(100),this.WebButton1.SetWidthPercent(100),this.SetEvent$1(this.WebButton1,this,"OnClick","WebButton1Click"),this.btLoginNew.SetParentComponent(this),this.btLoginNew.SetName("btLoginNew"),this.btLoginNew.SetLeft(240),this.btLoginNew.SetTop(252),this.btLoginNew.SetWidth(118),this.btLoginNew.SetHeight(25),this.btLoginNew.SetCaption("Neu Registrieren"),this.btLoginNew.SetHeightPercent(100),this.btLoginNew.SetWidthPercent(100),this.SetEvent$1(this.btLoginNew,this,"OnClick","btLoginNewClick"),this.btNewPassword.SetParentComponent(this),this.btNewPassword.SetName("btNewPassword"),this.btNewPassword.SetLeft(240),this.btNewPassword.SetTop(221),this.btNewPassword.SetWidth(118),this.btNewPassword.SetHeight(25),this.btNewPassword.SetCaption("Passwort vergessen"),this.btNewPassword.SetHeightPercent(100),this.btNewPassword.SetWidthPercent(100),this.SetEvent$1(this.btNewPassword,this,"OnClick","btNewPasswordClick")}finally{this.WebLabel1.AfterLoadDFMValues(),this.edUser.AfterLoadDFMValues(),this.edPassword.AfterLoadDFMValues(),this.btLogin.AfterLoadDFMValues(),this.pnlMessage.AfterLoadDFMValues(),this.lbMessage.AfterLoadDFMValues(),this.WebButton1.AfterLoadDFMValues(),this.btLoginNew.AfterLoadDFMValues(),this.btNewPassword.AfterLoadDFMValues()}},rtl.addIntf(this,pas["WEBLib.Controls"].IControl),rtl.addIntf(this,pas.System.IUnknown);var e=this.$rtti;e.addField("WebLabel1",pas["WEBLib.StdCtrls"].$rtti.TLabel,4),e.addField("edUser",pas["WEBLib.StdCtrls"].$rtti.TEdit,4),e.addField("edPassword",pas["WEBLib.StdCtrls"].$rtti.TEdit,4),e.addField("btLogin",pas["WEBLib.StdCtrls"].$rtti.TButton,4),e.addField("pnlMessage",pas["WEBLib.ExtCtrls"].$rtti.TPanel,4),e.addField("lbMessage",pas["WEBLib.StdCtrls"].$rtti.TLabel,4),e.addField("WebButton1",pas["WEBLib.StdCtrls"].$rtti.TButton,4),e.addField("btLoginNew",pas["WEBLib.StdCtrls"].$rtti.TButton,4),e.addField("btNewPassword",pas["WEBLib.StdCtrls"].$rtti.TButton,4),e.addMethod("btLoginClick",0,[["Sender",pas.System.$rtti.TObject]],4),e.addMethod("btLoginNewClick",0,[["Sender",pas.System.$rtti.TObject]],4),e.addMethod("btNewPasswordClick",0,[["Sender",pas.System.$rtti.TObject]],4),e.addMethod("WebButton1Click",0,[["Sender",pas.System.$rtti.TObject]],4),e.addMethod("WebFormCreate",0,[["Sender",pas.System.$rtti.TObject]],4),e.addMethod("edUserKeyPress",0,[["Sender",pas.System.$rtti.TObject],["Key",rtl.char,1]],4),e.addMethod("edPasswordKeyPress",0,[["Sender",pas.System.$rtti.TObject],["Key",rtl.char,1]],4)})),this.FViewLogin=null}),["mpoweb.Auth.Service","mpoView.ErrorPage","mpoView.LoginNew","mpoView.LoginPW"]),rtl.module("WEBLib.Lists",["System","Classes","Web","WEBLib.Controls","WEBLib.Dialogs","WEBLib.Menus"],(function(){"use strict";var t=this;this.$rtti.$Class("TListItem"),this.$rtti.$Class("TListItems"),this.$rtti.$Class("TListControl"),this.TListStyle={0:"lsNone",lsNone:0,1:"lsPagination",lsPagination:1,2:"lsTabs",lsTabs:2,3:"lsBreadcrumb",lsBreadcrumb:3,4:"lsListGroup",lsListGroup:4,5:"lsListGroupHorizontal",lsListGroupHorizontal:5,6:"lsNavPills",lsNavPills:6,7:"lsNavPillsHorizontal",lsNavPillsHorizontal:7,8:"lsDropDown",lsDropDown:8},this.$rtti.$Enum("TListStyle",{minvalue:0,maxvalue:8,ordtype:1,enumtype:this.TListStyle}),this.$rtti.$MethodVar("TListGetItemClassEvent",{procsig:rtl.newTIProcSig([["Sender",pas.System.$rtti.TObject],["AItem",this.$rtti.TListItem],["AClassName",rtl.string,1]]),methodkind:0}),this.$rtti.$MethodVar("TListGetItemChildrenEvent",{procsig:rtl.newTIProcSig([["Sender",pas.System.$rtti.TObject],["AItem",this.$rtti.TListItem],["AElement",pas["WEBLib.Controls"].$rtti.TJSHTMLElementRecord]]),methodkind:0}),this.$rtti.$MethodVar("TListItemEvent",{procsig:rtl.newTIProcSig([["Sender",pas.System.$rtti.TObject],["AListItem",this.$rtti.TListItem]]),methodkind:0}),rtl.createClass(this,"TListItem",pas.Classes.TCollectionItem,(function(){this.$init=function(){pas.Classes.TCollectionItem.$init.call(this),this.FItems=null,this.FLink="",this.FLinkTarget="",this.FText="",this.FItemClassName="",this.FLinkClassName="",this.FTag=0,this.FListElement=null,this.FEnabled=!1,this.FActive=!1,this.FAutoCollaps=!1,this.FHint="",this.FHTMLChilds=0,this.FBackupElement=null,this.FBackupCollapse=!1,this.FLinkElement=null,this.FAbsIndex=0},this.$final=function(){this.FItems=void 0,this.FListElement=void 0,this.FBackupElement=void 0,this.FLinkElement=void 0,pas.Classes.TCollectionItem.$final.call(this)},this.SetItems=function(t){this.FItems.Assign(t)},this.SetLink=function(t){this.FLink=t,this.Changed(!1)},this.SetText=function(t){this.FText=t,this.Changed(!1)},this.SetActive=function(t){this.FActive=t,this.Changed(!1)},this.SetEnabled=function(t){this.FEnabled=t,this.Changed(!1)},this.SetAutoCollaps=function(t){this.FAutoCollaps=t,this.Changed(!1)},this.SetHint=function(t){this.FHint=t,this.Changed(!1)},this.SubItemsChanged=function(t){this.Changed(!1)},this.Create$1=function(e){var i=null;return this.FItems=t.TListItems.$create("Create$3",[this]),this.FItems.FPropName="Items",this.FItems.FOnChange=rtl.createCallback(this,"SubItemsChanged"),pas.Classes.TCollectionItem.Create$1.apply(this,arguments),this.FActive=!1,this.FEnabled=!0,this.FBackupElement=null,null!=(i=rtl.as(e,t.TListItems).GetListControl())&&(this.FItemClassName=i.FDefaultItemClassName,this.FLinkClassName=i.FDefaultItemLinkClassName),this},this.Destroy=function(){rtl.free(this,"FItems"),pas.Classes.TCollectionItem.Destroy.call(this)},this.Assign=function(e){t.TListItem.isPrototypeOf(e)&&(this.FItemClassName=rtl.as(e,t.TListItem).FItemClassName,this.FText=rtl.as(e,t.TListItem).FText,this.FLink=rtl.as(e,t.TListItem).FLink,this.FLinkClassName=rtl.as(e,t.TListItem).FLinkClassName,this.FLinkTarget=rtl.as(e,t.TListItem).FLinkTarget,this.FItems.Assign(rtl.as(e,t.TListItem).FItems),this.FTag=rtl.as(e,t.TListItem).FTag,this.FEnabled=rtl.as(e,t.TListItem).FEnabled,this.FActive=rtl.as(e,t.TListItem).FActive,this.FHint=rtl.as(e,t.TListItem).FHint)},this.ItemId=function(){var e="",i=null;function s(e){var i=!1;return i=!1,null!=e.FCollection&&null!=e.FCollection.Owner()&&(i=t.TListItem.isPrototypeOf(e.FCollection.Owner())),i}for(e=pas.SysUtils.IntToStr(this.GetIndex()),i=this;s(i);)i=rtl.as(i.FCollection.Owner(),t.TListItem),e=e+"_"+pas.SysUtils.IntToStr(this.GetIndex());return e},this.Store=function(){if(null==this.FBackupElement&&(this.FBackupElement=document.createElement("SPAN")),this.FBackupCollapse=this.IsCollapsed(),null!=this.FListElement)for(;this.FListElement.childElementCount>0;)this.FBackupElement.appendChild(this.FListElement.firstElementChild);this.FItems.Store()},this.Restore=function(){var t=0;if(null!=this.FListElement&&null!=this.FBackupElement)for(t=0;this.FBackupElement.childElementCount>0;)t>=this.FHTMLChilds?this.FListElement.appendChild(this.FBackupElement.firstElementChild):this.FBackupElement.removeChild(this.FBackupElement.firstElementChild);this.FBackupCollapse||this.Expand(),this.FItems.Restore()},this.IsLink=function(){return""!==this.FLink},this.IsCollapsed=function(){var t=!1,e=null;return t=!0,null!=this.FListElement&&null!=(e=this.FListElement.nextElementSibling)&&"DIV"===e.tagName&&(t=!e.classList.contains("show")),t},this.Expand=function(){var t=null;null!=this.FListElement&&null!=(t=this.FListElement.nextElementSibling)&&"DIV"===t.tagName&&(t.classList.contains("show")||t.classList.add("show"))},this.Collapse=function(){var t=null;null!=this.FListElement&&null!=(t=this.FListElement.nextElementSibling)&&"DIV"===t.tagName&&t.classList.contains("show")&&t.classList.remove("show")};var e=this.$rtti;e.addProperty("Active",2,rtl.boolean,"FActive","SetActive"),e.addProperty("AutoCollaps",2,rtl.boolean,"FAutoCollaps","SetAutoCollaps"),e.addProperty("Enabled",2,rtl.boolean,"FEnabled","SetEnabled"),e.addProperty("Hint",2,rtl.string,"FHint","SetHint"),e.addProperty("ItemClassName",0,pas["WEBLib.Controls"].$rtti.TElementClassName,"FItemClassName","FItemClassName"),e.addProperty("Items",2,t.$rtti.TListItems,"FItems","SetItems"),e.addProperty("Link",2,rtl.string,"FLink","SetLink"),e.addProperty("LinkClassName",0,pas["WEBLib.Controls"].$rtti.TElementClassName,"FLinkClassName","FLinkClassName"),e.addProperty("LinkTarget",0,rtl.string,"FLinkTarget","FLinkTarget"),e.addProperty("Tag",0,rtl.longint,"FTag","FTag"),e.addProperty("Text",2,rtl.string,"FText","SetText")})),rtl.createClass(this,"TListItems",pas.Classes.TOwnedCollection,(function(){this.$init=function(){pas.Classes.TOwnedCollection.$init.call(this),this.FOnChange=null},this.$final=function(){this.FOnChange=void 0,pas.Classes.TOwnedCollection.$final.call(this)},this.GetItem$1=function(t){return this.GetItem(t)},this.GetListControl=function(){return function e(i){var s=null;return s=null,t.TListControl.isPrototypeOf(i)?s=rtl.as(i,t.TListControl):null!=i&&t.TListItem.isPrototypeOf(i)&&(s=e(rtl.as(i,t.TListItem).FCollection.Owner())),s}(this.Owner())},this.Update=function(t){pas.Classes.TCollection.Update.apply(this,arguments),this.DoChanged()},this.DoChanged=function(){null!=this.FOnChange&&this.FOnChange(this)},this.Store=function(){for(var t=0,e=0,i=this.GetCount()-1;e<=i;e++)t=e,this.GetItem$1(t).Store()},this.Restore=function(){for(var t=0,e=0,i=this.GetCount()-1;e<=i;e++)t=e,this.GetItem$1(t).Restore()},this.Create$3=function(e){return pas.Classes.TOwnedCollection.Create$2.call(this,e,t.TListItem),this},this.Add$1=function(){return pas.Classes.TCollection.Add.call(this)}})),rtl.createClass(this,"TListControl",pas["WEBLib.Menus"].TWebCustomControl,(function(){this.$init=function(){pas["WEBLib.Menus"].TWebCustomControl.$init.call(this),this.FItems=null,this.FElementListClassName="",this.FOnGetItemChildren=null,this.FOnGetItemClass=null,this.FOnItemDblClick=null,this.FOnItemClick=null,this.FDefaultItemClassName="",this.FDefaultItemLinkClassName="",this.FListStyle=0,this.FMultiSelect=!1,this.FAutoSelect=!1},this.$final=function(){this.FItems=void 0,this.FOnGetItemChildren=void 0,this.FOnGetItemClass=void 0,this.FOnItemDblClick=void 0,this.FOnItemClick=void 0,pas["WEBLib.Menus"].TWebCustomControl.$final.call(this)},this.SetItems=function(t){this.FItems=t},this.SetListStyle=function(t){if(this.FListStyle=t,!this.IsUpdating()){var e=this.FListStyle;1===e?(this.FDefaultItemClassName="page-item",this.FDefaultItemLinkClassName="page-link",this.SetElementListClassName("pagination")):2===e?(this.FDefaultItemClassName="nav-item",this.FDefaultItemLinkClassName="nav-link",this.SetElementListClassName("nav nav-tabs")):3===e?(this.FDefaultItemClassName="breadcrumb-item",this.FDefaultItemLinkClassName="breadcrumb-link",this.SetElementListClassName("breadcrumb")):4===e?(this.FDefaultItemClassName="list-group-item",this.FDefaultItemLinkClassName="list-group-link",this.SetElementListClassName("list-group")):5===e?(this.FDefaultItemClassName="list-group-item",this.FDefaultItemLinkClassName="list-group-link",this.SetElementListClassName("list-group list-group-horizontal")):6===e?(this.FDefaultItemClassName="nav-item",this.FDefaultItemLinkClassName="nav-link",this.SetElementListClassName("nav nav-pills flex-column")):7===e&&(this.FDefaultItemClassName="nav-item",this.FDefaultItemLinkClassName="nav-link",this.SetElementListClassName("nav nav-pills"))}},this.SetElementListClassName=function(t){this.FElementListClassName=t,this.UpdateElement()},this.SetItemIndex=function(t){var e=0,i=0,s=0;this.BeginUpdate(),s=0;for(var n=0,r=this.FItems.GetCount()-1;n<=r;n++)if(e=n,this.FItems.GetItem$1(e).SetActive(t===s),s+=1,this.FItems.GetItem$1(e).FItems.GetCount()>0)for(var a=0,o=this.FItems.GetItem$1(e).FItems.GetCount()-1;a<=o;a++)i=a,this.FItems.GetItem$1(e).FItems.GetItem$1(i).SetActive(t===s),s+=1;this.EndUpdate()},this.HandleDoClick=function(t){var e=null;return null!=this.FOnItemClick&&(t.preventDefault(),t.stopPropagation()),null!=(e=this.ListItemByElement(t.target))&&(this.FAutoSelect&&(this.FMultiSelect?e.SetActive(!e.FActive):this.SetItemIndex(e.FAbsIndex)),null!=e&&this.ItemClick(e)),!1,!1},this.HandleDoDblClick=function(t){var e;return null!=(e=this.ListItemByElement(t.target))&&this.ItemDblClick(e),!1,!1},this.HandleDoAnchorClick=function(t){var e;return null!=(e=this.ListItemByElement(t.target.parentNode))&&this.ItemClick(e),!1,!1},this.ItemsChanged=function(t){var e=null,i=0;if(!this.IsUpdating()&&null!=this.GetElementHandle()){if(null!=(e=this.ListElement())){for(4===this.FListStyle&&this.FItems.Store();null!=e.firstChild;)e.removeChild(e.firstChild);""!==this.FElementListClassName&&e.setAttribute("class",this.FElementListClassName),i=0,this.RenderList(e,this.FItems,{get:function(){return i},set:function(t){i=t}}),4===this.FListStyle&&this.FItems.Restore()}4 in this.FComponentState&&this.UpdateElement()}},this.ItemClick=function(t){null!=this.FOnItemClick&&this.FOnItemClick(this,t)},this.ItemDblClick=function(t){null!=this.FOnItemDblClick&&this.FOnItemDblClick(this,t)},this.GetItemClass=function(t,e){null!=this.FOnGetItemClass&&this.FOnGetItemClass(this,t,e)},this.GetItemChildren=function(t,e){var i=pas["WEBLib.Controls"].TJSHTMLElementRecord.$new();i.element=e,null!=this.FOnGetItemChildren&&this.FOnGetItemChildren(this,t,pas["WEBLib.Controls"].TJSHTMLElementRecord.$clone(i))},this.CreateElement=function(){var t=null;return 8===this.FListStyle?t=document.createElement("UL"):(t=document.createElement("DIV")).appendChild(document.createElement("UL")),t},this.UpdateElement=function(){var t=null,e=null,i=0;if(pas["WEBLib.Controls"].TControl.UpdateElement.call(this),!this.IsUpdating()&&null!=this.GetElementHandle()){if(this.FItems.GetCount()>0){if(this.GetElementHandle().style.removeProperty(pas["WEBLib.Controls"].CSSBackground),null!=(e=this.GetElementHandle().firstChild)&&"DIV"===e.tagName&&"1"===e.getAttribute("data-design")&&this.GetElementHandle().removeChild(e),null!=(t=this.ListElement())){for(4===this.FListStyle&&this.FItems.Store();null!=t.firstChild;)t.removeChild(t.firstChild);""!==this.FElementListClassName&&t.setAttribute("class",this.FElementListClassName),this.GetElementHandle().style.removeProperty("overflow"),i=0,this.RenderList(t,this.FItems,{get:function(){return i},set:function(t){i=t}}),4===this.FListStyle&&this.FItems.Restore()}}else if(!this.GetIsLinked()&&4 in this.FComponentState)this.RenderDesigning("TWebListControl",this.GetContainer(),this,!0,"");else if(null!=(t=this.ListElement()))for(;null!=t.firstChild;)t.removeChild(t.firstChild);this.FListStyle in rtl.createSet(4)&&this.GetElementHandle().style.setProperty("overflow","auto")}},this.RenderList=function(t,e,i){var s=0,n=null,r=null,a=null,o=null,l="",h="",d="",u=!1,c=null;if(null!=t){2!==pas["WEBLib.Forms"].Application.GetBootstrapVersion()?(h="data-toggle",d="data-target"):(h="data-bs-toggle",d="data-bs-target");for(var F=0,p=e.GetCount()-1;F<=p;F++)s=F,r=document.createElement("li"),1===this.FDragMode&&r.setAttribute("draggable","true"),e.GetItem$1(s).FListElement=r,e.GetItem$1(s).FHTMLChilds=0,l=e.GetItem$1(s).FItemClassName,this.GetItemClass(e.GetItem$1(s),{get:function(){return l},set:function(t){l=t}}),e.GetItem$1(s).FActive&&6!==this.FListStyle&&(l+=" active"),e.GetItem$1(s).FEnabled||(l+=" disabled"),""!==l&&r.setAttribute("class",l),""!==e.GetItem$1(s).FHint&&r.setAttribute("title",e.GetItem$1(s).FHint),e.GetItem$1(s).IsLink()||1===this.FListStyle?(!(u=!(null!=e.GetItem$1(s).FLinkElement))&&e.GetItem$1(s).IsLink()||(e.GetItem$1(s).FLinkElement=document.createElement("a")),(a=e.GetItem$1(s).FLinkElement).innerHTML=e.GetItem$1(s).FText,l=e.GetItem$1(s).FLinkClassName,e.GetItem$1(s).FActive&&(l+=" active"),""!==e.GetItem$1(s).FLinkClassName&&a.setAttribute("class",l),""===e.GetItem$1(s).FLink?a.setAttribute("href","#"):a.setAttribute("href",e.GetItem$1(s).FLink),""!==e.GetItem$1(s).FLinkTarget&&a.setAttribute("target",e.GetItem$1(s).FLinkTarget),a.addEventListener("click",rtl.createSafeCallback(this,"HandleDoAnchorClick")),!u&&e.GetItem$1(s).IsLink()||r.appendChild(a)):(r.innerHTML=e.GetItem$1(s).FText,e.GetItem$1(s).FHTMLChilds=r.childElementCount),c=r,this.GetItemChildren(e.GetItem$1(s),c),t.appendChild(r),e.GetItem$1(s).FAbsIndex=i.get(),i.set(i.get()+1),2!==this.FListStyle&&e.GetItem$1(s).FItems.GetCount()>0&&(o=document.createElement("div"),e.GetItem$1(s).FAutoCollaps&&o.setAttribute("class","collapse"),o.setAttribute("id",this.GetID()+e.GetItem$1(s).ItemId()),t.appendChild(o),e.GetItem$1(s).FAutoCollaps&&(r.setAttribute(h,"collapse"),r.setAttribute(d,"#"+this.GetID()+e.GetItem$1(s).ItemId())),n=document.createElement("ul"),o.appendChild(n),this.RenderList(n,e.GetItem$1(s).FItems,i))}},this.ListItemByElement=function(t){return function e(i){var s=null,n=0;s=null;for(var r=0,a=i.GetCount()-1;r<=a;r++){if(n=r,i.GetItem$1(n).FListElement===t){s=i.GetItem$1(n);break}if(i.GetItem$1(n).FItems.GetCount()>0&&null!=(s=e(i.GetItem$1(n).FItems)))break}return s}(this.FItems)},this.EnableDrag=function(){null!=this.GetContainer()&&function t(e){for(var i=0,s=0,n=e.children.length-1;s<=n;s++)i=s,"LI"===e.children.item(i).tagName?(e.children.item(i).setAttribute("draggable","true"),t(e.children.item(i))):t(e.children.item(i))}(this.GetContainer())},this.DisableDrag=function(){null!=this.GetContainer()&&function t(e){for(var i=0,s=0,n=e.children.length-1;s<=n;s++)i=s,"LI"===e.children.item(i).tagName?(e.children.item(i).removeAttribute("draggable"),t(e.children.item(i))):t(e.children.item(i))}(this.GetContainer())},this.InitCSSLibrary=function(t){1===t&&(this.FDefaultItemClassName="list-group-item",this.SetElementListClassName("list-group"),this.SetElementFont(1),this.SetHeightStyle(2),this.SetListStyle(4))},this.Create$1=function(t){return pas["WEBLib.Controls"].TControl.Create$1.apply(this,arguments),this.SetTabStop(!1),this.SetWidthStyle(1),this.SetHeightStyle(1),this.SetWidthPercent(100),this.SetHeightPercent(100),this.SetElementPosition(0),this.SetListStyle(0),this},this.Destroy=function(){rtl.free(this,"FItems"),pas["WEBLib.Controls"].TCustomControl.Destroy.call(this)},this.CreateInitialize=function(){pas["WEBLib.Controls"].TCustomControl.CreateInitialize.call(this),this.FItems=t.TListItems.$create("Create$3",[this]),this.SetWidth(280),this.SetHeight(240),this.FDesignTime&&(this.FItems.Add$1().SetText("Item 1"),this.FItems.Add$1().SetText("Item 2"),this.FItems.Add$1().SetText("Item 3")),this.FItems.FOnChange=rtl.createCallback(this,"ItemsChanged")},this.ListElement=function(){var t=null;if(t=null,null!=this.GetElementHandle()){if("UL"===this.GetElementHandle().tagName)return t=this.GetElementHandle();if(this.GetIsLinked()&&"UL"===this.GetElementHandle().tagName)return t=this.GetElementHandle();this.GetElementHandle().childElementCount>0?t=this.GetElementHandle().firstChild:(t=document.createElement("UL"),this.GetElementHandle().insertAdjacentElement("afterbegin",t))}return t},rtl.addIntf(this,pas["WEBLib.Controls"].IControl),rtl.addIntf(this,pas.System.IUnknown);var e=this.$rtti;e.addProperty("Align",2,pas["WEBLib.Controls"].$rtti.TAlign,"FAlign","SetAlign",4,{Default:pas["WEBLib.Controls"].TAlign.alNone}),e.addProperty("AlignWithMargins",2,rtl.boolean,"FAlignWithMargins","SetAlignWithMargins",4,{Default:!1}),e.addProperty("Anchors",2,pas["WEBLib.Controls"].$rtti.TAnchors,"FAnchors","SetAnchors",4,{Default:rtl.createSet(0,1)}),e.addProperty("AutoSelect",0,rtl.boolean,"FAutoSelect","FAutoSelect",4,{Default:!1}),e.addProperty("ChildOrder",2,rtl.longint,"FChildOrder","SetChildOrderEx",4,{Default:0}),e.addProperty("DefaultItemClassName",0,rtl.string,"FDefaultItemClassName","FDefaultItemClassName"),e.addProperty("DefaultItemLinkClassName",0,rtl.string,"FDefaultItemLinkClassName","FDefaultItemLinkClassName"),e.addProperty("DragMode",2,pas["WEBLib.Controls"].$rtti.TDragMode,"FDragMode","SetDragMode",4,{Default:pas["WEBLib.Controls"].TDragMode.dmManual}),e.addProperty("ElementClassName",2,pas["WEBLib.Controls"].$rtti.TElementClassName,"FElementClassName","SetElementClassName"),e.addProperty("ElementFont",2,pas["WEBLib.Controls"].$rtti.TElementFont,"FElementFont","SetElementFont",4,{Default:pas["WEBLib.Controls"].TElementFont.efProperty}),e.addProperty("ElementID",3,pas["WEBLib.Controls"].$rtti.TElementID,"GetID","SetID"),e.addProperty("ElementPosition",2,pas["WEBLib.Controls"].$rtti.TElementPosition,"FElementPosition","SetElementPosition",4,{Default:pas["WEBLib.Controls"].TElementPosition.epAbsolute}),e.addProperty("ElementListClassName",2,pas["WEBLib.Controls"].$rtti.TElementClassName,"FElementListClassName","SetElementListClassName"),e.addProperty("HeightPercent",2,rtl.double,"FHeightPercent","SetHeightPercent",4,{Default:100}),e.addProperty("HeightStyle",2,pas["WEBLib.Controls"].$rtti.TSizeStyle,"FHeightStyle","SetHeightStyle",4,{Default:pas["WEBLib.Controls"].TSizeStyle.ssAbsolute}),e.addProperty("Items",2,t.$rtti.TListItems,"FItems","SetItems"),e.addProperty("Margins",2,pas["WEBLib.Controls"].$rtti.TMargins,"FMargins","SetMargins"),e.addProperty("MultiSelect",0,rtl.boolean,"FMultiSelect","FMultiSelect",4,{Default:!1}),e.addProperty("PopupMenu",0,pas["WEBLib.Menus"].$rtti.TPopupMenu,"FPopupMenu","FPopupMenu"),e.addProperty("Style",2,t.$rtti.TListStyle,"FListStyle","SetListStyle"),e.addProperty("Visible",2,rtl.boolean,"FVisible","SetVisible",4,{Default:!0}),e.addProperty("WidthPercent",2,rtl.double,"FWidthPercent","SetWidthPercent",4,{Default:100}),e.addProperty("WidthStyle",2,pas["WEBLib.Controls"].$rtti.TSizeStyle,"FWidthStyle","SetWidthStyle",4,{Default:pas["WEBLib.Controls"].TSizeStyle.ssAbsolute}),e.addProperty("OnGetItemChildren",0,t.$rtti.TListGetItemChildrenEvent,"FOnGetItemChildren","FOnGetItemChildren"),e.addProperty("OnGetItemClass",0,t.$rtti.TListGetItemClassEvent,"FOnGetItemClass","FOnGetItemClass"),e.addProperty("OnItemClick",0,t.$rtti.TListItemEvent,"FOnItemClick","FOnItemClick"),e.addProperty("OnItemDblClick",0,t.$rtti.TListItemEvent,"FOnItemDblClick","FOnItemDblClick"),e.addProperty("OnDragDrop",0,pas["WEBLib.Controls"].$rtti.TDragDropEvent,"FOnDragDrop","FOnDragDrop"),e.addProperty("OnDragOver",0,pas["WEBLib.Controls"].$rtti.TDragOverEvent,"FOnDragOver","FOnDragOver"),e.addProperty("OnEndDrag",0,pas["WEBLib.Controls"].$rtti.TEndDragEvent,"FonEndDrag","FonEndDrag"),e.addProperty("OnStartDrag",0,pas["WEBLib.Controls"].$rtti.TStartDragEvent,"FOnStartDrag","FOnStartDrag")}))}),["SysUtils","WEBLib.Utils","WEBLib.Forms"]),rtl.module("mpoapi.ReturnTypes",["System","Generics.Collections"],(function(){"use strict";rtl.createClass(this,"TmpoObjektAngebote",pas.System.TObject,(function(){this.$init=function(){pas.System.TObject.$init.call(this),this.id_Angebot="",this.id_Objekt="",this.Bezeichnung="",this.Beschreibung="",this.istMitLink=!1}})),rtl.createClass(this,"TmpoObjektAngebotBewerbung",pas.System.TObject,(function(){this.$init=function(){pas.System.TObject.$init.call(this),this.id_Angebot="",this.Bezeichnung=""}})),rtl.createClass(this,"TmpoBewerberDownload",pas.System.TObject,(function(){this.$init=function(){pas.System.TObject.$init.call(this),this.Bezeichnung=""}})),rtl.createClass(this,"TmpoBewerberUpload",pas.System.TObject,(function(){this.$init=function(){pas.System.TObject.$init.call(this),this.Bezeichnung=""}})),rtl.createClass(this,"TmpoStartseiteWeb",pas.System.TObject,(function(){this.$init=function(){pas.System.TObject.$init.call(this),this.istStudent=!1,this.istTauschWunsch=!1,this.istWohnungssuche=!1,this.istOhneSuche=!1,this.Angebotstext="",this.Hinweistext=""},this.Create$1=function(){return pas.System.TObject.Create.call(this),this.istStudent=!1,this.istTauschWunsch=!1,this.istWohnungssuche=!1,this.istOhneSuche=!0,this.Hinweistext="",this.Angebotstext="",this},this.Destroy=function(){pas.System.TObject.Destroy.call(this)}})),rtl.createClass(this,"TmpoStartseiteListenWeb",pas.System.TObject,(function(){this.$init=function(){pas.System.TObject.$init.call(this),this.ObjektAngebote=null,this.ObjektBewerbungen=null,this.BewerberDownloads=null,this.BewerberUploads=null},this.$final=function(){this.ObjektAngebote=void 0,this.ObjektBewerbungen=void 0,this.BewerberDownloads=void 0,this.BewerberUploads=void 0,pas.System.TObject.$final.call(this)},this.Create$1=function(){return pas.System.TObject.Create.call(this),this.ObjektAngebote=pas["Generics.Collections"].TList$$$G$$generics$collections$$TmpoObjektAngebote.$create("Create$1"),this.ObjektBewerbungen=pas["Generics.Collections"].TList$$$G$$generics$collections$$TmpoObjektAngebotBewerbung.$create("Create$1"),this.BewerberDownloads=pas["Generics.Collections"].TList$$$G$$generics$collections$$TmpoBewerberDownload.$create("Create$1"),this.BewerberUploads=pas["Generics.Collections"].TList$$$G$$generics$collections$$TmpoBewerberUpload.$create("Create$1"),this},this.Destroy=function(){this.ObjektAngebote.Clear(),rtl.free(this,"ObjektAngebote"),this.ObjektBewerbungen.Clear(),rtl.free(this,"ObjektBewerbungen"),this.BewerberDownloads.Clear(),rtl.free(this,"BewerberDownloads"),this.BewerberUploads.Clear(),rtl.free(this,"BewerberUploads"),pas.System.TObject.Destroy.call(this)}})),rtl.createClass(this,"TmpoFragebogenWeb",pas.System.TObject,(function(){this.$init=function(){pas.System.TObject.$init.call(this),this.istMitglied=!1,this.Vorname="",this.Nachname="",this.Strasse="",this.Hausnummer="",this.PLZ="",this.Ort="",this.WW_ZimmerVon=0,this.WW_ZimmerBis=0,this.WW_Miete=0,this.WW_StockwerkJN=!1,this.WW_Stockwerk="",this.WW_Balkon=0,this.WBSStufe=0,this.istQBekannte=!1,this.istQInternet=!1,this.istQKleinanzeigen=!1,this.istQZeitung=!1,this.istQBasketball=!1,this.istQBekannt=!1,this.istOKVergabe=!1,this.istOKDatenschutz=!1}})),rtl.createClass(this,"TmpoFBSelbstauskunftWeb",pas.System.TObject,(function(){this.$init=function(){pas.System.TObject.$init.call(this),this.Vorname="",this.Nachname="",this.Religion="",this.GebDat="",this.Beruf="",this.Telefon="",this.Arbeitgeber="",this.PersAnzGes=0,this.PersAnzErw=0,this.PersAnzKinder=0,this.Tiere=!1,this.Tierrasse="",this.Tieranzahl=0,this.istFinPfaendung=!1,this.istFinEV=!1,this.istFinInsolvenz=!1,this.istFinRaeumung=!1,this.Auskunft="",this.Anmerkungen="",this.istDatenschutzOK=!1,this.istAngabenOK=!1}})),rtl.createClass(this,"TmpoFBCasaCampusWeb",pas.System.TObject,(function(){this.$init=function(){pas.System.TObject.$init.call(this),this.Vorname="",this.Nachname="",this.Strasse="",this.PLZ="",this.Ort="",this.istHeimat=!1,this.Heimatanschrift="",this.Buergschaft="",this.Geburtsdatum="",this.WW_AbstellraumJN=!1,this.WW_StellplatzJN=!1,this.WW_Termin="",this.Bemerkungen="",this.istAngabenOK=!1,this.istDatenschutzOK=!1}})),rtl.createClass(this,"TmpoFBTauschWunschWeb",pas.System.TObject,(function(){this.$init=function(){pas.System.TObject.$init.call(this),this.MitgliedSeit="",this.Mitgliedsnummer="",this.Vorname="",this.Nachname="",this.Strasse="",this.PLZ="",this.Ort="",this.Beruf="",this.Arbeitgeber="",this.Religion="",this.Telefon="",this.PersAnzGes=0,this.PersAnzErw=0,this.PersAnzKin=0,this.Person1Name="",this.Person1Alter=0,this.Person1Beruf="",this.Person2Name="",this.Person2Alter=0,this.Person2Beruf="",this.Person3Name="",this.Person3Alter=0,this.Person3Beruf="",this.TierhaltungJN=!1,this.Tierrasse="",this.Tieranzahl=0,this.WW_qm=0,this.WW_Zimmer=0,this.WW_Miete=0,this.WW_Termin="",this.WW_WechselGrund="",this.WW_StockwerkJN=!1,this.WW_Stockwerk="",this.WW_Aufzug=!1,this.WW_Balkon=!1,this.WW_Neubau=!1,this.WW_Badewanne=!1,this.WW_Dusche=!1,this.WW_Zentralheizung=!1,this.WW_WL1=!1,this.WW_WL2=!1,this.WW_WL3=!1,this.WW_WL4=!1,this.WW_WL5=!1,this.WW_WL6=!1,this.WW_WL_Andere="",this.Anmerkungen="",this.istAngabenOK=!1,this.istDatenschutzOK=!1}})),rtl.createClass(this,"TmpoFragebogenResult",pas.System.TObject,(function(){this.$init=function(){pas.System.TObject.$init.call(this),this.AllesOK=!1,this.Meldung=""}})),rtl.createClass(this,"TmpoDownloadLink",pas.System.TObject,(function(){this.$init=function(){pas.System.TObject.$init.call(this),this.Link="",this.DownloadKey=""}})),rtl.createClass(this,"TmpoDownloadRequest",pas.System.TObject,(function(){this.$init=function(){pas.System.TObject.$init.call(this),this.aDocType=0,this.aDocID=""}})),rtl.createClass(this,"TmpoBewerbungEnde",pas.System.TObject,(function(){this.$init=function(){pas.System.TObject.$init.call(this),this.aAngebotID=""}})),rtl.createClass(this,"TmpoBewerbungStarten",pas.System.TObject,(function(){this.$init=function(){pas.System.TObject.$init.call(this),this.aAngebotID=""}})),this.cJBoolTrue="true"})),rtl.module("mpoView.TauschWunsch",["System","SysUtils","Classes","JS","XData.Web.Connection","XData.Web.Client","Web","WEBLib.Graphics","WEBLib.Controls","WEBLib.Forms","WEBLib.Dialogs","WEBLib.StdCtrls","WEBLib.StdCtrls","WEBLib.Controls","WEBLib.REST","WEBLib.JSON","WEBLib.ExtCtrls","WEBLib.WebCtrls","mpoapi.ReturnTypes","mpoweb.App.Types"],(function(){"use strict";rtl.createClass(this,"TFViewFBTauschWunsch",pas["WEBLib.Forms"].TForm,(function(){this.$init=function(){pas["WEBLib.Forms"].TForm.$init.call(this),this.btSpeichern=null,this.Client=null,this.edPersonenKinder=null,this.cbWWBadewanne=null,this.edReligion=null,this.edPerson2Alter=null,this.edTauschGrund=null,this.cbWWNeubau=null,this.cbDatenschutz=null,this.edWWZimmer=null,this.rbTiereJ=null,this.edNachname=null,this.edTauschTermin=null,this.edTiereAnzahl=null,this.cbVergabebedingungen=null,this.cbWWWL3RobertKochStr=null,this.edArbeitgeber=null,this.edTierRasse=null,this.edMiete=null,this.cbWWDusche=null,this.edStrasse=null,this.edWWQuadratmeter=null,this.edPerson1Alter=null,this.edOrt=null,this.edPerson1Beruf=null,this.edPerson2Name=null,this.cbWWWL1Mainflecklein=null,this.edPerson2Beruf=null,this.edPersonenGesamt=null,this.edPLZ=null,this.edPersonenErwachsene=null,this.cbWWWL4Leineck=null,this.edGBWMitgliedSeit=null,this.edVorname=null,this.edBeruf=null,this.cbWWWL2Herzoghoehe=null,this.edPerson1Name=null,this.edPerson3Beruf=null,this.cbWWZentralheizung=null,this.edWWWLAndere=null,this.edAnmerkungen=null,this.edGBWMitgliedsnummer=null,this.cbWWBalkon=null,this.rbTiereN=null,this.edPerson3Alter=null,this.edTelefon=null,this.edPerson3Name=null,this.rbStockwerkJ=null,this.rbStockwerkN=null,this.edWWStockwerk=null,this.cbWWAufzug=null,this.pnlMessage=null,this.lbMessage=null,this.WebMessageButton=null,this.FMessage="",this.FFragebogen=null,this.SuccessProc=null},this.$final=function(){this.btSpeichern=void 0,this.Client=void 0,this.edPersonenKinder=void 0,this.cbWWBadewanne=void 0,this.edReligion=void 0,this.edPerson2Alter=void 0,this.edTauschGrund=void 0,this.cbWWNeubau=void 0,this.cbDatenschutz=void 0,this.edWWZimmer=void 0,this.rbTiereJ=void 0,this.edNachname=void 0,this.edTauschTermin=void 0,this.edTiereAnzahl=void 0,this.cbVergabebedingungen=void 0,this.cbWWWL3RobertKochStr=void 0,this.edArbeitgeber=void 0,this.edTierRasse=void 0,this.edMiete=void 0,this.cbWWDusche=void 0,this.edStrasse=void 0,this.edWWQuadratmeter=void 0,this.edPerson1Alter=void 0,this.edOrt=void 0,this.edPerson1Beruf=void 0,this.edPerson2Name=void 0,this.cbWWWL1Mainflecklein=void 0,this.edPerson2Beruf=void 0,this.edPersonenGesamt=void 0,this.edPLZ=void 0,this.edPersonenErwachsene=void 0,this.cbWWWL4Leineck=void 0,this.edGBWMitgliedSeit=void 0,this.edVorname=void 0,this.edBeruf=void 0,this.cbWWWL2Herzoghoehe=void 0,this.edPerson1Name=void 0,this.edPerson3Beruf=void 0,this.cbWWZentralheizung=void 0,this.edWWWLAndere=void 0,this.edAnmerkungen=void 0,this.edGBWMitgliedsnummer=void 0,this.cbWWBalkon=void 0,this.rbTiereN=void 0,this.edPerson3Alter=void 0,this.edTelefon=void 0,this.edPerson3Name=void 0,this.rbStockwerkJ=void 0,this.rbStockwerkN=void 0,this.edWWStockwerk=void 0,this.cbWWAufzug=void 0,this.pnlMessage=void 0,this.lbMessage=void 0,this.WebMessageButton=void 0,this.FFragebogen=void 0,this.SuccessProc=void 0,pas["WEBLib.Forms"].TForm.$final.call(this)},this.btSpeichernClick=function(t){var e=this;this.FelderViewToObj(),this.FelderObjToView(),this.CheckFields(),""===this.FMessage?(this.HiddenNotification(),window.console.log("Fragebogen:"),window.console.log(this.FFragebogen),this.Client.RawInvoke$2("IMPOBewerberService.FBTauschWunschSet",[this.FFragebogen],(function(t){var i=null;i=rtl.as(pas["WEBLib.JSON"].TJSONObject.ParseJSONValue(t.GetResponseText()),pas["WEBLib.JSON"].TJSONObject),window.console.log(i),e.FMessage=rtl.as(i.GetValue$1("Meldung"),pas["WEBLib.JSON"].TJSONString).GetStrValue(),i.GetJSONValue("AllesOK")===pas["mpoapi.ReturnTypes"].cJBoolTrue?(pas["WEBLib.Dialogs"].ShowMessage("Ihre Eingaben wurden erfolgreich gespeichert."+pas.System.sLineBreak+"Bei Verfügbarkeit werden Sie automatisch per Email über Wohnungsangebote informiert."),null!=e.SuccessProc&&e.SuccessProc()):e.ShowNotification(e.FMessage+" "+pas.SysUtils.TimeToStr(pas.SysUtils.Now()))}),null)):this.ShowNotification(this.FMessage)},this.WebMessageButtonClick=function(t){this.HiddenNotification()},this.WebFormCreate=function(t){this.HiddenNotification()},this.WebFormShow=function(t){this.HoleFragebogenDS(),""!==this.FMessage?this.ShowNotification(this.FMessage):this.HiddenNotification()},this.HiddenNotification=function(){this.pnlMessage.GetElementHandle().hidden=!0},this.ShowNotification=function(t){""!==t&&(this.lbMessage.SetCaption(t),this.pnlMessage.GetElementHandle().hidden=!1)},this.HoleFragebogenDS=async function(){var t=null,e=null;this.FFragebogen=pas["mpoapi.ReturnTypes"].TmpoFBTauschWunschWeb.$create("Create"),window.console.log("Abfrage"),200===(t=await this.Client.RawInvokeAsync("IMPOBewerberService.FBTauschWunschGet",[])).GetStatusCode()&&(window.console.log("Text: "+t.GetResponseText()),e=rtl.as(pas["WEBLib.JSON"].TJSONObject.ParseJSONValue(t.GetResponseText()),pas["WEBLib.JSON"].TJSONObject),window.console.log("Daten: "+t.GetResponseText()),window.console.log(e),window.console.log("Nun: Einzelwerte..."),this.FBDeSer(this.FFragebogen,t.GetResponseText()),this.FelderObjToView())},this.FBDeSer=function(t,e){var i=null;i=rtl.as(pas["WEBLib.JSON"].TJSONObject.ParseJSONValue(e),pas["WEBLib.JSON"].TJSONObject),window.console.log(i),t.MitgliedSeit=rtl.as(i.GetValue$1("MitgliedSeit"),pas["WEBLib.JSON"].TJSONString).GetStrValue(),t.Mitgliedsnummer=rtl.as(i.GetValue$1("Mitgliedsnummer"),pas["WEBLib.JSON"].TJSONString).GetStrValue(),t.Vorname=rtl.as(i.GetValue$1("Vorname"),pas["WEBLib.JSON"].TJSONString).GetStrValue(),t.Nachname=rtl.as(i.GetValue$1("Nachname"),pas["WEBLib.JSON"].TJSONString).GetStrValue(),t.Strasse=rtl.as(i.GetValue$1("Strasse"),pas["WEBLib.JSON"].TJSONString).GetStrValue(),t.PLZ=rtl.as(i.GetValue$1("PLZ"),pas["WEBLib.JSON"].TJSONString).GetStrValue(),t.Ort=rtl.as(i.GetValue$1("Ort"),pas["WEBLib.JSON"].TJSONString).GetStrValue(),t.Beruf=rtl.as(i.GetValue$1("Beruf"),pas["WEBLib.JSON"].TJSONString).GetStrValue(),t.Arbeitgeber=rtl.as(i.GetValue$1("Arbeitgeber"),pas["WEBLib.JSON"].TJSONString).GetStrValue(),t.Religion=rtl.as(i.GetValue$1("Religion"),pas["WEBLib.JSON"].TJSONString).GetStrValue(),t.Telefon=rtl.as(i.GetValue$1("Telefon"),pas["WEBLib.JSON"].TJSONString).GetStrValue(),t.PersAnzGes=rtl.as(i.GetValue$1("PersAnzGes"),pas["WEBLib.JSON"].TJSONNumber).FInt,t.PersAnzErw=rtl.as(i.GetValue$1("PersAnzErw"),pas["WEBLib.JSON"].TJSONNumber).FInt,t.PersAnzKin=rtl.as(i.GetValue$1("PersAnzKin"),pas["WEBLib.JSON"].TJSONNumber).FInt,t.Person1Name=rtl.as(i.GetValue$1("Person1Name"),pas["WEBLib.JSON"].TJSONString).GetStrValue(),t.Person1Alter=rtl.as(i.GetValue$1("Person1Alter"),pas["WEBLib.JSON"].TJSONNumber).FInt,t.Person1Beruf=rtl.as(i.GetValue$1("Person1Beruf"),pas["WEBLib.JSON"].TJSONString).GetStrValue(),t.Person2Name=rtl.as(i.GetValue$1("Person2Name"),pas["WEBLib.JSON"].TJSONString).GetStrValue(),t.Person2Alter=rtl.as(i.GetValue$1("Person2Alter"),pas["WEBLib.JSON"].TJSONNumber).FInt,t.Person2Beruf=rtl.as(i.GetValue$1("Person2Beruf"),pas["WEBLib.JSON"].TJSONString).GetStrValue(),t.Person3Name=rtl.as(i.GetValue$1("Person3Name"),pas["WEBLib.JSON"].TJSONString).GetStrValue(),t.Person3Alter=rtl.as(i.GetValue$1("Person3Alter"),pas["WEBLib.JSON"].TJSONNumber).FInt,t.Person3Beruf=rtl.as(i.GetValue$1("Person3Beruf"),pas["WEBLib.JSON"].TJSONString).GetStrValue(),t.TierhaltungJN=i.GetJSONValue("TierhaltungJN")===pas["mpoapi.ReturnTypes"].cJBoolTrue,t.Tierrasse=rtl.as(i.GetValue$1("Tierrasse"),pas["WEBLib.JSON"].TJSONString).GetStrValue(),t.Tieranzahl=rtl.as(i.GetValue$1("Tieranzahl"),pas["WEBLib.JSON"].TJSONNumber).FInt,t.WW_qm=rtl.as(i.GetValue$1("WW_qm"),pas["WEBLib.JSON"].TJSONNumber).FInt,t.WW_Zimmer=rtl.as(i.GetValue$1("WW_Zimmer"),pas["WEBLib.JSON"].TJSONNumber).FInt,t.WW_Miete=rtl.as(i.GetValue$1("WW_Miete"),pas["WEBLib.JSON"].TJSONNumber).FInt,t.WW_Termin=rtl.as(i.GetValue$1("WW_Termin"),pas["WEBLib.JSON"].TJSONString).GetStrValue(),t.WW_WechselGrund=rtl.as(i.GetValue$1("WW_WechselGrund"),pas["WEBLib.JSON"].TJSONString).GetStrValue(),t.WW_StockwerkJN=i.GetJSONValue("istMieter")===pas["mpoapi.ReturnTypes"].cJBoolTrue,t.WW_Stockwerk=rtl.as(i.GetValue$1("WW_Stockwerk"),pas["WEBLib.JSON"].TJSONString).GetStrValue(),t.WW_Aufzug=i.GetJSONValue("WW_Aufzug")===pas["mpoapi.ReturnTypes"].cJBoolTrue,t.WW_Balkon=i.GetJSONValue("WW_Balkon")===pas["mpoapi.ReturnTypes"].cJBoolTrue,t.WW_Neubau=i.GetJSONValue("WW_Neubau")===pas["mpoapi.ReturnTypes"].cJBoolTrue,t.WW_Badewanne=i.GetJSONValue("WW_Badewanne")===pas["mpoapi.ReturnTypes"].cJBoolTrue,t.WW_Dusche=i.GetJSONValue("WW_Dusche")===pas["mpoapi.ReturnTypes"].cJBoolTrue,t.WW_Zentralheizung=i.GetJSONValue("WW_Zentralheizung")===pas["mpoapi.ReturnTypes"].cJBoolTrue,t.WW_WL1=i.GetJSONValue("WW_WL1")===pas["mpoapi.ReturnTypes"].cJBoolTrue,t.WW_WL2=i.GetJSONValue("WW_WL2")===pas["mpoapi.ReturnTypes"].cJBoolTrue,t.WW_WL3=i.GetJSONValue("WW_WL3")===pas["mpoapi.ReturnTypes"].cJBoolTrue,t.WW_WL4=i.GetJSONValue("WW_WL4")===pas["mpoapi.ReturnTypes"].cJBoolTrue,t.WW_WL5=i.GetJSONValue("WW_WL5")===pas["mpoapi.ReturnTypes"].cJBoolTrue,t.WW_WL6=i.GetJSONValue("WW_WL6")===pas["mpoapi.ReturnTypes"].cJBoolTrue,t.WW_WL_Andere=rtl.as(i.GetValue$1("WW_WL_Andere"),pas["WEBLib.JSON"].TJSONString).GetStrValue(),t.Anmerkungen=rtl.as(i.GetValue$1("Anmerkungen"),pas["WEBLib.JSON"].TJSONString).GetStrValue(),t.istAngabenOK=i.GetJSONValue("istAngabenOK")===pas["mpoapi.ReturnTypes"].cJBoolTrue,t.istDatenschutzOK=i.GetJSONValue("istDatenschutzOK")===pas["mpoapi.ReturnTypes"].cJBoolTrue},this.FelderObjToView=function(){this.edGBWMitgliedSeit.SetText(this.FFragebogen.MitgliedSeit),this.edGBWMitgliedsnummer.SetText(this.FFragebogen.Mitgliedsnummer),this.edVorname.SetText(this.FFragebogen.Vorname),this.edNachname.SetText(this.FFragebogen.Nachname),this.edStrasse.SetText(this.FFragebogen.Strasse),this.edPLZ.SetText(this.FFragebogen.PLZ),this.edOrt.SetText(this.FFragebogen.Ort),this.edBeruf.SetText(this.FFragebogen.Beruf),this.edArbeitgeber.SetText(this.FFragebogen.Arbeitgeber),this.edReligion.SetText(this.FFragebogen.Religion),this.edTelefon.SetText(this.FFragebogen.Telefon),this.edPersonenGesamt.SetText(pas.SysUtils.TIntegerHelper.ToString$1.call({p:this.FFragebogen,get:function(){return this.p.PersAnzGes},set:function(t){this.p.PersAnzGes=t}})),this.edPersonenErwachsene.SetText(pas.SysUtils.TIntegerHelper.ToString$1.call({p:this.FFragebogen,get:function(){return this.p.PersAnzErw},set:function(t){this.p.PersAnzErw=t}})),this.edPersonenKinder.SetText(pas.SysUtils.TIntegerHelper.ToString$1.call({p:this.FFragebogen,get:function(){return this.p.PersAnzKin},set:function(t){this.p.PersAnzKin=t}})),this.edPerson1Name.SetText(this.FFragebogen.Person1Name),this.edPerson1Alter.SetText(pas.SysUtils.TIntegerHelper.ToString$1.call({p:this.FFragebogen,get:function(){return this.p.Person1Alter},set:function(t){this.p.Person1Alter=t}})),this.edPerson1Beruf.SetText(this.FFragebogen.Person1Beruf),this.edPerson2Name.SetText(this.FFragebogen.Person2Name),this.edPerson2Alter.SetText(pas.SysUtils.TIntegerHelper.ToString$1.call({p:this.FFragebogen,get:function(){return this.p.Person2Alter},set:function(t){this.p.Person2Alter=t}})),this.edPerson2Beruf.SetText(this.FFragebogen.Person2Beruf),this.edPerson3Name.SetText(this.FFragebogen.Person3Name),this.edPerson3Alter.SetText(pas.SysUtils.TIntegerHelper.ToString$1.call({p:this.FFragebogen,get:function(){return this.p.Person3Alter},set:function(t){this.p.Person3Alter=t}})),this.edPerson3Beruf.SetText(this.FFragebogen.Person3Beruf),this.rbTiereJ.SetChecked(this.FFragebogen.TierhaltungJN),this.edTierRasse.SetText(this.FFragebogen.Tierrasse),this.edTiereAnzahl.SetText(pas.SysUtils.TIntegerHelper.ToString$1.call({p:this.FFragebogen,get:function(){return this.p.Tieranzahl},set:function(t){this.p.Tieranzahl=t}})),this.edWWQuadratmeter.SetText(pas.SysUtils.TIntegerHelper.ToString$1.call({p:this.FFragebogen,get:function(){return this.p.WW_qm},set:function(t){this.p.WW_qm=t}})),this.edWWZimmer.SetText(pas.SysUtils.TIntegerHelper.ToString$1.call({p:this.FFragebogen,get:function(){return this.p.WW_Zimmer},set:function(t){this.p.WW_Zimmer=t}})),this.edMiete.SetText(pas.SysUtils.TIntegerHelper.ToString$1.call({p:this.FFragebogen,get:function(){return this.p.WW_Miete},set:function(t){this.p.WW_Miete=t}})),this.edTauschTermin.SetText(this.FFragebogen.WW_Termin),this.edTauschGrund.SetText(this.FFragebogen.WW_WechselGrund),this.rbStockwerkJ.SetChecked(this.FFragebogen.WW_StockwerkJN),this.edWWStockwerk.SetText(this.FFragebogen.WW_Stockwerk),this.cbWWAufzug.SetChecked(this.FFragebogen.WW_Aufzug),this.cbWWBalkon.SetChecked(this.FFragebogen.WW_Balkon),this.cbWWNeubau.SetChecked(this.FFragebogen.WW_Neubau),this.cbWWBadewanne.SetChecked(this.FFragebogen.WW_Badewanne),this.cbWWDusche.SetChecked(this.FFragebogen.WW_Dusche),this.cbWWZentralheizung.SetChecked(this.FFragebogen.WW_Zentralheizung),this.cbWWWL1Mainflecklein.SetChecked(this.FFragebogen.WW_WL1),this.cbWWWL2Herzoghoehe.SetChecked(this.FFragebogen.WW_WL2),this.cbWWWL3RobertKochStr.SetChecked(this.FFragebogen.WW_WL3),this.cbWWWL4Leineck.SetChecked(this.FFragebogen.WW_WL4),this.edAnmerkungen.SetText(this.FFragebogen.Anmerkungen),this.edWWWLAndere.SetText(this.FFragebogen.WW_WL_Andere),this.cbVergabebedingungen.SetChecked(this.FFragebogen.istAngabenOK),this.cbDatenschutz.SetChecked(this.FFragebogen.istDatenschutzOK)},this.FelderViewToObj=function(){this.FFragebogen.MitgliedSeit=this.edGBWMitgliedSeit.GetText(),this.FFragebogen.Mitgliedsnummer=this.edGBWMitgliedsnummer.GetText(),this.FFragebogen.Vorname=this.edVorname.GetText(),this.FFragebogen.Nachname=this.edNachname.GetText(),this.FFragebogen.Strasse=this.edStrasse.GetText(),this.FFragebogen.PLZ=this.edPLZ.GetText(),this.FFragebogen.Ort=this.edOrt.GetText(),this.FFragebogen.Beruf=this.edBeruf.GetText(),this.FFragebogen.Arbeitgeber=this.edArbeitgeber.GetText(),this.FFragebogen.Religion=this.edReligion.GetText(),this.FFragebogen.Telefon=this.edTelefon.GetText(),this.FFragebogen.PersAnzGes=pas.SysUtils.TStringHelper.ToInteger$1.call({p:this.edPersonenGesamt.GetText(),get:function(){return this.p},set:function(t){this.p=t}}),this.FFragebogen.PersAnzErw=pas.SysUtils.TStringHelper.ToInteger$1.call({p:this.edPersonenErwachsene.GetText(),get:function(){return this.p},set:function(t){this.p=t}}),this.FFragebogen.PersAnzKin=pas.SysUtils.TStringHelper.ToInteger$1.call({p:this.edPersonenKinder.GetText(),get:function(){return this.p},set:function(t){this.p=t}}),this.FFragebogen.Person1Name=this.edPerson1Name.GetText(),this.FFragebogen.Person1Alter=pas.SysUtils.TStringHelper.ToInteger$1.call({p:this.edPerson1Alter.GetText(),get:function(){return this.p},set:function(t){this.p=t}}),this.FFragebogen.Person1Beruf=this.edPerson1Beruf.GetText(),this.FFragebogen.Person2Name=this.edPerson2Name.GetText(),this.FFragebogen.Person2Alter=pas.SysUtils.TStringHelper.ToInteger$1.call({p:this.edPerson2Alter.GetText(),get:function(){return this.p},set:function(t){this.p=t}}),this.FFragebogen.Person2Beruf=this.edPerson2Beruf.GetText(),this.FFragebogen.Person3Name=this.edPerson3Name.GetText(),this.FFragebogen.Person3Alter=pas.SysUtils.TStringHelper.ToInteger$1.call({p:this.edPerson3Alter.GetText(),get:function(){return this.p},set:function(t){this.p=t}}),this.FFragebogen.Person3Beruf=this.edPerson3Beruf.GetText(),this.FFragebogen.TierhaltungJN=this.rbTiereJ.GetChecked(),this.FFragebogen.Tierrasse=this.edTierRasse.GetText(),this.FFragebogen.Tieranzahl=pas.SysUtils.TStringHelper.ToInteger$1.call({p:this.edTiereAnzahl.GetText(),get:function(){return this.p},set:function(t){this.p=t}}),this.FFragebogen.WW_qm=pas.SysUtils.TStringHelper.ToInteger$1.call({p:this.edWWQuadratmeter.GetText(),get:function(){return this.p},set:function(t){this.p=t}}),this.FFragebogen.WW_Zimmer=pas.SysUtils.TStringHelper.ToInteger$1.call({p:this.edWWZimmer.GetText(),get:function(){return this.p},set:function(t){this.p=t}}),this.FFragebogen.WW_Miete=pas.SysUtils.TStringHelper.ToInteger$1.call({p:this.edMiete.GetText(),get:function(){return this.p},set:function(t){this.p=t}}),this.FFragebogen.WW_Termin=this.edTauschTermin.GetText(),this.FFragebogen.WW_WechselGrund=this.edTauschGrund.GetText(),this.FFragebogen.WW_StockwerkJN=this.rbStockwerkJ.GetChecked(),this.FFragebogen.WW_Stockwerk=this.edWWStockwerk.GetText(),this.FFragebogen.WW_Aufzug=this.cbWWAufzug.GetChecked(),this.FFragebogen.WW_Balkon=this.cbWWBalkon.GetChecked(),this.FFragebogen.WW_Neubau=this.cbWWNeubau.GetChecked(),this.FFragebogen.WW_Badewanne=this.cbWWBadewanne.GetChecked(),this.FFragebogen.WW_Dusche=this.cbWWDusche.GetChecked(),this.FFragebogen.WW_Zentralheizung=this.cbWWZentralheizung.GetChecked(),this.FFragebogen.WW_WL1=this.cbWWWL1Mainflecklein.GetChecked(),this.FFragebogen.WW_WL2=this.cbWWWL2Herzoghoehe.GetChecked(),this.FFragebogen.WW_WL3=this.cbWWWL3RobertKochStr.GetChecked(),this.FFragebogen.WW_WL4=this.cbWWWL4Leineck.GetChecked(),this.FFragebogen.WW_WL_Andere=this.edWWWLAndere.GetText(),this.FFragebogen.Anmerkungen=this.edAnmerkungen.GetText(),this.FFragebogen.istAngabenOK=this.cbVergabebedingungen.GetChecked(),this.FFragebogen.istDatenschutzOK=this.cbDatenschutz.GetChecked()},this.CheckFields=function(){this.FMessage="",this.cbDatenschutz.GetChecked()?rtl.asExt(document.getElementById(this.cbDatenschutz.GetID()),HTMLElement).classList.remove("is-invalid"):(this.FMessage=this.FMessage+"Zustimmung zum Datenschutz fehlt"+pas.System.sLineBreak,rtl.asExt(document.getElementById(this.cbDatenschutz.GetID()),HTMLElement).classList.add("is-invalid")),this.cbVergabebedingungen.GetChecked()?rtl.asExt(document.getElementById(this.cbDatenschutz.GetID()),HTMLElement).classList.remove("is-invalid"):(this.FMessage=this.FMessage+"Zustimmung zu den Vergabebedingungen fehlt"+pas.System.sLineBreak,rtl.asExt(document.getElementById(this.cbDatenschutz.GetID()),HTMLElement).classList.add("is-invalid"))},this.LoadDFMValues=function(){pas["WEBLib.Forms"].TCustomForm.LoadDFMValues.call(this),this.btSpeichern=pas["WEBLib.StdCtrls"].TButton.$create("Create$2",["view.TauschWunsch.btSave"]),this.edPersonenKinder=pas["WEBLib.StdCtrls"].TSpinEdit.$create("Create$2",["view.TauschWunsch.edPersonenKinder"]),this.cbWWBadewanne=pas["WEBLib.StdCtrls"].TCheckBox.$create("Create$2",["view.TauschWunsch.cbWWBadewanne"]),this.edReligion=pas["WEBLib.StdCtrls"].TEdit.$create("Create$2",["view.TauschWunsch.edReligion"]),this.edPerson2Alter=pas["WEBLib.StdCtrls"].TSpinEdit.$create("Create$2",["view.TauschWunsch.edHZPerson2Alter"]),this.edTauschGrund=pas["WEBLib.StdCtrls"].TEdit.$create("Create$2",["view.TauschWunsch.edTauschGrund"]),this.cbWWNeubau=pas["WEBLib.StdCtrls"].TCheckBox.$create("Create$2",["view.TauschWunsch.cbWWNeubau"]),this.cbDatenschutz=pas["WEBLib.StdCtrls"].TCheckBox.$create("Create$2",["view.TauschWunsch.cbDatenschutz"]),this.edWWZimmer=pas["WEBLib.StdCtrls"].TSpinEdit.$create("Create$2",["view.TauschWunsch.edZimmer"]),this.rbTiereJ=pas["WEBLib.StdCtrls"].TRadioButton.$create("Create$2",["view.TauschWunsch.rbTiereJ"]),this.edNachname=pas["WEBLib.StdCtrls"].TEdit.$create("Create$2",["view.TauschWunsch.edNachname"]),this.edTauschTermin=pas["WEBLib.StdCtrls"].TEdit.$create("Create$2",["view.TauschWunsch.edTauschTermin"]),this.edTiereAnzahl=pas["WEBLib.StdCtrls"].TSpinEdit.$create("Create$2",["view.TauschWunsch.edTiereAnzahl"]),this.cbVergabebedingungen=pas["WEBLib.StdCtrls"].TCheckBox.$create("Create$2",["view.TauschWunsch.cbVergabebedingungen"]),this.cbWWWL3RobertKochStr=pas["WEBLib.StdCtrls"].TCheckBox.$create("Create$2",["view.TauschWunsch.cbWWWL3RobertKochStr"]),this.edArbeitgeber=pas["WEBLib.StdCtrls"].TEdit.$create("Create$2",["view.TauschWunsch.edArbeitgeber"]),this.edTierRasse=pas["WEBLib.StdCtrls"].TEdit.$create("Create$2",["view.TauschWunsch.edTierRasse"]),this.edMiete=pas["WEBLib.StdCtrls"].TSpinEdit.$create("Create$2",["view.TauschWunsch.edMiete"]),this.cbWWDusche=pas["WEBLib.StdCtrls"].TCheckBox.$create("Create$2",["view.TauschWunsch.cbWWDusche"]),this.edStrasse=pas["WEBLib.StdCtrls"].TEdit.$create("Create$2",["view.TauschWunsch.edStrasse"]),this.edWWQuadratmeter=pas["WEBLib.StdCtrls"].TSpinEdit.$create("Create$2",["view.TauschWunsch.edQuadratmeter"]),this.edPerson1Alter=pas["WEBLib.StdCtrls"].TSpinEdit.$create("Create$2",["view.TauschWunsch.edHZPerson1Alter"]),this.edOrt=pas["WEBLib.StdCtrls"].TEdit.$create("Create$2",["view.TauschWunsch.edOrt"]),this.edPerson1Beruf=pas["WEBLib.StdCtrls"].TEdit.$create("Create$2",["view.TauschWunsch.edHZPerson1Beruf"]),this.edPerson2Name=pas["WEBLib.StdCtrls"].TEdit.$create("Create$2",["view.TauschWunsch.edHZPerson2Name"]),this.cbWWWL1Mainflecklein=pas["WEBLib.StdCtrls"].TCheckBox.$create("Create$2",["view.TauschWunsch.cbWWWL1Mainflecklein"]),this.edPerson2Beruf=pas["WEBLib.StdCtrls"].TEdit.$create("Create$2",["view.TauschWunsch.edHZPerson2Beruf"]),this.edPersonenGesamt=pas["WEBLib.StdCtrls"].TSpinEdit.$create("Create$2",["view.TauschWunsch.edPersonenGesamt"]),this.edPLZ=pas["WEBLib.StdCtrls"].TSpinEdit.$create("Create$2",["view.TauschWunsch.edPLZ"]),this.edPersonenErwachsene=pas["WEBLib.StdCtrls"].TSpinEdit.$create("Create$2",["view.TauschWunsch.edPersonenErwachsene"]),this.cbWWWL4Leineck=pas["WEBLib.StdCtrls"].TCheckBox.$create("Create$2",["view.TauschWunsch.cbWWWL4Leineck"]),this.edGBWMitgliedSeit=pas["WEBLib.StdCtrls"].TEdit.$create("Create$2",["view.TauschWunsch.edGBWMitgliedSeit"]),this.edVorname=pas["WEBLib.StdCtrls"].TEdit.$create("Create$2",["view.TauschWunsch.edVorname"]),this.edBeruf=pas["WEBLib.StdCtrls"].TEdit.$create("Create$2",["view.TauschWunsch.edBeruf"]),this.cbWWWL2Herzoghoehe=pas["WEBLib.StdCtrls"].TCheckBox.$create("Create$2",["view.TauschWunsch.cbWWWL2Herzoghoehe"]),this.edPerson1Name=pas["WEBLib.StdCtrls"].TEdit.$create("Create$2",["view.TauschWunsch.edHZPerson1Name"]),this.edPerson3Beruf=pas["WEBLib.StdCtrls"].TEdit.$create("Create$2",["view.TauschWunsch.edHZPerson3Beruf"]),this.cbWWZentralheizung=pas["WEBLib.StdCtrls"].TCheckBox.$create("Create$2",["view.TauschWunsch.cbWWZentralheizung"]),this.edWWWLAndere=pas["WEBLib.StdCtrls"].TEdit.$create("Create$2",["view.TauschWunsch.edWWWLAndere"]),this.edAnmerkungen=pas["WEBLib.StdCtrls"].TMemo.$create("Create$2",["view.TauschWunsch.edAnmerkungen"]),this.edGBWMitgliedsnummer=pas["WEBLib.StdCtrls"].TEdit.$create("Create$2",["view.TauschWunsch.cbGBWMitgliedsnummer"]),this.cbWWBalkon=pas["WEBLib.StdCtrls"].TCheckBox.$create("Create$2",["view.TauschWunsch.cbWWBalkon"]),this.rbTiereN=pas["WEBLib.StdCtrls"].TRadioButton.$create("Create$2",["view.TauschWunsch.rbTiereN"]),this.edPerson3Alter=pas["WEBLib.StdCtrls"].TSpinEdit.$create("Create$2",["view.TauschWunsch.edHZPerson3Alter"]),this.edTelefon=pas["WEBLib.StdCtrls"].TEdit.$create("Create$2",["view.TauschWunsch.edTelefon"]),this.edPerson3Name=pas["WEBLib.StdCtrls"].TEdit.$create("Create$2",["view.TauschWunsch.edHZPerson3Name"]),this.rbStockwerkJ=pas["WEBLib.StdCtrls"].TRadioButton.$create("Create$2",["view.TauschWunsch.rbStockwerkJ"]),this.rbStockwerkN=pas["WEBLib.StdCtrls"].TRadioButton.$create("Create$2",["view.TauschWunsch.rbStockwerkN"]),this.edWWStockwerk=pas["WEBLib.StdCtrls"].TEdit.$create("Create$2",["view.TauschWunsch.edStockwerk"]),this.cbWWAufzug=pas["WEBLib.StdCtrls"].TCheckBox.$create("Create$2",["view.TauschWunsch.cbWWAufzug"]),this.pnlMessage=pas["WEBLib.ExtCtrls"].TPanel.$create("Create$2",["view.TauschWunsch.message"]),this.lbMessage=pas["WEBLib.StdCtrls"].TLabel.$create("Create$2",["view.TauschWunsch.message.label"]),this.WebMessageButton=pas["WEBLib.StdCtrls"].TButton.$create("Create$2",["view.TauschWunsch.message.button"]),this.Client=pas["XData.Web.Client"].TXDataWebClient.$create("Create$1",[this]),this.btSpeichern.BeforeLoadDFMValues(),this.edPersonenKinder.BeforeLoadDFMValues(),this.cbWWBadewanne.BeforeLoadDFMValues(),this.edReligion.BeforeLoadDFMValues(),this.edPerson2Alter.BeforeLoadDFMValues(),this.edTauschGrund.BeforeLoadDFMValues(),this.cbWWNeubau.BeforeLoadDFMValues(),this.cbDatenschutz.BeforeLoadDFMValues(),this.edWWZimmer.BeforeLoadDFMValues(),this.rbTiereJ.BeforeLoadDFMValues(),this.edNachname.BeforeLoadDFMValues(),this.edTauschTermin.BeforeLoadDFMValues(),this.edTiereAnzahl.BeforeLoadDFMValues(),this.cbVergabebedingungen.BeforeLoadDFMValues(),this.cbWWWL3RobertKochStr.BeforeLoadDFMValues(),this.edArbeitgeber.BeforeLoadDFMValues(),this.edTierRasse.BeforeLoadDFMValues(),this.edMiete.BeforeLoadDFMValues(),this.cbWWDusche.BeforeLoadDFMValues(),this.edStrasse.BeforeLoadDFMValues(),this.edWWQuadratmeter.BeforeLoadDFMValues(),this.edPerson1Alter.BeforeLoadDFMValues(),this.edOrt.BeforeLoadDFMValues(),this.edPerson1Beruf.BeforeLoadDFMValues(),this.edPerson2Name.BeforeLoadDFMValues(),this.cbWWWL1Mainflecklein.BeforeLoadDFMValues(),this.edPerson2Beruf.BeforeLoadDFMValues(),this.edPersonenGesamt.BeforeLoadDFMValues(),this.edPLZ.BeforeLoadDFMValues(),this.edPersonenErwachsene.BeforeLoadDFMValues(),this.cbWWWL4Leineck.BeforeLoadDFMValues(),this.edGBWMitgliedSeit.BeforeLoadDFMValues(),this.edVorname.BeforeLoadDFMValues(),this.edBeruf.BeforeLoadDFMValues(),this.cbWWWL2Herzoghoehe.BeforeLoadDFMValues(),this.edPerson1Name.BeforeLoadDFMValues(),this.edPerson3Beruf.BeforeLoadDFMValues(),this.cbWWZentralheizung.BeforeLoadDFMValues(),this.edWWWLAndere.BeforeLoadDFMValues(),this.edAnmerkungen.BeforeLoadDFMValues(),this.edGBWMitgliedsnummer.BeforeLoadDFMValues(),this.cbWWBalkon.BeforeLoadDFMValues(),this.rbTiereN.BeforeLoadDFMValues(),this.edPerson3Alter.BeforeLoadDFMValues(),this.edTelefon.BeforeLoadDFMValues(),this.edPerson3Name.BeforeLoadDFMValues(),this.rbStockwerkJ.BeforeLoadDFMValues(),this.rbStockwerkN.BeforeLoadDFMValues(),this.edWWStockwerk.BeforeLoadDFMValues(),this.cbWWAufzug.BeforeLoadDFMValues(),this.pnlMessage.BeforeLoadDFMValues(),this.lbMessage.BeforeLoadDFMValues(),this.WebMessageButton.BeforeLoadDFMValues(),this.Client.BeforeLoadDFMValues();try{this.SetName("FViewFBTauschWunsch"),this.SetWidth(640),this.SetHeight(618),this.SetCSSLibrary(1),this.SetElementFont(1),this.SetEvent(this,"OnCreate","WebFormCreate"),this.SetEvent(this,"OnShow","WebFormShow"),this.btSpeichern.SetParentComponent(this),this.btSpeichern.SetName("btSpeichern"),this.btSpeichern.SetLeft(505),this.btSpeichern.SetTop(120),this.btSpeichern.SetWidth(96),this.btSpeichern.SetHeight(25),this.btSpeichern.SetCaption("Speichern"),this.btSpeichern.SetChildOrderEx(26),this.btSpeichern.SetElementFont(1),this.btSpeichern.SetElementPosition(2),this.btSpeichern.SetHeightStyle(2),this.btSpeichern.SetHeightPercent(100),this.btSpeichern.SetWidthStyle(2),this.btSpeichern.SetWidthPercent(100),this.SetEvent$1(this.btSpeichern,this,"OnClick","btSpeichernClick"),this.edPersonenKinder.SetParentComponent(this),this.edPersonenKinder.SetName("edPersonenKinder"),this.edPersonenKinder.SetLeft(303),this.edPersonenKinder.SetTop(288),this.edPersonenKinder.SetWidth(96),this.edPersonenKinder.SetHeight(25),this.edPersonenKinder.SetHeightStyle(2),this.edPersonenKinder.SetWidthStyle(2),this.edPersonenKinder.FAutoSize=!1,this.edPersonenKinder.SetBorderStyle(1),this.edPersonenKinder.SetChildOrderEx(2),this.edPersonenKinder.SetColor(16777215),this.edPersonenKinder.SetElementFont(1),this.edPersonenKinder.SetElementPosition(2),this.edPersonenKinder.SetIncrement(1),this.edPersonenKinder.SetMaxValue(100),this.edPersonenKinder.SetMinValue(0),this.edPersonenKinder.SetRole(""),this.edPersonenKinder.SetValue(0),this.cbWWBadewanne.SetParentComponent(this),this.cbWWBadewanne.SetName("cbWWBadewanne"),this.cbWWBadewanne.SetLeft(175),this.cbWWBadewanne.SetTop(432),this.cbWWBadewanne.SetWidth(96),this.cbWWBadewanne.SetHeight(25),this.cbWWBadewanne.SetCaption("cbWWBadewanne"),this.cbWWBadewanne.SetChildOrderEx(3),this.cbWWBadewanne.SetElementFont(1),this.cbWWBadewanne.SetElementPosition(2),this.cbWWBadewanne.SetHeightStyle(2),this.cbWWBadewanne.SetHeightPercent(100),this.cbWWBadewanne.SetWidthStyle(2),this.cbWWBadewanne.SetWidthPercent(100),this.edReligion.SetParentComponent(this),this.edReligion.SetName("edReligion"),this.edReligion.SetLeft(482),this.edReligion.SetTop(279),this.edReligion.SetWidth(96),this.edReligion.SetHeight(25),this.edReligion.SetChildOrderEx(4),this.edReligion.SetElementFont(1),this.edReligion.SetElementPosition(2),this.edReligion.SetHeightStyle(2),this.edReligion.SetHeightPercent(100),this.edReligion.SetWidthStyle(2),this.edReligion.SetWidthPercent(100),this.edPerson2Alter.SetParentComponent(this),this.edPerson2Alter.SetName("edPerson2Alter"),this.edPerson2Alter.SetLeft(313),this.edPerson2Alter.SetTop(328),this.edPerson2Alter.SetWidth(96),this.edPerson2Alter.SetHeight(25),this.edPerson2Alter.SetHeightStyle(2),this.edPerson2Alter.SetWidthStyle(2),this.edPerson2Alter.FAutoSize=!1,this.edPerson2Alter.SetBorderStyle(1),this.edPerson2Alter.SetChildOrderEx(5),this.edPerson2Alter.SetColor(16777215),this.edPerson2Alter.SetElementFont(1),this.edPerson2Alter.SetElementPosition(2),this.edPerson2Alter.SetIncrement(1),this.edPerson2Alter.SetMaxValue(100),this.edPerson2Alter.SetMinValue(0),this.edPerson2Alter.SetRole(""),this.edPerson2Alter.SetValue(0),this.edTauschGrund.SetParentComponent(this),this.edTauschGrund.SetName("edTauschGrund"),this.edTauschGrund.SetLeft(482),this.edTauschGrund.SetTop(310),this.edTauschGrund.SetWidth(96),this.edTauschGrund.SetHeight(25),this.edTauschGrund.SetChildOrderEx(6),this.edTauschGrund.SetElementFont(1),this.edTauschGrund.SetElementPosition(2),this.edTauschGrund.SetHeightStyle(2),this.edTauschGrund.SetHeightPercent(100),this.edTauschGrund.SetWidthStyle(2),this.edTauschGrund.SetWidthPercent(100),this.cbWWNeubau.SetParentComponent(this),this.cbWWNeubau.SetName("cbWWNeubau"),this.cbWWNeubau.SetLeft(175),this.cbWWNeubau.SetTop(401),this.cbWWNeubau.SetWidth(96),this.cbWWNeubau.SetHeight(25),this.cbWWNeubau.SetCaption("cbWWNeubau"),this.cbWWNeubau.SetChildOrderEx(7),this.cbWWNeubau.SetElementFont(1),this.cbWWNeubau.SetElementPosition(2),this.cbWWNeubau.SetHeightStyle(2),this.cbWWNeubau.SetHeightPercent(100),this.cbWWNeubau.SetWidthStyle(2),this.cbWWNeubau.SetWidthPercent(100),this.cbDatenschutz.SetParentComponent(this),this.cbDatenschutz.SetName("cbDatenschutz"),this.cbDatenschutz.SetLeft(22),this.cbDatenschutz.SetTop(374),this.cbDatenschutz.SetWidth(96),this.cbDatenschutz.SetHeight(25),this.cbDatenschutz.SetCaption("cbDatenschutz"),this.cbDatenschutz.SetChildOrderEx(8),this.cbDatenschutz.SetElementFont(1),this.cbDatenschutz.SetElementPosition(2),this.cbDatenschutz.SetHeightStyle(2),this.cbDatenschutz.SetHeightPercent(100),this.cbDatenschutz.SetWidthStyle(2),this.cbDatenschutz.SetWidthPercent(100),this.edWWZimmer.SetParentComponent(this),this.edWWZimmer.SetName("edWWZimmer"),this.edWWZimmer.SetLeft(313),this.edWWZimmer.SetTop(374),this.edWWZimmer.SetWidth(96),this.edWWZimmer.SetHeight(25),this.edWWZimmer.SetHeightStyle(2),this.edWWZimmer.SetWidthStyle(2),this.edWWZimmer.FAutoSize=!1,this.edWWZimmer.SetBorderStyle(1),this.edWWZimmer.SetChildOrderEx(9),this.edWWZimmer.SetColor(16777215),this.edWWZimmer.SetElementFont(1),this.edWWZimmer.SetElementPosition(2),this.edWWZimmer.SetIncrement(1),this.edWWZimmer.SetMaxValue(100),this.edWWZimmer.SetMinValue(0),this.edWWZimmer.SetRole(""),this.edWWZimmer.SetValue(0),this.rbTiereJ.SetParentComponent(this),this.rbTiereJ.SetName("rbTiereJ"),this.rbTiereJ.SetLeft(25),this.rbTiereJ.SetTop(302),this.rbTiereJ.SetWidth(96),this.rbTiereJ.SetHeight(25),this.rbTiereJ.SetCaption("rbTiereJ"),this.rbTiereJ.SetChecked(!1),this.rbTiereJ.SetChildOrderEx(10),this.rbTiereJ.SetColor(-1),this.rbTiereJ.SetElementFont(1),this.rbTiereJ.SetElementPosition(2),this.rbTiereJ.SetGroupName("rbTiere"),this.rbTiereJ.SetHeightStyle(2),this.rbTiereJ.SetHeightPercent(100),this.rbTiereJ.SetWidthStyle(2),this.rbTiereJ.SetWidthPercent(100),this.edNachname.SetParentComponent(this),this.edNachname.SetName("edNachname"),this.edNachname.SetLeft(101),this.edNachname.SetTop(60),this.edNachname.SetWidth(96),this.edNachname.SetHeight(25),this.edNachname.SetChildOrderEx(11),this.edNachname.SetElementFont(1),this.edNachname.SetElementPosition(2),this.edNachname.SetHeightStyle(2),this.edNachname.SetHeightPercent(100),this.edNachname.SetWidthStyle(2),this.edNachname.SetWidthPercent(100),this.edTauschTermin.SetParentComponent(this),this.edTauschTermin.SetName("edTauschTermin"),this.edTauschTermin.SetLeft(202),this.edTauschTermin.SetTop(60),this.edTauschTermin.SetWidth(96),this.edTauschTermin.SetHeight(25),this.edTauschTermin.SetChildOrderEx(12),this.edTauschTermin.SetElementFont(1),this.edTauschTermin.SetElementPosition(2),this.edTauschTermin.SetHeightStyle(2),this.edTauschTermin.SetHeightPercent(100),this.edTauschTermin.SetText(" "),this.edTauschTermin.SetWidthStyle(2),this.edTauschTermin.SetWidthPercent(100),this.edTiereAnzahl.SetParentComponent(this),this.edTiereAnzahl.SetName("edTiereAnzahl"),this.edTiereAnzahl.SetLeft(25),this.edTiereAnzahl.SetTop(343),this.edTiereAnzahl.SetWidth(96),this.edTiereAnzahl.SetHeight(25),this.edTiereAnzahl.SetHeightStyle(2),this.edTiereAnzahl.SetWidthStyle(2),this.edTiereAnzahl.FAutoSize=!1,this.edTiereAnzahl.SetBorderStyle(1),this.edTiereAnzahl.SetChildOrderEx(13),this.edTiereAnzahl.SetColor(16777215),this.edTiereAnzahl.SetElementFont(1),this.edTiereAnzahl.SetElementPosition(2),this.edTiereAnzahl.SetIncrement(1),this.edTiereAnzahl.SetMaxValue(100),this.edTiereAnzahl.SetMinValue(0),this.edTiereAnzahl.SetRole(""),this.edTiereAnzahl.SetValue(0),this.cbVergabebedingungen.SetParentComponent(this),this.cbVergabebedingungen.SetName("cbVergabebedingungen"),this.cbVergabebedingungen.SetLeft(22),this.cbVergabebedingungen.SetTop(405),this.cbVergabebedingungen.SetWidth(96),this.cbVergabebedingungen.SetHeight(25),this.cbVergabebedingungen.SetCaption("cbVergabebedingungen"),this.cbVergabebedingungen.SetChildOrderEx(14),this.cbVergabebedingungen.SetElementFont(1),this.cbVergabebedingungen.SetElementPosition(2),this.cbVergabebedingungen.SetHeightStyle(2),this.cbVergabebedingungen.SetHeightPercent(100),this.cbVergabebedingungen.SetWidthStyle(2),this.cbVergabebedingungen.SetWidthPercent(100),this.cbWWWL3RobertKochStr.SetParentComponent(this),this.cbWWWL3RobertKochStr.SetName("cbWWWL3RobertKochStr"),this.cbWWWL3RobertKochStr.SetLeft(8),this.cbWWWL3RobertKochStr.SetTop(499),this.cbWWWL3RobertKochStr.SetWidth(96),this.cbWWWL3RobertKochStr.SetHeight(25),this.cbWWWL3RobertKochStr.SetCaption("cbWWWL3RobertKochStr"),this.cbWWWL3RobertKochStr.SetChildOrderEx(15),this.cbWWWL3RobertKochStr.SetElementFont(1),this.cbWWWL3RobertKochStr.SetElementPosition(2),this.cbWWWL3RobertKochStr.SetHeightStyle(2),this.cbWWWL3RobertKochStr.SetHeightPercent(100),this.cbWWWL3RobertKochStr.SetWidthStyle(2),this.cbWWWL3RobertKochStr.SetWidthPercent(100),this.edArbeitgeber.SetParentComponent(this),this.edArbeitgeber.SetName("edArbeitgeber"),this.edArbeitgeber.SetLeft(0),this.edArbeitgeber.SetTop(90),this.edArbeitgeber.SetWidth(96),this.edArbeitgeber.SetHeight(25),this.edArbeitgeber.SetChildOrderEx(16),this.edArbeitgeber.SetElementFont(1),this.edArbeitgeber.SetElementPosition(2),this.edArbeitgeber.SetHeightStyle(2),this.edArbeitgeber.SetHeightPercent(100),this.edArbeitgeber.SetWidthStyle(2),this.edArbeitgeber.SetWidthPercent(100),this.edTierRasse.SetParentComponent(this),this.edTierRasse.SetName("edTierRasse"),this.edTierRasse.SetLeft(101),this.edTierRasse.SetTop(90),this.edTierRasse.SetWidth(96),this.edTierRasse.SetHeight(25),this.edTierRasse.SetChildOrderEx(17),this.edTierRasse.SetElementFont(1),this.edTierRasse.SetElementPosition(2),this.edTierRasse.SetHeightStyle(2),this.edTierRasse.SetHeightPercent(100),this.edTierRasse.SetWidthStyle(2),this.edTierRasse.SetWidthPercent(100),this.edMiete.SetParentComponent(this),this.edMiete.SetName("edMiete"),this.edMiete.SetLeft(482),this.edMiete.SetTop(362),this.edMiete.SetWidth(96),this.edMiete.SetHeight(25),this.edMiete.SetHeightStyle(2),this.edMiete.SetWidthStyle(2),this.edMiete.FAutoSize=!1,this.edMiete.SetBorderStyle(1),this.edMiete.SetChildOrderEx(18),this.edMiete.SetColor(16777215),this.edMiete.SetElementFont(1),this.edMiete.SetElementPosition(2),this.edMiete.SetIncrement(1),this.edMiete.SetMaxValue(100),this.edMiete.SetMinValue(0),this.edMiete.SetRole(""),this.edMiete.SetValue(0),this.cbWWDusche.SetParentComponent(this),this.cbWWDusche.SetName("cbWWDusche"),this.cbWWDusche.SetLeft(175),this.cbWWDusche.SetTop(370),this.cbWWDusche.SetWidth(96),this.cbWWDusche.SetHeight(25),this.cbWWDusche.SetCaption("cbWWDusche"),this.cbWWDusche.SetChildOrderEx(19),this.cbWWDusche.SetElementFont(1),this.cbWWDusche.SetElementPosition(2),this.cbWWDusche.SetHeightStyle(2),this.cbWWDusche.SetHeightPercent(100),this.cbWWDusche.SetWidthStyle(2),this.cbWWDusche.SetWidthPercent(100),this.edStrasse.SetParentComponent(this),this.edStrasse.SetName("edStrasse"),this.edStrasse.SetLeft(404),this.edStrasse.SetTop(90),this.edStrasse.SetWidth(96),this.edStrasse.SetHeight(25),this.edStrasse.SetChildOrderEx(20),this.edStrasse.SetElementFont(1),this.edStrasse.SetElementPosition(2),this.edStrasse.SetHeightStyle(2),this.edStrasse.SetHeightPercent(100),this.edStrasse.SetWidthStyle(2),this.edStrasse.SetWidthPercent(100),this.edWWQuadratmeter.SetParentComponent(this),this.edWWQuadratmeter.SetName("edWWQuadratmeter"),this.edWWQuadratmeter.SetLeft(313),this.edWWQuadratmeter.SetTop(418),this.edWWQuadratmeter.SetWidth(96),this.edWWQuadratmeter.SetHeight(25),this.edWWQuadratmeter.SetHeightStyle(2),this.edWWQuadratmeter.SetWidthStyle(2),this.edWWQuadratmeter.FAutoSize=!1,this.edWWQuadratmeter.SetBorderStyle(1),this.edWWQuadratmeter.SetChildOrderEx(21),this.edWWQuadratmeter.SetColor(16777215),this.edWWQuadratmeter.SetElementFont(1),this.edWWQuadratmeter.SetElementPosition(2),this.edWWQuadratmeter.SetIncrement(1),this.edWWQuadratmeter.SetMaxValue(100),this.edWWQuadratmeter.SetMinValue(0),this.edWWQuadratmeter.SetRole(""),this.edWWQuadratmeter.SetValue(0),this.edPerson1Alter.SetParentComponent(this),this.edPerson1Alter.SetName("edPerson1Alter"),this.edPerson1Alter.SetLeft(482),this.edPerson1Alter.SetTop(406),this.edPerson1Alter.SetWidth(96),this.edPerson1Alter.SetHeight(25),this.edPerson1Alter.SetHeightStyle(2),this.edPerson1Alter.SetWidthStyle(2),this.edPerson1Alter.FAutoSize=!1,this.edPerson1Alter.SetBorderStyle(1),this.edPerson1Alter.SetChildOrderEx(22),this.edPerson1Alter.SetColor(16777215),this.edPerson1Alter.SetElementFont(1),this.edPerson1Alter.SetElementPosition(2),this.edPerson1Alter.SetIncrement(1),this.edPerson1Alter.SetMaxValue(100),this.edPerson1Alter.SetMinValue(0),this.edPerson1Alter.SetRole(""),this.edPerson1Alter.SetValue(0),this.edOrt.SetParentComponent(this),this.edOrt.SetName("edOrt"),this.edOrt.SetLeft(101),this.edOrt.SetTop(120),this.edOrt.SetWidth(96),this.edOrt.SetHeight(25),this.edOrt.SetChildOrderEx(23),this.edOrt.SetElementFont(1),this.edOrt.SetElementPosition(2),this.edOrt.SetHeightStyle(2),this.edOrt.SetHeightPercent(100),this.edOrt.SetWidthStyle(2),this.edOrt.SetWidthPercent(100),this.edPerson1Beruf.SetParentComponent(this),this.edPerson1Beruf.SetName("edPerson1Beruf"),this.edPerson1Beruf.SetLeft(202),this.edPerson1Beruf.SetTop(120),this.edPerson1Beruf.SetWidth(96),this.edPerson1Beruf.SetHeight(25),this.edPerson1Beruf.SetChildOrderEx(24),this.edPerson1Beruf.SetElementFont(1),this.edPerson1Beruf.SetElementPosition(2),this.edPerson1Beruf.SetHeightStyle(2),this.edPerson1Beruf.SetHeightPercent(100),this.edPerson1Beruf.SetWidthStyle(2),this.edPerson1Beruf.SetWidthPercent(100),this.edPerson2Name.SetParentComponent(this),this.edPerson2Name.SetName("edPerson2Name"),this.edPerson2Name.SetLeft(303),this.edPerson2Name.SetTop(120),this.edPerson2Name.SetWidth(96),this.edPerson2Name.SetHeight(25),this.edPerson2Name.SetChildOrderEx(25),this.edPerson2Name.SetElementFont(1),this.edPerson2Name.SetElementPosition(2),this.edPerson2Name.SetHeightStyle(2),this.edPerson2Name.SetHeightPercent(100),this.edPerson2Name.SetWidthStyle(2),this.edPerson2Name.SetWidthPercent(100),this.cbWWWL1Mainflecklein.SetParentComponent(this),this.cbWWWL1Mainflecklein.SetName("cbWWWL1Mainflecklein"),this.cbWWWL1Mainflecklein.SetLeft(8),this.cbWWWL1Mainflecklein.SetTop(448),this.cbWWWL1Mainflecklein.SetWidth(96),this.cbWWWL1Mainflecklein.SetHeight(25),this.cbWWWL1Mainflecklein.SetCaption("cbWWWL1Mainflecklein"),this.cbWWWL1Mainflecklein.SetChildOrderEx(26),this.cbWWWL1Mainflecklein.SetElementFont(1),this.cbWWWL1Mainflecklein.SetElementPosition(2),this.cbWWWL1Mainflecklein.SetHeightStyle(2),this.cbWWWL1Mainflecklein.SetHeightPercent(100),this.cbWWWL1Mainflecklein.SetWidthStyle(2),this.cbWWWL1Mainflecklein.SetWidthPercent(100),this.edPerson2Beruf.SetParentComponent(this),this.edPerson2Beruf.SetName("edPerson2Beruf"),this.edPerson2Beruf.SetLeft(0),this.edPerson2Beruf.SetTop(150),this.edPerson2Beruf.SetWidth(96),this.edPerson2Beruf.SetHeight(25),this.edPerson2Beruf.SetChildOrderEx(27),this.edPerson2Beruf.SetElementFont(1),this.edPerson2Beruf.SetElementPosition(2),this.edPerson2Beruf.SetHeightStyle(2),this.edPerson2Beruf.SetHeightPercent(100),this.edPerson2Beruf.SetWidthStyle(2),this.edPerson2Beruf.SetWidthPercent(100),this.edPersonenGesamt.SetParentComponent(this),this.edPersonenGesamt.SetName("edPersonenGesamt"),this.edPersonenGesamt.SetLeft(482),this.edPersonenGesamt.SetTop(437),this.edPersonenGesamt.SetWidth(96),this.edPersonenGesamt.SetHeight(25),this.edPersonenGesamt.SetHeightStyle(2),this.edPersonenGesamt.SetWidthStyle(2),this.edPersonenGesamt.FAutoSize=!1,this.edPersonenGesamt.SetBorderStyle(1),this.edPersonenGesamt.SetChildOrderEx(28),this.edPersonenGesamt.SetColor(16777215),this.edPersonenGesamt.SetElementFont(1),this.edPersonenGesamt.SetElementPosition(2),this.edPersonenGesamt.SetIncrement(1),this.edPersonenGesamt.SetMaxValue(100),this.edPersonenGesamt.SetMinValue(0),this.edPersonenGesamt.SetRole(""),this.edPersonenGesamt.SetValue(0),this.edPLZ.SetParentComponent(this),this.edPLZ.SetName("edPLZ"),this.edPLZ.SetLeft(482),this.edPLZ.SetTop(230),this.edPLZ.SetWidth(96),this.edPLZ.SetHeight(25),this.edPLZ.SetHeightStyle(2),this.edPLZ.SetWidthStyle(2),this.edPLZ.FAutoSize=!1,this.edPLZ.SetBorderStyle(1),this.edPLZ.SetChildOrderEx(29),this.edPLZ.SetColor(16777215),this.edPLZ.SetElementFont(1),this.edPLZ.SetElementPosition(2),this.edPLZ.SetIncrement(1),this.edPLZ.SetMaxValue(100),this.edPLZ.SetMinValue(0),this.edPLZ.SetRole(""),this.edPLZ.SetValue(0),this.edPersonenErwachsene.SetParentComponent(this),this.edPersonenErwachsene.SetName("edPersonenErwachsene"),this.edPersonenErwachsene.SetLeft(482),this.edPersonenErwachsene.SetTop(468),this.edPersonenErwachsene.SetWidth(96),this.edPersonenErwachsene.SetHeight(25),this.edPersonenErwachsene.SetHeightStyle(2),this.edPersonenErwachsene.SetWidthStyle(2),this.edPersonenErwachsene.FAutoSize=!1,this.edPersonenErwachsene.SetBorderStyle(1),this.edPersonenErwachsene.SetChildOrderEx(30),this.edPersonenErwachsene.SetColor(16777215),this.edPersonenErwachsene.SetElementFont(1),this.edPersonenErwachsene.SetElementPosition(2),this.edPersonenErwachsene.SetIncrement(1),this.edPersonenErwachsene.SetMaxValue(100),this.edPersonenErwachsene.SetMinValue(0),this.edPersonenErwachsene.SetRole(""),this.edPersonenErwachsene.SetValue(0),this.cbWWWL4Leineck.SetParentComponent(this),this.cbWWWL4Leineck.SetName("cbWWWL4Leineck"),this.cbWWWL4Leineck.SetLeft(8),this.cbWWWL4Leineck.SetTop(520),this.cbWWWL4Leineck.SetWidth(96),this.cbWWWL4Leineck.SetHeight(25),this.cbWWWL4Leineck.SetCaption("cbWWWL4Leineck"),this.cbWWWL4Leineck.SetChildOrderEx(31),this.cbWWWL4Leineck.SetElementFont(1),this.cbWWWL4Leineck.SetElementPosition(2),this.cbWWWL4Leineck.SetHeightStyle(2),this.cbWWWL4Leineck.SetHeightPercent(100),this.cbWWWL4Leineck.SetWidthStyle(2),this.cbWWWL4Leineck.SetWidthPercent(100),this.edGBWMitgliedSeit.SetParentComponent(this),this.edGBWMitgliedSeit.SetName("edGBWMitgliedSeit"),this.edGBWMitgliedSeit.SetLeft(505),this.edGBWMitgliedSeit.SetTop(150),this.edGBWMitgliedSeit.SetWidth(96),this.edGBWMitgliedSeit.SetHeight(25),this.edGBWMitgliedSeit.SetChildOrderEx(32),this.edGBWMitgliedSeit.SetElementFont(1),this.edGBWMitgliedSeit.SetElementPosition(2),this.edGBWMitgliedSeit.SetHeightStyle(2),this.edGBWMitgliedSeit.SetHeightPercent(100),this.edGBWMitgliedSeit.SetWidthStyle(2),this.edGBWMitgliedSeit.SetWidthPercent(100),this.edVorname.SetParentComponent(this),this.edVorname.SetName("edVorname"),this.edVorname.SetLeft(0),this.edVorname.SetTop(180),this.edVorname.SetWidth(96),this.edVorname.SetHeight(25),this.edVorname.SetChildOrderEx(33),this.edVorname.SetElementFont(1),this.edVorname.SetElementPosition(2),this.edVorname.SetHeightStyle(2),this.edVorname.SetHeightPercent(100),this.edVorname.SetWidthStyle(2),this.edVorname.SetWidthPercent(100),this.edBeruf.SetParentComponent(this),this.edBeruf.SetName("edBeruf"),this.edBeruf.SetLeft(101),this.edBeruf.SetTop(180),this.edBeruf.SetWidth(96),this.edBeruf.SetHeight(25),this.edBeruf.SetChildOrderEx(34),this.edBeruf.SetElementFont(1),this.edBeruf.SetElementPosition(2),this.edBeruf.SetHeightStyle(2),this.edBeruf.SetHeightPercent(100),this.edBeruf.SetWidthStyle(2),this.edBeruf.SetWidthPercent(100),this.cbWWWL2Herzoghoehe.SetParentComponent(this),this.cbWWWL2Herzoghoehe.SetName("cbWWWL2Herzoghoehe"),this.cbWWWL2Herzoghoehe.SetLeft(8),this.cbWWWL2Herzoghoehe.SetTop(468),this.cbWWWL2Herzoghoehe.SetWidth(96),this.cbWWWL2Herzoghoehe.SetHeight(25),this.cbWWWL2Herzoghoehe.SetCaption("cbWWWL2Herzoghoehe"),this.cbWWWL2Herzoghoehe.SetChildOrderEx(35),this.cbWWWL2Herzoghoehe.SetElementFont(1),this.cbWWWL2Herzoghoehe.SetElementPosition(2),this.cbWWWL2Herzoghoehe.SetHeightStyle(2),this.cbWWWL2Herzoghoehe.SetHeightPercent(100),this.cbWWWL2Herzoghoehe.SetWidthStyle(2),this.cbWWWL2Herzoghoehe.SetWidthPercent(100),this.edPerson1Name.SetParentComponent(this),this.edPerson1Name.SetName("edPerson1Name"),this.edPerson1Name.SetLeft(303),this.edPerson1Name.SetTop(180),this.edPerson1Name.SetWidth(96),this.edPerson1Name.SetHeight(25),this.edPerson1Name.SetChildOrderEx(36),this.edPerson1Name.SetElementFont(1),this.edPerson1Name.SetElementPosition(2),this.edPerson1Name.SetHeightStyle(2),this.edPerson1Name.SetHeightPercent(100),this.edPerson1Name.SetWidthStyle(2),this.edPerson1Name.SetWidthPercent(100),this.edPerson3Beruf.SetParentComponent(this),this.edPerson3Beruf.SetName("edPerson3Beruf"),this.edPerson3Beruf.SetLeft(404),this.edPerson3Beruf.SetTop(180),this.edPerson3Beruf.SetWidth(96),this.edPerson3Beruf.SetHeight(25),this.edPerson3Beruf.SetChildOrderEx(37),this.edPerson3Beruf.SetElementFont(1),this.edPerson3Beruf.SetElementPosition(2),this.edPerson3Beruf.SetHeightStyle(2),this.edPerson3Beruf.SetHeightPercent(100),this.edPerson3Beruf.SetWidthStyle(2),this.edPerson3Beruf.SetWidthPercent(100),this.cbWWZentralheizung.SetParentComponent(this),this.cbWWZentralheizung.SetName("cbWWZentralheizung"),this.cbWWZentralheizung.SetLeft(175),this.cbWWZentralheizung.SetTop(463),this.cbWWZentralheizung.SetWidth(96),this.cbWWZentralheizung.SetHeight(25),this.cbWWZentralheizung.SetCaption("cbWWZentralheizung"),this.cbWWZentralheizung.SetChildOrderEx(38),this.cbWWZentralheizung.SetElementFont(1),this.cbWWZentralheizung.SetElementPosition(2),this.cbWWZentralheizung.SetHeightStyle(2),this.cbWWZentralheizung.SetHeightPercent(100),this.cbWWZentralheizung.SetWidthStyle(2),this.cbWWZentralheizung.SetWidthPercent(100),this.edWWWLAndere.SetParentComponent(this),this.edWWWLAndere.SetName("edWWWLAndere"),this.edWWWLAndere.SetLeft(8),this.edWWWLAndere.SetTop(551),this.edWWWLAndere.SetWidth(96),this.edWWWLAndere.SetHeight(25),this.edWWWLAndere.SetChildOrderEx(39),this.edWWWLAndere.SetElementFont(1),this.edWWWLAndere.SetElementPosition(2),this.edWWWLAndere.SetHeightStyle(2),this.edWWWLAndere.SetHeightPercent(100),this.edWWWLAndere.SetWidthStyle(2),this.edWWWLAndere.SetWidthPercent(100),this.edAnmerkungen.SetParentComponent(this),this.edAnmerkungen.SetName("edAnmerkungen"),this.edAnmerkungen.SetLeft(101),this.edAnmerkungen.SetTop(210),this.edAnmerkungen.SetWidth(96),this.edAnmerkungen.SetHeight(25),this.edAnmerkungen.SetElementFont(1),this.edAnmerkungen.SetElementPosition(2),this.edAnmerkungen.SetHeightStyle(2),this.edAnmerkungen.SetHeightPercent(100),this.edAnmerkungen.SetSelLength(0),this.edAnmerkungen.SetSelStart(0),this.edAnmerkungen.SetWidthStyle(2),this.edAnmerkungen.SetWidthPercent(100),this.edGBWMitgliedsnummer.SetParentComponent(this),this.edGBWMitgliedsnummer.SetName("edGBWMitgliedsnummer"),this.edGBWMitgliedsnummer.SetLeft(202),this.edGBWMitgliedsnummer.SetTop(210),this.edGBWMitgliedsnummer.SetWidth(96),this.edGBWMitgliedsnummer.SetHeight(25),this.edGBWMitgliedsnummer.SetChildOrderEx(41),this.edGBWMitgliedsnummer.SetElementFont(1),this.edGBWMitgliedsnummer.SetElementPosition(2),this.edGBWMitgliedsnummer.SetHeightStyle(2),this.edGBWMitgliedsnummer.SetHeightPercent(100),this.edGBWMitgliedsnummer.SetWidthStyle(2),this.edGBWMitgliedsnummer.SetWidthPercent(100),this.cbWWBalkon.SetParentComponent(this),this.cbWWBalkon.SetName("cbWWBalkon"),this.cbWWBalkon.SetLeft(175),this.cbWWBalkon.SetTop(494),this.cbWWBalkon.SetWidth(96),this.cbWWBalkon.SetHeight(25),this.cbWWBalkon.SetCaption("cbWWBalkon"),this.cbWWBalkon.SetChildOrderEx(42),this.cbWWBalkon.SetElementFont(1),this.cbWWBalkon.SetElementPosition(2),this.cbWWBalkon.SetHeightStyle(2),this.cbWWBalkon.SetHeightPercent(100),this.cbWWBalkon.SetWidthStyle(2),this.cbWWBalkon.SetWidthPercent(100),this.rbTiereN.SetParentComponent(this),this.rbTiereN.SetName("rbTiereN"),this.rbTiereN.SetLeft(25),this.rbTiereN.SetTop(271),this.rbTiereN.SetWidth(96),this.rbTiereN.SetHeight(25),this.rbTiereN.SetCaption("rbTiereN"),this.rbTiereN.SetChecked(!0),this.rbTiereN.SetChildOrderEx(43),this.rbTiereN.SetColor(-1),this.rbTiereN.SetElementFont(1),this.rbTiereN.SetElementPosition(2),this.rbTiereN.SetGroupName("rbTiere"),this.rbTiereN.SetHeightStyle(2),this.rbTiereN.SetHeightPercent(100),this.rbTiereN.SetWidthStyle(2),this.rbTiereN.SetWidthPercent(100),this.edPerson3Alter.SetParentComponent(this),this.edPerson3Alter.SetName("edPerson3Alter"),this.edPerson3Alter.SetLeft(313),this.edPerson3Alter.SetTop(458),this.edPerson3Alter.SetWidth(96),this.edPerson3Alter.SetHeight(25),this.edPerson3Alter.SetHeightStyle(2),this.edPerson3Alter.SetWidthStyle(2),this.edPerson3Alter.FAutoSize=!1,this.edPerson3Alter.SetBorderStyle(1),this.edPerson3Alter.SetChildOrderEx(44),this.edPerson3Alter.SetColor(16777215),this.edPerson3Alter.SetElementFont(1),this.edPerson3Alter.SetElementPosition(2),this.edPerson3Alter.SetIncrement(1),this.edPerson3Alter.SetMaxValue(100),this.edPerson3Alter.SetMinValue(0),this.edPerson3Alter.SetRole(""),this.edPerson3Alter.SetValue(0),this.edTelefon.SetParentComponent(this),this.edTelefon.SetName("edTelefon"),this.edTelefon.SetLeft(0),this.edTelefon.SetTop(240),this.edTelefon.SetWidth(96),this.edTelefon.SetHeight(25),this.edTelefon.SetChildOrderEx(45),this.edTelefon.SetElementFont(1),this.edTelefon.SetElementPosition(2),this.edTelefon.SetHeightStyle(2),this.edTelefon.SetHeightPercent(100),this.edTelefon.SetWidthStyle(2),this.edTelefon.SetWidthPercent(100),this.edPerson3Name.SetParentComponent(this),this.edPerson3Name.SetName("edPerson3Name"),this.edPerson3Name.SetLeft(101),this.edPerson3Name.SetTop(240),this.edPerson3Name.SetWidth(96),this.edPerson3Name.SetHeight(25),this.edPerson3Name.SetChildOrderEx(46),this.edPerson3Name.SetElementFont(1),this.edPerson3Name.SetElementPosition(2),this.edPerson3Name.SetHeightStyle(2),this.edPerson3Name.SetHeightPercent(100),this.edPerson3Name.SetWidthStyle(2),this.edPerson3Name.SetWidthPercent(100),this.rbStockwerkJ.SetParentComponent(this),this.rbStockwerkJ.SetName("rbStockwerkJ"),this.rbStockwerkJ.SetLeft(202),this.rbStockwerkJ.SetTop(0),this.rbStockwerkJ.SetWidth(96),this.rbStockwerkJ.SetHeight(25),this.rbStockwerkJ.SetCaption("rbStockwerkJ"),this.rbStockwerkJ.SetChecked(!1),this.rbStockwerkJ.SetChildOrderEx(47),this.rbStockwerkJ.SetColor(-1),this.rbStockwerkJ.SetElementFont(1),this.rbStockwerkJ.SetElementPosition(2),this.rbStockwerkJ.SetGroupName("rbStockwerk"),this.rbStockwerkJ.SetHeightStyle(2),this.rbStockwerkJ.SetHeightPercent(100),this.rbStockwerkJ.SetWidthStyle(2),this.rbStockwerkJ.SetWidthPercent(100),this.rbStockwerkN.SetParentComponent(this),this.rbStockwerkN.SetName("rbStockwerkN"),this.rbStockwerkN.SetLeft(313),this.rbStockwerkN.SetTop(0),this.rbStockwerkN.SetWidth(96),this.rbStockwerkN.SetHeight(25),this.rbStockwerkN.SetCaption("rbStockwerkN"),this.rbStockwerkN.SetChecked(!0),this.rbStockwerkN.SetChildOrderEx(48),this.rbStockwerkN.SetColor(-1),this.rbStockwerkN.SetElementFont(1),this.rbStockwerkN.SetElementPosition(2),this.rbStockwerkN.SetGroupName("rbStockwerk"),this.rbStockwerkN.SetHeightStyle(2),this.rbStockwerkN.SetHeightPercent(100),this.rbStockwerkN.SetWidthStyle(2),this.rbStockwerkN.SetWidthPercent(100),this.edWWStockwerk.SetParentComponent(this),this.edWWStockwerk.SetName("edWWStockwerk"),this.edWWStockwerk.SetLeft(356),this.edWWStockwerk.SetTop(522),this.edWWStockwerk.SetWidth(96),this.edWWStockwerk.SetHeight(25),this.edWWStockwerk.SetChildOrderEx(49),this.edWWStockwerk.SetElementFont(1),this.edWWStockwerk.SetElementPosition(2),this.edWWStockwerk.SetHeightStyle(2),this.edWWStockwerk.SetHeightPercent(100),this.edWWStockwerk.SetWidthStyle(2),this.edWWStockwerk.SetWidthPercent(100),this.cbWWAufzug.SetParentComponent(this),this.cbWWAufzug.SetName("cbWWAufzug"),this.cbWWAufzug.SetLeft(175),this.cbWWAufzug.SetTop(343),this.cbWWAufzug.SetWidth(96),this.cbWWAufzug.SetHeight(25),this.cbWWAufzug.SetCaption("cbWWAufzug"),this.cbWWAufzug.SetChildOrderEx(50),this.cbWWAufzug.SetElementFont(1),this.cbWWAufzug.SetElementPosition(2),this.cbWWAufzug.SetHeightStyle(2),this.cbWWAufzug.SetHeightPercent(100),this.cbWWAufzug.SetWidthStyle(2),this.cbWWAufzug.SetWidthPercent(100),this.pnlMessage.SetParentComponent(this),this.pnlMessage.SetName("pnlMessage"),this.pnlMessage.SetLeft(0),this.pnlMessage.SetTop(0),this.pnlMessage.SetWidth(121),this.pnlMessage.SetHeight(33),this.pnlMessage.SetHeightStyle(2),this.pnlMessage.SetWidthStyle(2),this.pnlMessage.SetChildOrderEx(8),this.pnlMessage.SetElementFont(1),this.pnlMessage.SetElementPosition(2),this.lbMessage.SetParentComponent(this.pnlMessage),this.lbMessage.SetName("lbMessage"),this.lbMessage.SetLeft(16),this.lbMessage.SetTop(11),this.lbMessage.SetWidth(42),this.lbMessage.SetHeight(13),this.lbMessage.SetCaption("Message"),this.lbMessage.SetHeightPercent(100),this.lbMessage.SetWidthPercent(100),this.WebMessageButton.SetParentComponent(this.pnlMessage),this.WebMessageButton.SetName("WebMessageButton"),this.WebMessageButton.SetLeft(96),this.WebMessageButton.SetTop(3),this.WebMessageButton.SetWidth(22),this.WebMessageButton.SetHeight(25),this.WebMessageButton.SetCaption("x"),this.WebMessageButton.SetChildOrderEx(1),this.WebMessageButton.SetElementFont(1),this.WebMessageButton.SetElementPosition(2),this.WebMessageButton.SetHeightStyle(2),this.WebMessageButton.SetHeightPercent(100),this.WebMessageButton.SetWidthStyle(2),this.WebMessageButton.SetWidthPercent(100),this.SetEvent$1(this.WebMessageButton,this,"OnClick","WebMessageButtonClick"),this.Client.SetParentComponent(this),this.Client.SetName("Client"),this.Client.SetConnection(pas["mpoweb.ConnectionModule"].DMConnection.ApiConnection),this.Client.SetLeft(8),this.Client.SetTop(16)}finally{this.btSpeichern.AfterLoadDFMValues(),this.edPersonenKinder.AfterLoadDFMValues(),this.cbWWBadewanne.AfterLoadDFMValues(),this.edReligion.AfterLoadDFMValues(),this.edPerson2Alter.AfterLoadDFMValues(),this.edTauschGrund.AfterLoadDFMValues(),this.cbWWNeubau.AfterLoadDFMValues(),this.cbDatenschutz.AfterLoadDFMValues(),this.edWWZimmer.AfterLoadDFMValues(),this.rbTiereJ.AfterLoadDFMValues(),this.edNachname.AfterLoadDFMValues(),this.edTauschTermin.AfterLoadDFMValues(),this.edTiereAnzahl.AfterLoadDFMValues(),this.cbVergabebedingungen.AfterLoadDFMValues(),this.cbWWWL3RobertKochStr.AfterLoadDFMValues(),this.edArbeitgeber.AfterLoadDFMValues(),this.edTierRasse.AfterLoadDFMValues(),this.edMiete.AfterLoadDFMValues(),this.cbWWDusche.AfterLoadDFMValues(),this.edStrasse.AfterLoadDFMValues(),this.edWWQuadratmeter.AfterLoadDFMValues(),this.edPerson1Alter.AfterLoadDFMValues(),this.edOrt.AfterLoadDFMValues(),this.edPerson1Beruf.AfterLoadDFMValues(),this.edPerson2Name.AfterLoadDFMValues(),this.cbWWWL1Mainflecklein.AfterLoadDFMValues(),this.edPerson2Beruf.AfterLoadDFMValues(),this.edPersonenGesamt.AfterLoadDFMValues(),this.edPLZ.AfterLoadDFMValues(),this.edPersonenErwachsene.AfterLoadDFMValues(),this.cbWWWL4Leineck.AfterLoadDFMValues(),this.edGBWMitgliedSeit.AfterLoadDFMValues(),this.edVorname.AfterLoadDFMValues(),this.edBeruf.AfterLoadDFMValues(),this.cbWWWL2Herzoghoehe.AfterLoadDFMValues(),this.edPerson1Name.AfterLoadDFMValues(),this.edPerson3Beruf.AfterLoadDFMValues(),this.cbWWZentralheizung.AfterLoadDFMValues(),this.edWWWLAndere.AfterLoadDFMValues(),this.edAnmerkungen.AfterLoadDFMValues(),this.edGBWMitgliedsnummer.AfterLoadDFMValues(),this.cbWWBalkon.AfterLoadDFMValues(),this.rbTiereN.AfterLoadDFMValues(),this.edPerson3Alter.AfterLoadDFMValues(),this.edTelefon.AfterLoadDFMValues(),this.edPerson3Name.AfterLoadDFMValues(),this.rbStockwerkJ.AfterLoadDFMValues(),this.rbStockwerkN.AfterLoadDFMValues(),this.edWWStockwerk.AfterLoadDFMValues(),this.cbWWAufzug.AfterLoadDFMValues(),this.pnlMessage.AfterLoadDFMValues(),this.lbMessage.AfterLoadDFMValues(),this.WebMessageButton.AfterLoadDFMValues(),this.Client.AfterLoadDFMValues()}},rtl.addIntf(this,pas["WEBLib.Controls"].IControl),rtl.addIntf(this,pas.System.IUnknown);var t=this.$rtti;t.addField("btSpeichern",pas["WEBLib.StdCtrls"].$rtti.TButton,4),t.addField("Client",pas["XData.Web.Client"].$rtti.TXDataWebClient,4),t.addField("edPersonenKinder",pas["WEBLib.StdCtrls"].$rtti.TSpinEdit,4),t.addField("cbWWBadewanne",pas["WEBLib.StdCtrls"].$rtti.TCheckBox,4),t.addField("edReligion",pas["WEBLib.StdCtrls"].$rtti.TEdit,4),t.addField("edPerson2Alter",pas["WEBLib.StdCtrls"].$rtti.TSpinEdit,4),t.addField("edTauschGrund",pas["WEBLib.StdCtrls"].$rtti.TEdit,4),t.addField("cbWWNeubau",pas["WEBLib.StdCtrls"].$rtti.TCheckBox,4),t.addField("cbDatenschutz",pas["WEBLib.StdCtrls"].$rtti.TCheckBox,4),t.addField("edWWZimmer",pas["WEBLib.StdCtrls"].$rtti.TSpinEdit,4),t.addField("rbTiereJ",pas["WEBLib.StdCtrls"].$rtti.TRadioButton,4),t.addField("edNachname",pas["WEBLib.StdCtrls"].$rtti.TEdit,4),t.addField("edTauschTermin",pas["WEBLib.StdCtrls"].$rtti.TEdit,4),t.addField("edTiereAnzahl",pas["WEBLib.StdCtrls"].$rtti.TSpinEdit,4),t.addField("cbVergabebedingungen",pas["WEBLib.StdCtrls"].$rtti.TCheckBox,4),t.addField("cbWWWL3RobertKochStr",pas["WEBLib.StdCtrls"].$rtti.TCheckBox,4),t.addField("edArbeitgeber",pas["WEBLib.StdCtrls"].$rtti.TEdit,4),t.addField("edTierRasse",pas["WEBLib.StdCtrls"].$rtti.TEdit,4),t.addField("edMiete",pas["WEBLib.StdCtrls"].$rtti.TSpinEdit,4),t.addField("cbWWDusche",pas["WEBLib.StdCtrls"].$rtti.TCheckBox,4),t.addField("edStrasse",pas["WEBLib.StdCtrls"].$rtti.TEdit,4),t.addField("edWWQuadratmeter",pas["WEBLib.StdCtrls"].$rtti.TSpinEdit,4),t.addField("edPerson1Alter",pas["WEBLib.StdCtrls"].$rtti.TSpinEdit,4),t.addField("edOrt",pas["WEBLib.StdCtrls"].$rtti.TEdit,4),t.addField("edPerson1Beruf",pas["WEBLib.StdCtrls"].$rtti.TEdit,4),t.addField("edPerson2Name",pas["WEBLib.StdCtrls"].$rtti.TEdit,4),t.addField("cbWWWL1Mainflecklein",pas["WEBLib.StdCtrls"].$rtti.TCheckBox,4),t.addField("edPerson2Beruf",pas["WEBLib.StdCtrls"].$rtti.TEdit,4),t.addField("edPersonenGesamt",pas["WEBLib.StdCtrls"].$rtti.TSpinEdit,4),t.addField("edPLZ",pas["WEBLib.StdCtrls"].$rtti.TSpinEdit,4),t.addField("edPersonenErwachsene",pas["WEBLib.StdCtrls"].$rtti.TSpinEdit,4),t.addField("cbWWWL4Leineck",pas["WEBLib.StdCtrls"].$rtti.TCheckBox,4),t.addField("edGBWMitgliedSeit",pas["WEBLib.StdCtrls"].$rtti.TEdit,4),t.addField("edVorname",pas["WEBLib.StdCtrls"].$rtti.TEdit,4),t.addField("edBeruf",pas["WEBLib.StdCtrls"].$rtti.TEdit,4),t.addField("cbWWWL2Herzoghoehe",pas["WEBLib.StdCtrls"].$rtti.TCheckBox,4),t.addField("edPerson1Name",pas["WEBLib.StdCtrls"].$rtti.TEdit,4),t.addField("edPerson3Beruf",pas["WEBLib.StdCtrls"].$rtti.TEdit,4),t.addField("cbWWZentralheizung",pas["WEBLib.StdCtrls"].$rtti.TCheckBox,4),t.addField("edWWWLAndere",pas["WEBLib.StdCtrls"].$rtti.TEdit,4),t.addField("edAnmerkungen",pas["WEBLib.StdCtrls"].$rtti.TMemo,4),t.addField("edGBWMitgliedsnummer",pas["WEBLib.StdCtrls"].$rtti.TEdit,4),t.addField("cbWWBalkon",pas["WEBLib.StdCtrls"].$rtti.TCheckBox,4),t.addField("rbTiereN",pas["WEBLib.StdCtrls"].$rtti.TRadioButton,4),t.addField("edPerson3Alter",pas["WEBLib.StdCtrls"].$rtti.TSpinEdit,4),t.addField("edTelefon",pas["WEBLib.StdCtrls"].$rtti.TEdit,4),t.addField("edPerson3Name",pas["WEBLib.StdCtrls"].$rtti.TEdit,4),t.addField("rbStockwerkJ",pas["WEBLib.StdCtrls"].$rtti.TRadioButton,4),t.addField("rbStockwerkN",pas["WEBLib.StdCtrls"].$rtti.TRadioButton,4),t.addField("edWWStockwerk",pas["WEBLib.StdCtrls"].$rtti.TEdit,4),t.addField("cbWWAufzug",pas["WEBLib.StdCtrls"].$rtti.TCheckBox,4),t.addField("pnlMessage",pas["WEBLib.ExtCtrls"].$rtti.TPanel,4),t.addField("lbMessage",pas["WEBLib.StdCtrls"].$rtti.TLabel,4),t.addField("WebMessageButton",pas["WEBLib.StdCtrls"].$rtti.TButton,4),t.addMethod("btSpeichernClick",0,[["Sender",pas.System.$rtti.TObject]],4),t.addMethod("WebMessageButtonClick",0,[["Sender",pas.System.$rtti.TObject]],4),t.addMethod("WebFormCreate",0,[["Sender",pas.System.$rtti.TObject]],4),t.addMethod("WebFormShow",0,[["Sender",pas.System.$rtti.TObject]],4)}))}),["mpoweb.ConnectionModule","mpoweb.Auth.Service"]),rtl.module("mpoView.Studentenwohnheim",["System","SysUtils","Classes","JS","XData.Web.Connection","XData.Web.Client","Web","WEBLib.Graphics","WEBLib.Controls","WEBLib.Forms","WEBLib.Dialogs","WEBLib.StdCtrls","WEBLib.StdCtrls","WEBLib.Controls","WEBLib.REST","WEBLib.JSON","WEBLib.ExtCtrls","WEBLib.WebCtrls","mpoapi.ReturnTypes","mpoweb.App.Types"],(function(){"use strict";rtl.createClass(this,"TFViewFBStudentenwohnheim",pas["WEBLib.Forms"].TForm,(function(){this.$init=function(){pas["WEBLib.Forms"].TForm.$init.call(this),this.pnlMessage=null,this.lbMessage=null,this.WebMessageButton=null,this.Client=null,this.rbAbstellraumJ=null,this.btSpeichern=null,this.edHeimatanschrift=null,this.rbHeimatanschriftN=null,this.rbStellplatzJ=null,this.edNachname=null,this.rbStellplatzN=null,this.rbAbstellraumN=null,this.edAnmerkungen=null,this.cbVergabebedingungen=null,this.edOrt=null,this.rbHeimatanschriftJ=null,this.edBuergschaft=null,this.edStrasse=null,this.cbDatenschutz=null,this.edPLZ=null,this.edVorname=null,this.edWWTermin=null,this.edGeburtsdatum=null,this.FMessage="",this.FFragebogen=null,this.SuccessProc=null},this.$final=function(){this.pnlMessage=void 0,this.lbMessage=void 0,this.WebMessageButton=void 0,this.Client=void 0,this.rbAbstellraumJ=void 0,this.btSpeichern=void 0,this.edHeimatanschrift=void 0,this.rbHeimatanschriftN=void 0,this.rbStellplatzJ=void 0,this.edNachname=void 0,this.rbStellplatzN=void 0,this.rbAbstellraumN=void 0,this.edAnmerkungen=void 0,this.cbVergabebedingungen=void 0,this.edOrt=void 0,this.rbHeimatanschriftJ=void 0,this.edBuergschaft=void 0,this.edStrasse=void 0,this.cbDatenschutz=void 0,this.edPLZ=void 0,this.edVorname=void 0,this.edWWTermin=void 0,this.edGeburtsdatum=void 0,this.FFragebogen=void 0,this.SuccessProc=void 0,pas["WEBLib.Forms"].TForm.$final.call(this)},this.btSpeichernClick=function(t){var e=this;this.FelderViewToObj(),this.FelderObjToView(),this.CheckFields(),""===this.FMessage?(this.HiddenNotification(),window.console.log("Fragebogen:"),window.console.log(this.FFragebogen),this.Client.RawInvoke$2("IMPOBewerberService.FBCasaCampusSet",[this.FFragebogen],(function(t){var i=null;i=rtl.as(pas["WEBLib.JSON"].TJSONObject.ParseJSONValue(t.GetResponseText()),pas["WEBLib.JSON"].TJSONObject),window.console.log(i),e.FMessage=rtl.as(i.GetValue$1("Meldung"),pas["WEBLib.JSON"].TJSONString).GetStrValue(),i.GetJSONValue("AllesOK")===pas["mpoapi.ReturnTypes"].cJBoolTrue?(pas["WEBLib.Dialogs"].ShowMessage("Ihre Eingaben wurden erfolgreich gespeichert."+pas.System.sLineBreak+"Bei Verfügbarkeit werden Sie automatisch per Email über Wohnungsangebote informiert."),null!=e.SuccessProc&&e.SuccessProc()):e.ShowNotification(e.FMessage+" "+pas.SysUtils.TimeToStr(pas.SysUtils.Now()))}),null)):this.ShowNotification(this.FMessage)},this.WebMessageButtonClick=function(t){this.HiddenNotification()},this.WebFormCreate=function(t){""!==this.FMessage?this.ShowNotification(this.FMessage):this.HiddenNotification()},this.WebFormShow=function(t){this.HoleFragebogenDS(),""!==this.FMessage?this.ShowNotification(this.FMessage):this.HiddenNotification()},this.HiddenNotification=function(){this.pnlMessage.GetElementHandle().hidden=!0},this.ShowNotification=function(t){""!==t&&(this.lbMessage.SetCaption(t),this.pnlMessage.GetElementHandle().hidden=!1)},this.HoleFragebogenDS=async function(){var t=null,e=null;this.FFragebogen=pas["mpoapi.ReturnTypes"].TmpoFBCasaCampusWeb.$create("Create"),window.console.log("Abfrage"),200===(t=await this.Client.RawInvokeAsync("IMPOBewerberService.FBCasaCampusGet",[])).GetStatusCode()&&(window.console.log("Text: "+t.GetResponseText()),e=rtl.as(pas["WEBLib.JSON"].TJSONObject.ParseJSONValue(t.GetResponseText()),pas["WEBLib.JSON"].TJSONObject),window.console.log("Daten: "+t.GetResponseText()),window.console.log(e),window.console.log("Nun: Einzelwerte..."),this.FBDeSer(this.FFragebogen,t.GetResponseText()),this.FelderObjToView())},this.FBDeSer=function(t,e){var i=null;i=rtl.as(pas["WEBLib.JSON"].TJSONObject.ParseJSONValue(e),pas["WEBLib.JSON"].TJSONObject),window.console.log(i),t.Vorname=rtl.as(i.GetValue$1("Vorname"),pas["WEBLib.JSON"].TJSONString).GetStrValue(),t.Nachname=rtl.as(i.GetValue$1("Nachname"),pas["WEBLib.JSON"].TJSONString).GetStrValue(),t.Strasse=rtl.as(i.GetValue$1("Strasse"),pas["WEBLib.JSON"].TJSONString).GetStrValue(),t.PLZ=rtl.as(i.GetValue$1("PLZ"),pas["WEBLib.JSON"].TJSONString).GetStrValue(),t.Ort=rtl.as(i.GetValue$1("Ort"),pas["WEBLib.JSON"].TJSONString).GetStrValue(),t.istHeimat=i.GetJSONValue("istHeimat")===pas["mpoapi.ReturnTypes"].cJBoolTrue,t.Heimatanschrift=rtl.as(i.GetValue$1("Heimatanschrift"),pas["WEBLib.JSON"].TJSONString).GetStrValue(),t.Buergschaft=rtl.as(i.GetValue$1("Buergschaft"),pas["WEBLib.JSON"].TJSONString).GetStrValue(),t.Geburtsdatum=rtl.as(i.GetValue$1("Geburtsdatum"),pas["WEBLib.JSON"].TJSONString).GetStrValue(),t.WW_AbstellraumJN=i.GetJSONValue("WW_AbstellraumJN")===pas["mpoapi.ReturnTypes"].cJBoolTrue,t.WW_StellplatzJN=i.GetJSONValue("WW_StellplatzJN")===pas["mpoapi.ReturnTypes"].cJBoolTrue,t.WW_Termin=rtl.as(i.GetValue$1("WW_Termin"),pas["WEBLib.JSON"].TJSONString).GetStrValue(),t.Bemerkungen=rtl.as(i.GetValue$1("Bemerkungen"),pas["WEBLib.JSON"].TJSONString).GetStrValue(),t.istAngabenOK=i.GetJSONValue("istAngabenOK")===pas["mpoapi.ReturnTypes"].cJBoolTrue,t.istDatenschutzOK=i.GetJSONValue("istDatenschutzOK")===pas["mpoapi.ReturnTypes"].cJBoolTrue},this.FelderObjToView=function(){this.edVorname.SetText(this.FFragebogen.Vorname),this.edNachname.SetText(this.FFragebogen.Nachname),this.edStrasse.SetText(this.FFragebogen.Strasse),this.edPLZ.SetText(this.FFragebogen.PLZ),this.edOrt.SetText(this.FFragebogen.Ort),this.rbHeimatanschriftJ.SetChecked(this.FFragebogen.istHeimat),this.rbHeimatanschriftN.SetChecked(!this.FFragebogen.istHeimat),this.edHeimatanschrift.SetText(this.FFragebogen.Heimatanschrift),this.edBuergschaft.SetText(this.FFragebogen.Buergschaft),this.edGeburtsdatum.SetText(this.FFragebogen.Geburtsdatum),this.rbAbstellraumJ.SetChecked(this.FFragebogen.WW_AbstellraumJN),this.rbAbstellraumN.SetChecked(!this.FFragebogen.WW_AbstellraumJN),this.rbStellplatzJ.SetChecked(this.FFragebogen.WW_StellplatzJN),this.rbStellplatzN.SetChecked(!this.FFragebogen.WW_StellplatzJN),this.edWWTermin.SetText(this.FFragebogen.WW_Termin),this.edAnmerkungen.SetText(this.FFragebogen.Bemerkungen),this.cbVergabebedingungen.SetChecked(this.FFragebogen.istAngabenOK),this.cbDatenschutz.SetChecked(this.FFragebogen.istDatenschutzOK)},this.FelderViewToObj=function(){this.FFragebogen.Vorname=this.edVorname.GetText(),this.FFragebogen.Nachname=this.edNachname.GetText(),this.FFragebogen.Strasse=this.edStrasse.GetText(),this.FFragebogen.PLZ=this.edPLZ.GetText(),this.FFragebogen.Ort=this.edOrt.GetText(),this.FFragebogen.istHeimat=this.rbHeimatanschriftJ.GetChecked(),this.FFragebogen.Heimatanschrift=this.edHeimatanschrift.GetText(),this.FFragebogen.Buergschaft=this.edBuergschaft.GetText(),this.FFragebogen.Geburtsdatum=this.edGeburtsdatum.GetText(),this.FFragebogen.WW_AbstellraumJN=this.rbAbstellraumJ.GetChecked(),this.FFragebogen.WW_StellplatzJN=this.rbStellplatzJ.GetChecked(),this.FFragebogen.WW_Termin=this.edWWTermin.GetText(),this.FFragebogen.Bemerkungen=this.edAnmerkungen.GetText(),this.FFragebogen.istAngabenOK=this.cbVergabebedingungen.GetChecked(),this.FFragebogen.istDatenschutzOK=this.cbDatenschutz.GetChecked()},this.CheckFields=function(){this.FMessage="",this.cbDatenschutz.GetChecked()?rtl.asExt(document.getElementById(this.cbDatenschutz.GetID()),HTMLElement).classList.remove("is-invalid"):(this.FMessage=this.FMessage+"Zustimmung zum Datenschutz fehlt"+pas.System.sLineBreak,rtl.asExt(document.getElementById(this.cbDatenschutz.GetID()),HTMLElement).classList.add("is-invalid")),this.cbVergabebedingungen.GetChecked()?rtl.asExt(document.getElementById(this.cbDatenschutz.GetID()),HTMLElement).classList.remove("is-invalid"):(this.FMessage=this.FMessage+"Zustimmung zu den Vergabebedingungen fehlt"+pas.System.sLineBreak,rtl.asExt(document.getElementById(this.cbDatenschutz.GetID()),HTMLElement).classList.add("is-invalid"))},this.LoadDFMValues=function(){pas["WEBLib.Forms"].TCustomForm.LoadDFMValues.call(this),this.pnlMessage=pas["WEBLib.ExtCtrls"].TPanel.$create("Create$2",["view.Studentenwohnheim.message"]),this.lbMessage=pas["WEBLib.StdCtrls"].TLabel.$create("Create$2",["view.Studentenwohnheim.message.label"]),this.WebMessageButton=pas["WEBLib.StdCtrls"].TButton.$create("Create$2",["view.Studentenwohnheim.message.button"]),this.rbAbstellraumJ=pas["WEBLib.StdCtrls"].TRadioButton.$create("Create$2",["view.Studentenwohnheim.rbAbstellraumJ"]),this.btSpeichern=pas["WEBLib.StdCtrls"].TButton.$create("Create$2",["view.Studentenwohnheim.btSave"]),this.edHeimatanschrift=pas["WEBLib.StdCtrls"].TEdit.$create("Create$2",["view.Studentenwohnheim.edHeimatanschrift"]),this.rbHeimatanschriftN=pas["WEBLib.StdCtrls"].TRadioButton.$create("Create$2",["view.Studentenwohnheim.rbHeimatanschriftN"]),this.rbStellplatzJ=pas["WEBLib.StdCtrls"].TRadioButton.$create("Create$2",["view.Studentenwohnheim.rbStellplatzJ"]),this.edNachname=pas["WEBLib.StdCtrls"].TEdit.$create("Create$2",["view.Studentenwohnheim.edNachname"]),this.rbStellplatzN=pas["WEBLib.StdCtrls"].TRadioButton.$create("Create$2",["view.Studentenwohnheim.rbStellplatzN"]),this.rbAbstellraumN=pas["WEBLib.StdCtrls"].TRadioButton.$create("Create$2",["view.Studentenwohnheim.rbAbstellraumN"]),this.edAnmerkungen=pas["WEBLib.StdCtrls"].TMemo.$create("Create$2",["view.Studentenwohnheim.edAnmerkungen"]),this.cbVergabebedingungen=pas["WEBLib.StdCtrls"].TCheckBox.$create("Create$2",["view.Studentenwohnheim.cbVergabebedingungen"]),this.edOrt=pas["WEBLib.StdCtrls"].TEdit.$create("Create$2",["view.Studentenwohnheim.edOrt"]),this.rbHeimatanschriftJ=pas["WEBLib.StdCtrls"].TRadioButton.$create("Create$2",["view.Studentenwohnheim.rbHeimatanschriftJ"]),this.edBuergschaft=pas["WEBLib.StdCtrls"].TEdit.$create("Create$2",["view.Studentenwohnheim.edBuergschaft"]),this.edStrasse=pas["WEBLib.StdCtrls"].TEdit.$create("Create$2",["view.Studentenwohnheim.edStrasse"]),this.cbDatenschutz=pas["WEBLib.StdCtrls"].TCheckBox.$create("Create$2",["view.Studentenwohnheim.cbDatenschutz"]),this.edPLZ=pas["WEBLib.StdCtrls"].TEdit.$create("Create$2",["view.Studentenwohnheim.edPLZ"]),this.edVorname=pas["WEBLib.StdCtrls"].TEdit.$create("Create$2",["view.Studentenwohnheim.edVorname"]),this.edWWTermin=pas["WEBLib.StdCtrls"].TEdit.$create("Create$2",["view.Studentenwohnheim.edWWTermin"]),this.edGeburtsdatum=pas["WEBLib.StdCtrls"].TEdit.$create("Create$2",["view.Studentenwohnheim.edGeburtsdatum"]),this.Client=pas["XData.Web.Client"].TXDataWebClient.$create("Create$1",[this]),this.pnlMessage.BeforeLoadDFMValues(),this.lbMessage.BeforeLoadDFMValues(),this.WebMessageButton.BeforeLoadDFMValues(),this.rbAbstellraumJ.BeforeLoadDFMValues(),this.btSpeichern.BeforeLoadDFMValues(),this.edHeimatanschrift.BeforeLoadDFMValues(),this.rbHeimatanschriftN.BeforeLoadDFMValues(),this.rbStellplatzJ.BeforeLoadDFMValues(),this.edNachname.BeforeLoadDFMValues(),this.rbStellplatzN.BeforeLoadDFMValues(),this.rbAbstellraumN.BeforeLoadDFMValues(),this.edAnmerkungen.BeforeLoadDFMValues(),this.cbVergabebedingungen.BeforeLoadDFMValues(),this.edOrt.BeforeLoadDFMValues(),this.rbHeimatanschriftJ.BeforeLoadDFMValues(),this.edBuergschaft.BeforeLoadDFMValues(),this.edStrasse.BeforeLoadDFMValues(),this.cbDatenschutz.BeforeLoadDFMValues(),this.edPLZ.BeforeLoadDFMValues(),this.edVorname.BeforeLoadDFMValues(),this.edWWTermin.BeforeLoadDFMValues(),this.edGeburtsdatum.BeforeLoadDFMValues(),this.Client.BeforeLoadDFMValues();try{this.SetName("FViewFBStudentenwohnheim"),this.SetWidth(640),this.SetHeight(545),this.SetElementClassName("view.Studentenwohnheim.rbgStockwerk"),this.SetElementFont(1),this.SetEvent(this,"OnCreate","WebFormCreate"),this.SetEvent(this,"OnShow","WebFormShow"),this.pnlMessage.SetParentComponent(this),this.pnlMessage.SetName("pnlMessage"),this.pnlMessage.SetLeft(0),this.pnlMessage.SetTop(0),this.pnlMessage.SetWidth(121),this.pnlMessage.SetHeight(33),this.pnlMessage.SetHeightStyle(2),this.pnlMessage.SetWidthStyle(2),this.pnlMessage.SetChildOrderEx(8),this.pnlMessage.SetElementFont(1),this.pnlMessage.SetElementPosition(2),this.lbMessage.SetParentComponent(this.pnlMessage),this.lbMessage.SetName("lbMessage"),this.lbMessage.SetLeft(16),this.lbMessage.SetTop(11),this.lbMessage.SetWidth(42),this.lbMessage.SetHeight(13),this.lbMessage.SetCaption("Message"),this.lbMessage.SetHeightPercent(100),this.lbMessage.SetWidthPercent(100),this.WebMessageButton.SetParentComponent(this.pnlMessage),this.WebMessageButton.SetName("WebMessageButton"),this.WebMessageButton.SetLeft(96),this.WebMessageButton.SetTop(3),this.WebMessageButton.SetWidth(22),this.WebMessageButton.SetHeight(25),this.WebMessageButton.SetCaption("x"),this.WebMessageButton.SetChildOrderEx(1),this.WebMessageButton.SetElementFont(1),this.WebMessageButton.SetElementPosition(2),this.WebMessageButton.SetHeightStyle(2),this.WebMessageButton.SetHeightPercent(100),this.WebMessageButton.SetWidthStyle(2),this.WebMessageButton.SetWidthPercent(100),this.SetEvent$1(this.WebMessageButton,this,"OnClick","WebMessageButtonClick"),this.rbAbstellraumJ.SetParentComponent(this),this.rbAbstellraumJ.SetName("rbAbstellraumJ"),this.rbAbstellraumJ.SetLeft(202),this.rbAbstellraumJ.SetTop(0),this.rbAbstellraumJ.SetWidth(96),this.rbAbstellraumJ.SetHeight(25),this.rbAbstellraumJ.SetCaption("rbAbstellraumJ"),this.rbAbstellraumJ.SetChecked(!1),this.rbAbstellraumJ.SetChildOrderEx(1),this.rbAbstellraumJ.SetColor(-1),this.rbAbstellraumJ.SetElementFont(1),this.rbAbstellraumJ.SetElementPosition(2),this.rbAbstellraumJ.SetGroupName("rbgAbstellraum"),this.rbAbstellraumJ.SetHeightStyle(2),this.rbAbstellraumJ.SetHeightPercent(100),this.rbAbstellraumJ.SetWidthStyle(2),this.rbAbstellraumJ.SetWidthPercent(100),this.btSpeichern.SetParentComponent(this),this.btSpeichern.SetName("btSpeichern"),this.btSpeichern.SetLeft(303),this.btSpeichern.SetTop(0),this.btSpeichern.SetWidth(96),this.btSpeichern.SetHeight(25),this.btSpeichern.SetCaption("Speichern"),this.btSpeichern.SetChildOrderEx(2),this.btSpeichern.SetElementFont(1),this.btSpeichern.SetElementPosition(2),this.btSpeichern.SetHeightStyle(2),this.btSpeichern.SetHeightPercent(100),this.btSpeichern.SetWidthStyle(2),this.btSpeichern.SetWidthPercent(100),this.SetEvent$1(this.btSpeichern,this,"OnClick","btSpeichernClick"),this.edHeimatanschrift.SetParentComponent(this),this.edHeimatanschrift.SetName("edHeimatanschrift"),this.edHeimatanschrift.SetLeft(303),this.edHeimatanschrift.SetTop(225),this.edHeimatanschrift.SetWidth(96),this.edHeimatanschrift.SetHeight(25),this.edHeimatanschrift.SetChildOrderEx(3),this.edHeimatanschrift.SetElementFont(1),this.edHeimatanschrift.SetElementPosition(2),this.edHeimatanschrift.SetHeightStyle(2),this.edHeimatanschrift.SetHeightPercent(100),this.edHeimatanschrift.SetWidthStyle(2),this.edHeimatanschrift.SetWidthPercent(100),this.rbHeimatanschriftN.SetParentComponent(this),this.rbHeimatanschriftN.SetName("rbHeimatanschriftN"),this.rbHeimatanschriftN.SetLeft(154),this.rbHeimatanschriftN.SetTop(223),this.rbHeimatanschriftN.SetWidth(96),this.rbHeimatanschriftN.SetHeight(25),this.rbHeimatanschriftN.SetCaption("rbHeimatanschriftN"),this.rbHeimatanschriftN.SetChecked(!1),this.rbHeimatanschriftN.SetChildOrderEx(4),this.rbHeimatanschriftN.SetColor(-1),this.rbHeimatanschriftN.SetElementFont(1),this.rbHeimatanschriftN.SetElementPosition(2),this.rbHeimatanschriftN.SetGroupName("rbgHeimatanschrift"),this.rbHeimatanschriftN.SetHeightStyle(2),this.rbHeimatanschriftN.SetHeightPercent(100),this.rbHeimatanschriftN.SetWidthStyle(2),this.rbHeimatanschriftN.SetWidthPercent(100),this.rbStellplatzJ.SetParentComponent(this),this.rbStellplatzJ.SetName("rbStellplatzJ"),this.rbStellplatzJ.SetLeft(404),this.rbStellplatzJ.SetTop(30),this.rbStellplatzJ.SetWidth(96),this.rbStellplatzJ.SetHeight(25),this.rbStellplatzJ.SetCaption("rbStellplatzJ"),this.rbStellplatzJ.SetChecked(!1),this.rbStellplatzJ.SetChildOrderEx(7),this.rbStellplatzJ.SetColor(-1),this.rbStellplatzJ.SetElementFont(1),this.rbStellplatzJ.SetElementPosition(2),this.rbStellplatzJ.SetGroupName("rbgStellplatz"),this.rbStellplatzJ.SetHeightStyle(2),this.rbStellplatzJ.SetHeightPercent(100),this.rbStellplatzJ.SetWidthStyle(2),this.rbStellplatzJ.SetWidthPercent(100),this.edNachname.SetParentComponent(this),this.edNachname.SetName("edNachname"),this.edNachname.SetLeft(176),this.edNachname.SetTop(314),this.edNachname.SetWidth(96),this.edNachname.SetHeight(25),this.edNachname.SetChildOrderEx(9),this.edNachname.SetElementFont(1),this.edNachname.SetElementPosition(2),this.edNachname.SetHeightStyle(2),this.edNachname.SetHeightPercent(100),this.edNachname.SetWidthStyle(2),this.edNachname.SetWidthPercent(100),this.rbStellplatzN.SetParentComponent(this),this.rbStellplatzN.SetName("rbStellplatzN"),this.rbStellplatzN.SetLeft(201),this.rbStellplatzN.SetTop(59),this.rbStellplatzN.SetWidth(96),this.rbStellplatzN.SetHeight(25),this.rbStellplatzN.SetCaption("rbStellplatzN"),this.rbStellplatzN.SetChecked(!0),this.rbStellplatzN.SetChildOrderEx(11),this.rbStellplatzN.SetColor(-1),this.rbStellplatzN.SetElementFont(1),this.rbStellplatzN.SetElementPosition(2),this.rbStellplatzN.SetGroupName("rbgStellplatz"),this.rbStellplatzN.SetHeightStyle(2),this.rbStellplatzN.SetHeightPercent(100),this.rbStellplatzN.SetWidthStyle(2),this.rbStellplatzN.SetWidthPercent(100),this.rbAbstellraumN.SetParentComponent(this),this.rbAbstellraumN.SetName("rbAbstellraumN"),this.rbAbstellraumN.SetLeft(404),this.rbAbstellraumN.SetTop(60),this.rbAbstellraumN.SetWidth(96),this.rbAbstellraumN.SetHeight(25),this.rbAbstellraumN.SetCaption("rbAbstellraumN"),this.rbAbstellraumN.SetChecked(!1),this.rbAbstellraumN.SetChildOrderEx(13),this.rbAbstellraumN.SetColor(-1),this.rbAbstellraumN.SetElementFont(1),this.rbAbstellraumN.SetElementPosition(2),this.rbAbstellraumN.SetGroupName("rbgAbstellraum"),this.rbAbstellraumN.SetHeightStyle(2),this.rbAbstellraumN.SetHeightPercent(100),this.rbAbstellraumN.SetWidthStyle(2),this.rbAbstellraumN.SetWidthPercent(100),this.edAnmerkungen.SetParentComponent(this),this.edAnmerkungen.SetName("edAnmerkungen"),this.edAnmerkungen.SetLeft(321),this.edAnmerkungen.SetTop(180),this.edAnmerkungen.SetWidth(160),this.edAnmerkungen.SetHeight(37),this.edAnmerkungen.SetElementFont(1),this.edAnmerkungen.SetElementPosition(2),this.edAnmerkungen.SetHeightStyle(2),this.edAnmerkungen.SetHeightPercent(100),this.edAnmerkungen.SetSelLength(0),this.edAnmerkungen.SetSelStart(0),this.edAnmerkungen.SetWidthStyle(2),this.edAnmerkungen.SetWidthPercent(100),this.cbVergabebedingungen.SetParentComponent(this),this.cbVergabebedingungen.SetName("cbVergabebedingungen"),this.cbVergabebedingungen.SetLeft(0),this.cbVergabebedingungen.SetTop(90),this.cbVergabebedingungen.SetWidth(96),this.cbVergabebedingungen.SetHeight(25),this.cbVergabebedingungen.SetCaption("cbVergabebedingungen"),this.cbVergabebedingungen.SetChildOrderEx(15),this.cbVergabebedingungen.SetElementFont(1),this.cbVergabebedingungen.SetElementPosition(2),this.cbVergabebedingungen.SetHeightStyle(2),this.cbVergabebedingungen.SetHeightPercent(100),this.cbVergabebedingungen.SetWidthStyle(2),this.cbVergabebedingungen.SetWidthPercent(100),this.edOrt.SetParentComponent(this),this.edOrt.SetName("edOrt"),this.edOrt.SetLeft(22),this.edOrt.SetTop(194),this.edOrt.SetWidth(96),this.edOrt.SetHeight(25),this.edOrt.SetChildOrderEx(16),this.edOrt.SetElementFont(1),this.edOrt.SetElementPosition(2),this.edOrt.SetHeightStyle(2),this.edOrt.SetHeightPercent(100),this.edOrt.SetWidthStyle(2),this.edOrt.SetWidthPercent(100),this.rbHeimatanschriftJ.SetParentComponent(this),this.rbHeimatanschriftJ.SetName("rbHeimatanschriftJ"),this.rbHeimatanschriftJ.SetLeft(154),this.rbHeimatanschriftJ.SetTop(192),this.rbHeimatanschriftJ.SetWidth(96),this.rbHeimatanschriftJ.SetHeight(25),this.rbHeimatanschriftJ.SetCaption("rbHeimatanschriftJ"),this.rbHeimatanschriftJ.SetChecked(!0),this.rbHeimatanschriftJ.SetChildOrderEx(17),this.rbHeimatanschriftJ.SetColor(-1),this.rbHeimatanschriftJ.SetElementFont(1),this.rbHeimatanschriftJ.SetElementPosition(2),this.rbHeimatanschriftJ.SetGroupName("rbgHeimatanschrift"),this.rbHeimatanschriftJ.SetHeightStyle(2),this.rbHeimatanschriftJ.SetHeightPercent(100),this.rbHeimatanschriftJ.SetWidthStyle(2),this.rbHeimatanschriftJ.SetWidthPercent(100),this.edBuergschaft.SetParentComponent(this),this.edBuergschaft.SetName("edBuergschaft"),this.edBuergschaft.SetLeft(25),this.edBuergschaft.SetTop(314),this.edBuergschaft.SetWidth(96),this.edBuergschaft.SetHeight(25),this.edBuergschaft.SetChildOrderEx(19),this.edBuergschaft.SetElementFont(1),this.edBuergschaft.SetElementPosition(2),this.edBuergschaft.SetHeightStyle(2),this.edBuergschaft.SetHeightPercent(100),this.edBuergschaft.SetWidthStyle(2),this.edBuergschaft.SetWidthPercent(100),this.edStrasse.SetParentComponent(this),this.edStrasse.SetName("edStrasse"),this.edStrasse.SetLeft(41),this.edStrasse.SetTop(378),this.edStrasse.SetWidth(96),this.edStrasse.SetHeight(25),this.edStrasse.SetChildOrderEx(20),this.edStrasse.SetElementFont(1),this.edStrasse.SetElementPosition(2),this.edStrasse.SetHeightStyle(2),this.edStrasse.SetHeightPercent(100),this.edStrasse.SetWidthStyle(2),this.edStrasse.SetWidthPercent(100),this.cbDatenschutz.SetParentComponent(this),this.cbDatenschutz.SetName("cbDatenschutz"),this.cbDatenschutz.SetLeft(0),this.cbDatenschutz.SetTop(120),this.cbDatenschutz.SetWidth(96),this.cbDatenschutz.SetHeight(25),this.cbDatenschutz.SetCaption("cbDatenschutz"),this.cbDatenschutz.SetChildOrderEx(21),this.cbDatenschutz.SetElementFont(1),this.cbDatenschutz.SetElementPosition(2),this.cbDatenschutz.SetHeightStyle(2),this.cbDatenschutz.SetHeightPercent(100),this.cbDatenschutz.SetWidthStyle(2),this.cbDatenschutz.SetWidthPercent(100),this.edPLZ.SetParentComponent(this),this.edPLZ.SetName("edPLZ"),this.edPLZ.SetLeft(303),this.edPLZ.SetTop(122),this.edPLZ.SetWidth(96),this.edPLZ.SetHeight(25),this.edPLZ.SetChildOrderEx(17),this.edPLZ.SetElementFont(1),this.edPLZ.SetElementPosition(2),this.edPLZ.SetHeightStyle(2),this.edPLZ.SetHeightPercent(100),this.edPLZ.SetWidthStyle(2),this.edPLZ.SetWidthPercent(100),this.edVorname.SetParentComponent(this),this.edVorname.SetName("edVorname"),this.edVorname.SetLeft(404),this.edVorname.SetTop(0),this.edVorname.SetWidth(96),this.edVorname.SetHeight(25),this.edVorname.SetChildOrderEx(17),this.edVorname.SetElementFont(1),this.edVorname.SetElementPosition(2),this.edVorname.SetHeightStyle(2),this.edVorname.SetHeightPercent(100),this.edVorname.SetWidthStyle(2),this.edVorname.SetWidthPercent(100),this.edWWTermin.SetParentComponent(this),this.edWWTermin.SetName("edWWTermin"),this.edWWTermin.SetLeft(321),this.edWWTermin.SetTop(280),this.edWWTermin.SetWidth(96),this.edWWTermin.SetHeight(25),this.edWWTermin.SetChildOrderEx(18),this.edWWTermin.SetElementFont(1),this.edWWTermin.SetElementPosition(2),this.edWWTermin.SetHeightStyle(2),this.edWWTermin.SetHeightPercent(100),this.edWWTermin.SetWidthStyle(2),this.edWWTermin.SetWidthPercent(100),this.edGeburtsdatum.SetParentComponent(this),this.edGeburtsdatum.SetName("edGeburtsdatum"),this.edGeburtsdatum.SetLeft(176),this.edGeburtsdatum.SetTop(378),this.edGeburtsdatum.SetWidth(96),this.edGeburtsdatum.SetHeight(25),this.edGeburtsdatum.SetChildOrderEx(19),this.edGeburtsdatum.SetElementFont(1),this.edGeburtsdatum.SetElementPosition(2),this.edGeburtsdatum.SetHeightStyle(2),this.edGeburtsdatum.SetHeightPercent(100),this.edGeburtsdatum.SetWidthStyle(2),this.edGeburtsdatum.SetWidthPercent(100),this.Client.SetParentComponent(this),this.Client.SetName("Client"),this.Client.SetConnection(pas["mpoweb.ConnectionModule"].DMConnection.ApiConnection)}finally{this.pnlMessage.AfterLoadDFMValues(),this.lbMessage.AfterLoadDFMValues(),this.WebMessageButton.AfterLoadDFMValues(),this.rbAbstellraumJ.AfterLoadDFMValues(),this.btSpeichern.AfterLoadDFMValues(),this.edHeimatanschrift.AfterLoadDFMValues(),this.rbHeimatanschriftN.AfterLoadDFMValues(),this.rbStellplatzJ.AfterLoadDFMValues(),this.edNachname.AfterLoadDFMValues(),this.rbStellplatzN.AfterLoadDFMValues(),this.rbAbstellraumN.AfterLoadDFMValues(),this.edAnmerkungen.AfterLoadDFMValues(),this.cbVergabebedingungen.AfterLoadDFMValues(),this.edOrt.AfterLoadDFMValues(),this.rbHeimatanschriftJ.AfterLoadDFMValues(),this.edBuergschaft.AfterLoadDFMValues(),this.edStrasse.AfterLoadDFMValues(),this.cbDatenschutz.AfterLoadDFMValues(),this.edPLZ.AfterLoadDFMValues(),this.edVorname.AfterLoadDFMValues(),this.edWWTermin.AfterLoadDFMValues(),this.edGeburtsdatum.AfterLoadDFMValues(),this.Client.AfterLoadDFMValues()}},rtl.addIntf(this,pas["WEBLib.Controls"].IControl),rtl.addIntf(this,pas.System.IUnknown);var t=this.$rtti;t.addField("pnlMessage",pas["WEBLib.ExtCtrls"].$rtti.TPanel,4),t.addField("lbMessage",pas["WEBLib.StdCtrls"].$rtti.TLabel,4),t.addField("WebMessageButton",pas["WEBLib.StdCtrls"].$rtti.TButton,4),t.addField("Client",pas["XData.Web.Client"].$rtti.TXDataWebClient,4),t.addField("rbAbstellraumJ",pas["WEBLib.StdCtrls"].$rtti.TRadioButton,4),t.addField("btSpeichern",pas["WEBLib.StdCtrls"].$rtti.TButton,4),t.addField("edHeimatanschrift",pas["WEBLib.StdCtrls"].$rtti.TEdit,4),t.addField("rbHeimatanschriftN",pas["WEBLib.StdCtrls"].$rtti.TRadioButton,4),t.addField("rbStellplatzJ",pas["WEBLib.StdCtrls"].$rtti.TRadioButton,4),t.addField("edNachname",pas["WEBLib.StdCtrls"].$rtti.TEdit,4),t.addField("rbStellplatzN",pas["WEBLib.StdCtrls"].$rtti.TRadioButton,4),t.addField("rbAbstellraumN",pas["WEBLib.StdCtrls"].$rtti.TRadioButton,4),t.addField("edAnmerkungen",pas["WEBLib.StdCtrls"].$rtti.TMemo,4),t.addField("cbVergabebedingungen",pas["WEBLib.StdCtrls"].$rtti.TCheckBox,4),t.addField("edOrt",pas["WEBLib.StdCtrls"].$rtti.TEdit,4),t.addField("rbHeimatanschriftJ",pas["WEBLib.StdCtrls"].$rtti.TRadioButton,4),t.addField("edBuergschaft",pas["WEBLib.StdCtrls"].$rtti.TEdit,4),t.addField("edStrasse",pas["WEBLib.StdCtrls"].$rtti.TEdit,4),t.addField("cbDatenschutz",pas["WEBLib.StdCtrls"].$rtti.TCheckBox,4),t.addField("edPLZ",pas["WEBLib.StdCtrls"].$rtti.TEdit,4),t.addField("edVorname",pas["WEBLib.StdCtrls"].$rtti.TEdit,4),t.addField("edWWTermin",pas["WEBLib.StdCtrls"].$rtti.TEdit,4),t.addField("edGeburtsdatum",pas["WEBLib.StdCtrls"].$rtti.TEdit,4),t.addMethod("btSpeichernClick",0,[["Sender",pas.System.$rtti.TObject]],4),t.addMethod("WebMessageButtonClick",0,[["Sender",pas.System.$rtti.TObject]],4),t.addMethod("WebFormCreate",0,[["Sender",pas.System.$rtti.TObject]],4),t.addMethod("WebFormShow",0,[["Sender",pas.System.$rtti.TObject]],4)}))}),["mpoweb.ConnectionModule","mpoweb.Auth.Service"]),rtl.module("DBConst",["System"],(function(){"use strict";this.$resourcestrings={SActiveDataset:{org:"Operation cannot be performed on an active dataset"},SDuplicateFieldName:{org:'Duplicate fieldname : "%s"'},SFieldNotFound:{org:'Field not found : "%s"'},SInvalidTypeConversion:{org:"Invalid type conversion to %s in field %s"},SNoDataset:{org:'No dataset asssigned for field : "%s"'},SUniDirectional:{org:"Operation cannot be performed on an unidirectional dataset"},SFieldValueError:{org:"Invalid value for field '%s'"},SDuplicateName:{org:"Duplicate name '%s' in %s"},SNestedDataSetClass:{org:"Nested dataset must inherit from %s"},SCircularDataLink:{org:"Circular datalinks are not allowed"}}})),rtl.module("DB",["System","Classes","SysUtils","JS","Types","DateUtils"],(function(){"use strict";var t=this,e=t.$impl;this.TDataSetState={0:"dsInactive",dsInactive:0,1:"dsBrowse",dsBrowse:1,2:"dsEdit",dsEdit:2,3:"dsInsert",dsInsert:3,4:"dsSetKey",dsSetKey:4,5:"dsCalcFields",dsCalcFields:5,6:"dsFilter",dsFilter:6,7:"dsNewValue",dsNewValue:7,8:"dsOldValue",dsOldValue:8,9:"dsCurValue",dsCurValue:9,10:"dsBlockRead",dsBlockRead:10,11:"dsInternalCalc",dsInternalCalc:11,12:"dsOpening",dsOpening:12,13:"dsRefreshFields",dsRefreshFields:13},this.TDataEvent={0:"deFieldChange",deFieldChange:0,1:"deRecordChange",deRecordChange:1,2:"deDataSetChange",deDataSetChange:2,3:"deDataSetScroll",deDataSetScroll:3,4:"deLayoutChange",deLayoutChange:4,5:"deUpdateRecord",deUpdateRecord:5,6:"deUpdateState",deUpdateState:6,7:"deCheckBrowseMode",deCheckBrowseMode:7,8:"dePropertyChange",dePropertyChange:8,9:"deFieldListChange",deFieldListChange:9,10:"deFocusControl",deFocusControl:10,11:"deParentScroll",deParentScroll:11,12:"deConnectChange",deConnectChange:12,13:"deReconcileError",deReconcileError:13,14:"deDisabledStateChange",deDisabledStateChange:14},this.TProviderFlag={0:"pfInUpdate",pfInUpdate:0,1:"pfInWhere",pfInWhere:1,2:"pfInKey",pfInKey:2,3:"pfHidden",pfHidden:3,4:"pfRefreshOnInsert",pfRefreshOnInsert:4,5:"pfRefreshOnUpdate",pfRefreshOnUpdate:5},this.$rtti.$Enum("TProviderFlag",{minvalue:0,maxvalue:5,ordtype:1,enumtype:this.TProviderFlag}),this.$rtti.$Set("TProviderFlags",{comptype:this.$rtti.TProviderFlag}),this.$rtti.$Class("TField"),this.$rtti.$Class("TDataSet"),this.$rtti.$Class("TDataSource"),rtl.createClass(this,"EDatabaseError",pas.SysUtils.Exception,(function(){})),this.TFieldType={0:"ftUnknown",ftUnknown:0,1:"ftString",ftString:1,2:"ftSmallint",ftSmallint:2,3:"ftInteger",ftInteger:3,4:"ftWord",ftWord:4,5:"ftBoolean",ftBoolean:5,6:"ftFloat",ftFloat:6,7:"ftCurrency",ftCurrency:7,8:"ftBCD",ftBCD:8,9:"ftDate",ftDate:9,10:"ftTime",ftTime:10,11:"ftDateTime",ftDateTime:11,12:"ftBytes",ftBytes:12,13:"ftVarBytes",ftVarBytes:13,14:"ftAutoInc",ftAutoInc:14,15:"ftBlob",ftBlob:15,16:"ftMemo",ftMemo:16,17:"ftGraphic",ftGraphic:17,18:"ftFmtMemo",ftFmtMemo:18,19:"ftParadoxOle",ftParadoxOle:19,20:"ftDBaseOle",ftDBaseOle:20,21:"ftTypedBinary",ftTypedBinary:21,22:"ftCursor",ftCursor:22,23:"ftFixedChar",ftFixedChar:23,24:"ftWideString",ftWideString:24,25:"ftLargeint",ftLargeint:25,26:"ftADT",ftADT:26,27:"ftArray",ftArray:27,28:"ftReference",ftReference:28,29:"ftDataSet",ftDataSet:29,30:"ftOraBlob",ftOraBlob:30,31:"ftOraClob",ftOraClob:31,32:"ftVariant",ftVariant:32,33:"ftInterface",ftInterface:33,34:"ftIDispatch",ftIDispatch:34,35:"ftGuid",ftGuid:35,36:"ftTimeStamp",ftTimeStamp:36,37:"ftFMTBcd",ftFMTBcd:37,38:"ftFixedWideChar",ftFixedWideChar:38,39:"ftWideMemo",ftWideMemo:39,40:"ftOraTimeStamp",ftOraTimeStamp:40,41:"ftOraInterval",ftOraInterval:41,42:"ftLongWord",ftLongWord:42,43:"ftShortint",ftShortint:43,44:"ftByte",ftByte:44,45:"ftExtended",ftExtended:45,46:"ftConnection",ftConnection:46,47:"ftParams",ftParams:47,48:"ftStream",ftStream:48,49:"ftTimeStampOffset",ftTimeStampOffset:49,50:"ftObject",ftObject:50,51:"ftSingle",ftSingle:51},this.$rtti.$Enum("TFieldType",{minvalue:0,maxvalue:51,ordtype:1,enumtype:this.TFieldType}),this.TFieldAttribute={0:"faHiddenCol",faHiddenCol:0,1:"faReadonly",faReadonly:1,2:"faRequired",faRequired:2,3:"faLink",faLink:3,4:"faUnNamed",faUnNamed:4,5:"faFixed",faFixed:5},this.$rtti.$Enum("TFieldAttribute",{minvalue:0,maxvalue:5,ordtype:1,enumtype:this.TFieldAttribute}),this.$rtti.$Set("TFieldAttributes",{comptype:this.$rtti.TFieldAttribute}),rtl.createClass(this,"TNamedItem",pas.Classes.TCollectionItem,(function(){this.$init=function(){pas.Classes.TCollectionItem.$init.call(this),this.FName=""},this.SetDisplayName=function(e){var i=0;this.FName!==e&&(""!==e&&t.TFieldDefs.isPrototypeOf(this.FCollection)&&(i=this.FCollection.IndexOf(e))>=0&&i!==this.GetIndex()&&t.DatabaseErrorFmt(rtl.getResStr(pas.DBConst,"SDuplicateName"),pas.System.VarRecs(18,e,18,this.FCollection.$classname)),this.FName=e,pas.Classes.TCollectionItem.SetDisplayName.call(this,e))},this.$rtti.addProperty("Name",2,rtl.string,"FName","SetDisplayName")})),rtl.createClass(this,"TDefCollection",pas.Classes.TOwnedCollection,(function(){this.$init=function(){pas.Classes.TOwnedCollection.$init.call(this),this.FDataset=null},this.$final=function(){this.FDataset=void 0,pas.Classes.TOwnedCollection.$final.call(this)},this.SetItemName=function(e){var i=null,s="";""===(i=rtl.as(e,t.TNamedItem)).FName?(s=pas.System.Copy(this.$classname,2,5)+pas.SysUtils.IntToStr(i.FID+1),null!=this.FDataset&&(s=this.FDataset.FName+s),i.SetDisplayName(s)):pas.Classes.TCollection.SetItemName.call(this,e)},this.create$3=function(t,e,i){return pas.Classes.TOwnedCollection.Create$2.call(this,e,i),this.FDataset=t,this},this.IndexOf=function(t){var e=0,i=0;e=-1;for(var s=0,n=this.GetCount()-1;s<=n;s++)if(i=s,pas.SysUtils.AnsiSameText(this.GetItem(i).FName,t)){e=i;break}return e}})),rtl.createClass(this,"TFieldDef",this.TNamedItem,(function(){this.$init=function(){t.TNamedItem.$init.call(this),this.FAttributes={},this.FDataType=0,this.FFieldNo=0,this.FPrecision=0,this.FRequired=!1,this.FSize=0},this.$final=function(){this.FAttributes=void 0,t.TNamedItem.$final.call(this)},this.SetAttributes=function(t){this.FAttributes=rtl.refSet(t),this.Changed(!1)},this.SetDataType=function(t){this.FDataType=t,this.Changed(!1)},this.SetPrecision=function(t){this.FPrecision=t,this.Changed(!1)},this.SetSize=function(t){this.FSize=t,this.Changed(!1)},this.Create$1=function(t){return pas.Classes.TCollectionItem.Create$1.call(this,t),this.FFieldNo=this.GetIndex()+1,this},this.Destroy=function(){pas.Classes.TCollectionItem.Destroy.call(this)},this.Assign=function(e){var i=null;if(i=null,t.TFieldDef.isPrototypeOf(e)&&(i=rtl.as(e,t.TFieldDef)),null!=i){this.FCollection.BeginUpdate();try{this.SetDisplayName(i.FName),this.SetDataType(i.FDataType),this.SetSize(i.FSize),this.SetPrecision(i.FPrecision),this.FRequired=i.FRequired}finally{this.FCollection.EndUpdate()}}else pas.Classes.TPersistent.Assign.call(this,e)};var e=this.$rtti;e.addProperty("Attributes",2,t.$rtti.TFieldAttributes,"FAttributes","SetAttributes",4,{Default:{}}),e.addProperty("DataType",2,t.$rtti.TFieldType,"FDataType","SetDataType"),e.addProperty("Precision",2,rtl.longint,"FPrecision","SetPrecision",4,{Default:0}),e.addProperty("Size",2,rtl.longint,"FSize","SetSize",4,{Default:0})})),rtl.createClass(this,"TFieldDefs",this.TDefCollection,(function(){this.FieldDefClass=function(){return t.TFieldDef},this.Create$4=function(e){return t.TDefCollection.create$3.call(this,e,this.Owner(),this.$class.FieldDefClass()),this}})),this.TFieldKind={0:"fkData",fkData:0,1:"fkCalculated",fkCalculated:1,2:"fkLookup",fkLookup:2,3:"fkInternalCalc",fkInternalCalc:3},this.$rtti.$Enum("TFieldKind",{minvalue:0,maxvalue:3,ordtype:1,enumtype:this.TFieldKind}),this.$rtti.$MethodVar("TFieldNotifyEvent",{procsig:rtl.newTIProcSig([["Sender",this.$rtti.TField]]),methodkind:0}),this.$rtti.$MethodVar("TFieldGetTextEvent",{procsig:rtl.newTIProcSig([["Sender",this.$rtti.TField],["aText",rtl.string,1],["DisplayText",rtl.boolean]]),methodkind:0}),this.$rtti.$MethodVar("TFieldSetTextEvent",{procsig:rtl.newTIProcSig([["Sender",this.$rtti.TField],["aText",rtl.string,2]]),methodkind:0}),rtl.createClass(this,"TLookupList",pas.System.TObject,(function(){this.$init=function(){pas.System.TObject.$init.call(this),this.FList=null},this.$final=function(){this.FList=void 0,pas.System.TObject.$final.call(this)},this.Destroy=function(){this.Clear(),this.FList.$destroy("Destroy"),pas.System.TObject.Destroy.call(this)},this.Clear=function(){this.FList.Clear()}})),rtl.createClass(this,"TField",pas.Classes.TComponent,(function(){this.$init=function(){pas.Classes.TComponent.$init.call(this),this.FAlignment=0,this.FConstraintErrorMessage="",this.FCustomConstraint="",this.FDataSet=null,this.FDataType=0,this.FDefaultExpression="",this.FDisplayLabel="",this.FDisplayWidth=0,this.FFieldDef=null,this.FFieldKind=0,this.FFieldName="",this.FFields=null,this.FHasConstraints=!1,this.FImportedConstraint="",this.FKeyFields="",this.FLookupCache=!1,this.FLookupDataSet=null,this.FLookupKeyfields="",this.FLookupresultField="",this.FLookupList=null,this.FOnChange=null,this.FOnGetText=null,this.FOnSetText=null,this.FOnValidate=null,this.FOrigin="",this.FReadOnly=!1,this.FRequired=!1,this.FValidChars=[],this.FValueBuffer=void 0,this.FValidating=!1,this.FVisible=!1,this.FProviderFlags={}},this.$final=function(){this.FDataSet=void 0,this.FFieldDef=void 0,this.FFields=void 0,this.FLookupDataSet=void 0,this.FLookupList=void 0,this.FOnChange=void 0,this.FOnGetText=void 0,this.FOnSetText=void 0,this.FOnValidate=void 0,this.FValidChars=void 0,this.FProviderFlags=void 0,pas.Classes.TComponent.$final.call(this)},this.GetIndex=function(){return null!=this.FDataSet?this.FDataSet.FFieldList.IndexOf(this):-1},this.SetAlignment=function(t){this.FAlignment!==t&&(this.FAlignment=t,this.PropertyChanged(!1))},this.SetIndex=function(t){null!==this.FFields&&this.FFields.SetFieldIndex(this,t)},this.SetDisplayLabel=function(t){this.FDisplayLabel!==t&&(this.FDisplayLabel=t,this.PropertyChanged(!0))},this.SetDisplayWidth=function(t){this.FDisplayWidth!==t&&(this.FDisplayWidth=t,this.PropertyChanged(!0))},this.GetDisplayWidth=function(){return 0===this.FDisplayWidth?this.GetDefaultWidth():this.FDisplayWidth},this.SetReadOnly=function(t){this.FReadOnly!==t&&(this.FReadOnly=t,this.PropertyChanged(!0))},this.SetVisible=function(t){this.FVisible!==t&&(this.FVisible=t,this.PropertyChanged(!0))},this.IsDisplayLabelStored=function(){return this.GetDisplayName()!==this.FFieldName},this.IsDisplayWidthStored=function(){return 0!==this.FDisplayWidth},this.CalcLookupValue=function(){null!=this.FLookupDataSet&&this.FLookupDataSet.GetActive()?this.SetAsJSValue(this.FLookupDataSet.Lookup(this.FLookupKeyfields,this.FDataSet.GetFieldValues(this.FKeyFields),this.FLookupresultField)):this.SetAsJSValue(null)},this.RaiseAccessError=function(t){throw this.AccessError(t)},this.AccessError=function(e){return t.EDatabaseError.$create("CreateFmt",[rtl.getResStr(pas.DBConst,"SInvalidTypeConversion"),pas.System.VarRecs(18,e,18,this.FFieldName)])},this.Change=function(){null!=this.FOnChange&&this.FOnChange(this)},this.GetAsJSValue=function(){return this.GetData()},this.GetDefaultWidth=function(){return 10,10},this.GetDisplayName=function(){return""!==this.FDisplayLabel?this.FDisplayLabel:this.FFieldName},this.Notification=function(t,e){pas.Classes.TComponent.Notification.call(this,t,e),1===e&&t===this.FLookupDataSet&&(this.FLookupDataSet=null)},this.PropertyChanged=function(t){null!==this.FDataSet&&this.FDataSet.GetActive()&&(t?this.FDataSet.DataEvent(4,0):this.FDataSet.DataEvent(2,0))},this.SetAsJSValue=function(e){if(pas.JS.isNull(e))this.Clear();else try{this.SetVarValue(e)}catch(e){if(!pas.SysUtils.EVariantError.isPrototypeOf(e))throw e;t.DatabaseErrorFmt(rtl.getResStr(pas.DBConst,"SFieldValueError"),pas.System.VarRecs(18,this.GetDisplayName()))}},this.SetDataset=function(t){t!==this.FDataSet&&(null!=this.FDataSet&&(this.FDataSet.CheckInactive(),this.FDataSet.FFieldList.Remove(this)),null!=t&&(t.CheckInactive(),t.FFieldList.Add(this)),this.FDataSet=t)},this.SetDataType=function(t){this.FDataType=t},this.SetVarValue=function(t){this.RaiseAccessError(e.SJSValue)},this.Create$1=function(t){return pas.Classes.TComponent.Create$1.call(this,t),this.FVisible=!0,this.FValidChars=rtl.arraySetLength(this.FValidChars,"\0",255),this.FProviderFlags=rtl.createSet(0,1),this},this.Destroy=function(){null!=this.FDataSet&&(this.FDataSet.SetActive(!1),null!=this.FFields&&this.FFields.Remove(this)),rtl.free(this,"FLookupList"),pas.Classes.TComponent.Destroy.call(this)},this.SetParentComponent=function(e){this.SetDataset(rtl.as(e,t.TDataSet))},this.Assign=function(e){null===e?this.Clear():t.TField.isPrototypeOf(e)?this.SetAsJSValue(e.GetAsJSValue()):pas.Classes.TPersistent.Assign.call(this,e)},this.Clear=function(){this.SetData(null)},this.GetData=function(){var e=void 0;return null===this.FDataSet&&t.DatabaseErrorFmt(rtl.getResStr(pas.DBConst,"SNoDataset"),pas.System.VarRecs(18,this.FFieldName)),this.FValidating?e=this.FValueBuffer:(e=this.FDataSet.GetFieldData(this),pas.JS.isUndefined(e)&&(e=null)),e},this.SetData=function(e){null==this.FDataSet&&t.DatabaseErrorFmt(rtl.getResStr(pas.DBConst,"SNoDataset"),pas.System.VarRecs(18,this.FFieldName)),this.FDataSet.SetFieldData(this,e)},rtl.addIntf(this,pas.System.IUnknown);var i=this.$rtti;i.addProperty("Alignment",2,pas.Classes.$rtti.TAlignment,"FAlignment","SetAlignment",4,{Default:pas.Classes.TAlignment.taLeftJustify}),i.addProperty("CustomConstraint",0,rtl.string,"FCustomConstraint","FCustomConstraint"),i.addProperty("ConstraintErrorMessage",0,rtl.string,"FConstraintErrorMessage","FConstraintErrorMessage"),i.addProperty("DefaultExpression",0,rtl.string,"FDefaultExpression","FDefaultExpression"),i.addProperty("DisplayLabel",15,rtl.string,"GetDisplayName","SetDisplayLabel",4,{stored:"IsDisplayLabelStored"}),i.addProperty("DisplayWidth",15,rtl.longint,"GetDisplayWidth","SetDisplayWidth",4,{stored:"IsDisplayWidthStored"}),i.addProperty("FieldKind",0,t.$rtti.TFieldKind,"FFieldKind","FFieldKind"),i.addProperty("FieldName",0,rtl.string,"FFieldName","FFieldName"),i.addProperty("HasConstraints",0,rtl.boolean,"FHasConstraints",""),i.addProperty("Index",3,rtl.longint,"GetIndex","SetIndex"),i.addProperty("ImportedConstraint",0,rtl.string,"FImportedConstraint","FImportedConstraint"),i.addProperty("KeyFields",0,rtl.string,"FKeyFields","FKeyFields"),i.addProperty("LookupCache",0,rtl.boolean,"FLookupCache","FLookupCache"),i.addProperty("LookupDataSet",0,t.$rtti.TDataSet,"FLookupDataSet","FLookupDataSet"),i.addProperty("LookupKeyFields",0,rtl.string,"FLookupKeyfields","FLookupKeyfields"),i.addProperty("LookupResultField",0,rtl.string,"FLookupresultField","FLookupresultField"),i.addProperty("Origin",0,rtl.string,"FOrigin","FOrigin"),i.addProperty("ProviderFlags",0,t.$rtti.TProviderFlags,"FProviderFlags","FProviderFlags"),i.addProperty("ReadOnly",2,rtl.boolean,"FReadOnly","SetReadOnly"),i.addProperty("Required",0,rtl.boolean,"FRequired","FRequired"),i.addProperty("Visible",2,rtl.boolean,"FVisible","SetVisible",4,{Default:!0}),i.addProperty("OnChange",0,t.$rtti.TFieldNotifyEvent,"FOnChange","FOnChange"),i.addProperty("OnGetText",0,t.$rtti.TFieldGetTextEvent,"FOnGetText","FOnGetText"),i.addProperty("OnSetText",0,t.$rtti.TFieldSetTextEvent,"FOnSetText","FOnSetText"),i.addProperty("OnValidate",0,t.$rtti.TFieldNotifyEvent,"FOnValidate","FOnValidate")})),rtl.createClass(this,"TDataSetField",this.TField,(function(){this.$init=function(){t.TField.$init.call(this),this.FNestedDataSet=null},this.$final=function(){this.FNestedDataSet=void 0,t.TField.$final.call(this)},this.AssignNestedDataSet=function(t){null!=this.FNestedDataSet&&(this.FNestedDataSet.Close(),this.FNestedDataSet.FDataSetField=null,null!=this.FDataSet&&this.FDataSet.GetNestedDataSets().Remove(this.FNestedDataSet)),null!=t&&this.FDataSet.GetNestedDataSets().Add(t),this.FNestedDataSet=t},this.Create$1=function(e){return t.TField.Create$1.apply(this,arguments),this.SetDataType(29),this},this.Destroy=function(){this.AssignNestedDataSet(null),t.TField.Destroy.call(this)},rtl.addIntf(this,pas.System.IUnknown)})),rtl.createClass(this,"TCheckConstraint",pas.Classes.TCollectionItem,(function(){this.$init=function(){pas.Classes.TCollectionItem.$init.call(this),this.FCustomConstraint="",this.FErrorMessage="",this.FFromDictionary=!1,this.FImportedConstraint=""},this.Assign=function(t){};var t=this.$rtti;t.addProperty("CustomConstraint",0,rtl.string,"FCustomConstraint","FCustomConstraint"),t.addProperty("ErrorMessage",0,rtl.string,"FErrorMessage","FErrorMessage"),t.addProperty("FromDictionary",0,rtl.boolean,"FFromDictionary","FFromDictionary"),t.addProperty("ImportedConstraint",0,rtl.string,"FImportedConstraint","FImportedConstraint")})),rtl.createClass(this,"TCheckConstraints",pas.Classes.TCollection,(function(){this.GetOwner=function(){return null,null},this.Create$2=function(e){return pas.Classes.TCollection.Create$1.call(this,t.TCheckConstraint),this}})),rtl.createClass(this,"TFields",pas.System.TObject,(function(){this.$init=function(){pas.System.TObject.$init.call(this),this.FDataset=null,this.FFieldList=null,this.FOnChange=null,this.FValidFieldKinds={}},this.$final=function(){this.FDataset=void 0,this.FFieldList=void 0,this.FOnChange=void 0,this.FValidFieldKinds=void 0,pas.System.TObject.$final.call(this)},this.ClearFieldDefs=function(){for(var t=0,e=0,i=this.GetCount()-1;e<=i;e++)t=e,this.GetField(t).FFieldDef=null},this.Changed=function(){null===this.FDataset||3 in this.FDataset.FComponentState||this.FDataset.DataEvent(9,0),null!=this.FOnChange&&this.FOnChange(this)},this.GetCount=function(){return this.FFieldList.FCount},this.GetField=function(t){return rtl.getObject(this.FFieldList.Get(t))},this.SetFieldIndex=function(t,e){var i;-1!==(i=this.FFieldList.IndexOf(t))&&(e<0&&(e=0),e>=this.GetCount()&&(e=this.GetCount()-1),e!==i&&(this.FFieldList.Delete(i),this.FFieldList.Insert(e,t),t.PropertyChanged(!0),this.Changed()))},this.Create$1=function(t){return this.FDataset=t,this.FFieldList=pas.Classes.TFPList.$create("Create"),this.FValidFieldKinds=rtl.createSet(null,0,3),this},this.Destroy=function(){null!=this.FFieldList&&this.Clear(),pas.SysUtils.FreeAndNil({p:this,get:function(){return this.p.FFieldList},set:function(t){this.p.FFieldList=t}}),pas.System.TObject.Destroy.call(this)},this.Add=function(t){this.CheckFieldName(t.FFieldName),this.FFieldList.Add(t),t.FFields=this,this.Changed()},this.CheckFieldName=function(e){null!==this.FindField(e)&&t.DatabaseErrorFmt$1(rtl.getResStr(pas.DBConst,"SDuplicateFieldName"),pas.System.VarRecs(18,e),this.FDataset)},this.Clear=function(){for(var t=null;this.FFieldList.FCount>0;)(t=rtl.getObject(this.FFieldList.Last())).FDataSet=null,t=rtl.freeLoc(t),this.FFieldList.Delete(this.FFieldList.FCount-1);this.Changed()},this.FindField=function(t){var e,i=null,s=0;e=pas.SysUtils.UpperCase(t);for(var n=0,r=this.FFieldList.FCount-1;n<=r;n++)if(s=n,i=rtl.getObject(this.FFieldList.Get(s)),e===pas.SysUtils.UpperCase(i.FFieldName))return i;return i=null},this.IndexOf=function(t){return this.FFieldList.IndexOf(t)},this.Remove=function(t){this.FFieldList.Remove(t),t.FFields=null,this.Changed()}})),this.TBookmarkFlag={0:"bfCurrent",bfCurrent:0,1:"bfBOF",bfBOF:1,2:"bfEOF",bfEOF:2,3:"bfInserted",bfInserted:3},this.TGetMode={0:"gmCurrent",gmCurrent:0,1:"gmNext",gmNext:1,2:"gmPrior",gmPrior:2},this.TGetResult={0:"grOK",grOK:0,1:"grBOF",grBOF:1,2:"grEOF",grEOF:2,3:"grError",grError:3},this.TRecordState={0:"rsNew",rsNew:0,1:"rsClean",rsClean:1,2:"rsUpdate",rsUpdate:2,3:"rsDelete",rsDelete:3},rtl.recNewT(this,"TDataRecord",(function(){this.data=void 0,this.state=0,this.$eq=function(t){return this.data===t.data&&this.state===t.state},this.$assign=function(t){return this.data=t.data,this.state=t.state,this}})),rtl.createClass(this,"TDataSet",pas.Classes.TComponent,(function(){this.$init=function(){pas.Classes.TComponent.$init.call(this),this.FCalcBuffer=t.TDataRecord.$new(),this.FCalcFieldsCount=0,this.FOpenAfterRead=!1,this.FActiveRecord=0,this.FAfterClose=null,this.FAfterOpen=null,this.FAfterScroll=null,this.FAutoCalcFields=!1,this.FBOF=!1,this.FBeforeClose=null,this.FBeforeOpen=null,this.FBuffers=[],this.FBufferCount=0,this.FConstraints=null,this.FDisableControlsCount=0,this.FCurrentRecord=0,this.FDataSources=null,this.FDefaultFields=!1,this.FEOF=!1,this.FEnableControlsEvent=0,this.FFieldList=null,this.FFieldDefs=null,this.FInternalCalcFields=!1,this.FModified=!1,this.FOnCalcFields=null,this.FRecordCount=0,this.FIsUniDirectional=!1,this.FState=0,this.FInternalOpenComplete=!1,this.FDataProxy=null,this.FDataRequestID=0,this.FChangeList=null,this.FDataSetField=null,this.FNestedDataSets=null,this.FNestedDataSetClass=null},this.$final=function(){this.FCalcBuffer=void 0,this.FAfterClose=void 0,this.FAfterOpen=void 0,this.FAfterScroll=void 0,this.FBeforeClose=void 0,this.FBeforeOpen=void 0,this.FBuffers=void 0,this.FConstraints=void 0,this.FDataSources=void 0,this.FFieldList=void 0,this.FFieldDefs=void 0,this.FOnCalcFields=void 0,this.FDataProxy=void 0,this.FChangeList=void 0,this.FDataSetField=void 0,this.FNestedDataSets=void 0,this.FNestedDataSetClass=void 0,pas.Classes.TComponent.$final.call(this)},this.DoInternalOpen=function(){this.InternalOpen(),this.FInternalOpenComplete=!0,this.FRecordCount=0,this.RecalcBufListSize(),this.FBOF=!0,this.FEOF=0===this.FRecordCount,this.InitChangeList()},this.RegisterDataSource=function(t){this.FDataSources.Add(t),this.RecalcBufListSize()},this.ShiftBuffersForward=function(){var e=t.TDataRecord.$new(),i=0;e.$assign(this.FBuffers[this.FBufferCount]);for(var s=this.FBufferCount;s>=1;s--)i=s,this.FBuffers[i].$assign(this.FBuffers[i-1]);this.FBuffers[0].$assign(e)},this.ShiftBuffersBackward=function(){var e=t.TDataRecord.$new(),i=0;e.$assign(this.FBuffers[0]);for(var s=1,n=this.FBufferCount;s<=n;s++)i=s,this.FBuffers[i-1].$assign(this.FBuffers[i]);this.FBuffers[this.FBufferCount].$assign(e)},this.GetActive=function(){return 0!==this.FState&&12!==this.FState},this.UnRegisterDataSource=function(t){this.FDataSources.Remove(t)},this.GetNestedDataSets=function(){return null==this.FNestedDataSets&&(this.FNestedDataSets=pas.Classes.TFPList.$create("Create")),this.FNestedDataSets},this.InitChangeList=function(){this.DoneChangeList(),this.FChangeList=pas.Classes.TFPList.$create("Create")},this.DoneChangeList=function(){this.ClearChangeList(),pas.SysUtils.FreeAndNil({p:this,get:function(){return this.p.FChangeList},set:function(t){this.p.FChangeList=t}})},this.ClearChangeList=function(){var t=0;if(null!=this.FChangeList)for(var e=0,i=this.FChangeList.FCount-1;e<=i;e++)t=e,rtl.getObject(this.FChangeList.Get(t)).$destroy("Destroy"),this.FChangeList.Put(t,null)},this.RecalcBufListSize=function(){var t=0,e=0,i=0,s=null;if(this.IsCursorOpen()){i=this.FIsUniDirectional?1:10;for(var n=0,r=this.FDataSources.FCount-1;n<=r;n++){t=n;for(var a=0,o=rtl.getObject(this.FDataSources.Get(t)).FDataLinks.GetCount()-1;a<=o;a++)e=a,i<(s=rtl.getObject(rtl.getObject(this.FDataSources.Get(t)).FDataLinks.Get(e))).GetBufferCount()&&(i=s.GetBufferCount())}this.FBufferCount!==i&&(this.SetBufListSize(i),this.GetNextRecords(),this.FRecordCount<this.FBufferCount&&!this.FIsUniDirectional&&(this.FActiveRecord=this.FActiveRecord+this.GetPriorRecords(),this.CursorPosChanged()))}},this.ActivateBuffers=function(){this.FBOF=!1,this.FEOF=!1,this.FActiveRecord=0},this.CalculateFields=function(t){var e=0;if(this.FCalcBuffer.$assign(t),11!==this.FState&&(this.ClearCalcFields(this.FCalcBuffer),!this.FIsUniDirectional))for(var i=0,s=this.FFieldList.GetCount()-1;i<=s;i++)e=i,2===this.FFieldList.GetField(e).FFieldKind&&this.FFieldList.GetField(e).CalcLookupValue();this.DoOnCalcFields()},this.CheckInactive=function(){this.GetActive()&&t.DatabaseError$1(rtl.getResStr(pas.DBConst,"SActiveDataset"),this)},this.CheckBiDirectional=function(){this.FIsUniDirectional&&t.DatabaseError$1(rtl.getResStr(pas.DBConst,"SUniDirectional"),this)},this.Loaded=function(){pas.Classes.TComponent.Loaded.call(this);try{this.FOpenAfterRead&&this.SetActive(!0)}catch(e){if(!pas.SysUtils.Exception.isPrototypeOf(e))throw e;var t=e;4 in this.FComponentState&&this.InternalHandleException(t)}},this.ClearBuffers=function(){this.FRecordCount=0,this.FActiveRecord=0,this.FCurrentRecord=-1,this.FBOF=!0,this.FEOF=!0},this.ClearCalcFields=function(t){},this.CloseCursor=function(){this.ClearBuffers(),this.SetBufListSize(1),this.FFieldList.ClearFieldDefs(),this.InternalClose(),this.FInternalOpenComplete=!1},this.DataEvent=function(t,e){var i=this;var s,n=0,r=t;if(0===r?((s=rtl.getObject(e)).FFieldKind in rtl.createSet(0,3)&&i.SetModified(!0),4!==i.FState&&(0===s.FFieldKind&&(i.FInternalCalcFields?i.RefreshInternalCalcFields(i.FBuffers[i.FActiveRecord]):i.FAutoCalcFields&&0!==i.FCalcFieldsCount&&i.CalculateFields(i.FBuffers[i.FActiveRecord])),s.Change())):2===r||3===r?function(){var t=0,e=null;if(3!==i.FState&&i.UpdateCursorPos(),null!=i.FNestedDataSets)for(var s=0,n=i.GetNestedDataSets().FCount-1;s<=n;s++)t=s,(e=rtl.getObject(i.GetNestedDataSets().Get(t))).GetActive()&&e.DataEvent(11,0)}():4===r&&(this.FEnableControlsEvent=4),!this.ControlsDisabled()&&10!==this.FState)for(var a=0,o=this.FDataSources.FCount-1;a<=o;a++)n=a,rtl.getObject(this.FDataSources.Get(n)).ProcessEvent(t,e)},this.DoAfterClose=function(){null==this.FAfterClose||3 in this.FComponentState||this.FAfterClose(this)},this.DoAfterOpen=function(){null!=this.FAfterOpen&&this.FAfterOpen(this)},this.DoAfterScroll=function(){null!=this.FAfterScroll&&this.FAfterScroll(this)},this.DoBeforeClose=function(){null==this.FBeforeClose||3 in this.FComponentState||this.FBeforeClose(this)},this.DoBeforeOpen=function(){null!=this.FBeforeOpen&&this.FBeforeOpen(this)},this.DoOnCalcFields=function(){null!=this.FOnCalcFields&&this.FOnCalcFields(this)},this.GetfieldCount=function(){return this.FFieldList.GetCount()},this.GetFieldValues=function(t){var e=void 0,i=0,s=null,n=[];s=pas.Classes.TList.$create("Create$1");try{if(this.GetFieldList(s,t),s.GetCount()>1){n=rtl.arraySetLength(n,void 0,s.GetCount());for(var r=0,a=s.GetCount()-1;r<=a;r++)n[i=r]=rtl.getObject(s.Get(i)).GetAsJSValue();e=n}else e=this.FieldByName(t).GetAsJSValue()}finally{s=rtl.freeLoc(s)}return e},this.GetNextRecords=function(){var t=0;for(t=0;this.FRecordCount<this.FBufferCount&&this.GetNextRecord();)t+=1;return t},this.GetNextRecord=function(){var e,i=t.TDataRecord.$new();return this.FRecordCount>0&&this.SetCurrentRecord(this.FRecordCount-1),(e=0===this.GetRecord(this.FBuffers[this.FBufferCount],1,!0))?(0===this.FRecordCount&&this.ActivateBuffers(),this.FRecordCount===this.FBufferCount?this.ShiftBuffersBackward():(this.FRecordCount+=1,this.FCurrentRecord=this.FRecordCount-1,i.$assign(this.FBuffers[this.FCurrentRecord]),this.FBuffers[this.FCurrentRecord].$assign(this.FBuffers[this.FBufferCount]),this.FBuffers[this.FBufferCount].$assign(i))):this.CursorPosChanged(),e},this.GetPriorRecords=function(){var t=0;for(t=0;this.FRecordCount<this.FBufferCount&&this.GetPriorRecord();)t+=1;return t},this.GetPriorRecord=function(){var t;return this.CheckBiDirectional(),this.FRecordCount>0&&this.SetCurrentRecord(0),(t=0===this.GetRecord(this.FBuffers[this.FBufferCount],2,!0))?(0===this.FRecordCount&&this.ActivateBuffers(),this.ShiftBuffersForward(),this.FRecordCount<this.FBufferCount&&(this.FRecordCount+=1)):this.CursorPosChanged(),t},this.OpenCursor=function(t){t?this.InternalInitFieldDefs():12!==this.FState&&this.DoInternalOpen()},this.OpenCursorcomplete=function(){try{12===this.FState&&this.DoInternalOpen()}finally{this.FInternalOpenComplete?(this.SetState(1),this.DoAfterOpen(),this.IsEmpty()||this.DoAfterScroll()):(this.SetState(0),this.CloseCursor())}},this.RefreshInternalCalcFields=function(t){},this.SetActive=function(t){if(t&&0===this.FState){if(0 in this.FComponentState)return void(this.FOpenAfterRead=!0);this.DoBeforeOpen(),this.FEnableControlsEvent=4,this.FInternalCalcFields=!1;try{this.FDefaultFields=0===this.GetfieldCount(),this.OpenCursor(!1)}finally{12!==this.FState&&this.OpenCursorcomplete()}this.FModified=!1}else t||0===this.FState||(this.DoBeforeClose(),this.SetState(0),this.FDataRequestID=0,this.DoneChangeList(),this.CloseCursor(),this.DoAfterClose(),this.FModified=!1)},this.SetBufListSize=function(e){var i=0;if(e<0&&(e=0),e!==this.FBufferCount){if(e>this.FBufferCount){this.FBuffers=rtl.arraySetLength(this.FBuffers,t.TDataRecord,e+1);for(var s=this.FBufferCount,n=e;s<=n;s++)i=s,this.FBuffers[i].$assign(this.AllocRecordBuffer())}else if(e<this.FBufferCount&&e>=0&&this.FActiveRecord>e-1){for(var r=0,a=this.FActiveRecord-e;r<=a;r++)i=r,this.ShiftBuffersBackward();this.FActiveRecord=e-1}this.FBuffers=rtl.arraySetLength(this.FBuffers,t.TDataRecord,e+1),this.FBufferCount=e,this.FRecordCount>this.FBufferCount&&(this.FRecordCount=this.FBufferCount)}},this.SetCurrentRecord=function(e){if(this.FCurrentRecord!==e){if(!this.FIsUniDirectional){var i=this.GetBookmarkFlag(t.TDataRecord.$clone(this.FBuffers[e]));0===i?this.InternalSetToRecord(t.TDataRecord.$clone(this.FBuffers[e])):1===i?this.InternalFirst():2===i&&this.InternalLast()}this.FCurrentRecord=e}},this.SetModified=function(t){this.FModified=t},this.SetName=function(t){var e=this;function i(t){var i="",s=0,n=0;for(i=t,s=0,n=0;s<e.FFieldList.GetCount();)i===e.FFieldList.GetField(s).FFieldName?(n+=1,i=t+pas.SysUtils.IntToStr(n)):s+=1;return i}var s,n=0,r="";if(e.FName!==t&&(s=e.FName,pas.Classes.TComponent.SetName.call(this,t),4 in this.FComponentState))for(var a=0,o=this.FFieldList.GetCount()-1;a<=o;a++)n=a,r=s+this.FFieldList.GetField(n).FFieldName,pas.System.Copy(this.FFieldList.GetField(n).FName,1,r.length)===r&&this.FFieldList.GetField(n).SetName(i(t+this.FFieldList.GetField(n).FFieldName))},this.SetState=function(t){t!==this.FState&&(this.FState=t,1===t&&(this.FModified=!1),this.DataEvent(6,0))},this.AllocRecordBuffer=function(){var e=t.TDataRecord.$new();return e.data=null,e.state=0,e},this.FreeRecordBuffer=function(t){},this.GetBookmarkFlag=function(t){return 0,0},this.GetDataSource=function(){return null,null},this.InternalFirst=function(){},this.InternalHandleException=function(t){pas.SysUtils.ShowException(t,null)},this.InternalLast=function(){},this.InternalSetToRecord=function(t){},this.Notification=function(t,e){pas.Classes.TComponent.Notification.call(this,t,e),1===e&&t===this.FDataProxy&&(this.FDataProxy=null)},this.SetDataSetField=function(e){e!==this.FDataSetField&&(null!==e&&(e.FDataSet===this||null!==e.FDataSet.GetDataSource()&&e.FDataSet.GetDataSource().FDataSet===this)&&t.DatabaseError$1(rtl.getResStr(pas.DBConst,"SCircularDataLink"),this),null==e||this.$class.InheritsFrom(e.FDataSet.FNestedDataSetClass)||t.DatabaseErrorFmt$1(rtl.getResStr(pas.DBConst,"SNestedDataSetClass"),pas.System.VarRecs(18,e.FDataSet.FNestedDataSetClass.$classname),this),this.GetActive()&&this.Close(),null!=this.FDataSetField&&this.FDataSetField.AssignNestedDataSet(null),this.FDataSetField=e,null!=e&&(e.AssignNestedDataSet(this),e.FDataSet.GetActive()&&this.Open()))},this.GetFieldData=function(e){return this.GetFieldData$1(e,t.TDataRecord.$clone(this.ActiveBuffer()))},this.SetFieldData=function(t,e){this.SetFieldData$1(t,this.FBuffers[this.FActiveRecord],e)},this.GetFieldData$1=function(t,e){var i=void 0;return i=e.data[t.FFieldName],pas.JS.isUndefined(i)&&(i=null),i},this.SetFieldData$1=function(t,e,i){e.data[t.FFieldName]=i},this.FieldDefsClass=function(){return t.TFieldDefs},this.FieldsClass=function(){return t.TFields},this.Create$1=function(e){return pas.Classes.TComponent.Create$1.call(this,e),this.FFieldDefs=this.$class.FieldDefsClass().$create("Create$4",[this]),this.FFieldList=this.$class.FieldsClass().$create("Create$1",[this]),this.FDataSources=pas.Classes.TFPList.$create("Create"),this.FConstraints=t.TCheckConstraints.$create("Create$2",[this]),this.FBuffers=rtl.arraySetLength(this.FBuffers,t.TDataRecord,1),this.FActiveRecord=0,this.FEOF=!0,this.FBOF=!0,this.FIsUniDirectional=!1,this.FAutoCalcFields=!0,this.FDataRequestID=0,this.FNestedDataSetClass=this.$class.ClassType(),this},this.Destroy=function(){var e=0;for(this.SetActive(!1),this.SetDataSetField(null),rtl.free(this,"FFieldDefs"),rtl.free(this,"FFieldList"),rtl.free(this,"FNestedDataSets");this.FDataSources.FCount>0;)rtl.getObject(this.FDataSources.Get(this.FDataSources.FCount-1)).SetDataSet(null);this.FDataSources.$destroy("Destroy");for(var i=0,s=this.FBufferCount;i<=s;i++)e=i,this.FreeRecordBuffer(this.FBuffers[e]);rtl.free(this,"FConstraints"),this.FBuffers=rtl.arraySetLength(this.FBuffers,t.TDataRecord,1),pas.Classes.TComponent.Destroy.call(this)},this.ActiveBuffer=function(){var e=t.TDataRecord.$new();return-1!==this.FActiveRecord?e.$assign(this.FBuffers[this.FActiveRecord]):e.$assign(t.TDataRecord.$new()),e},this.Close=function(){this.SetActive(!1)},this.ControlsDisabled=function(){return this.FDisableControlsCount>0},this.CursorPosChanged=function(){this.FCurrentRecord=-1},this.FieldByName=function(e){var i;return null===(i=this.FindField(e))&&t.DatabaseErrorFmt$1(rtl.getResStr(pas.DBConst,"SFieldNotFound"),pas.System.VarRecs(18,e),this),i},this.FindField=function(t){return this.FFieldList.FindField(t)},this.GetFieldList=function(e,i){var s=null,n="",r=0;if(""!==i&&null!==e){r=1;do{n=t.ExtractFieldName(i,{get:function(){return r},set:function(t){r=t}}),s=this.FieldByName(n),e.Add(s)}while(!(r>i.length))}},this.IsEmpty=function(){return this.FBOF&&this.FEOF&&!(3===this.FState)},this.Lookup=function(t,e,i){return this.CheckBiDirectional(),null,null},this.Open=function(){this.SetActive(!0)},this.UpdateCursorPos=function(){this.FRecordCount>0&&this.SetCurrentRecord(this.FActiveRecord)},rtl.addIntf(this,pas.System.IUnknown)})),rtl.createClass(this,"TDataLink",pas.Classes.TPersistent,(function(){this.$init=function(){pas.Classes.TPersistent.$init.call(this),this.FFirstRecord=0,this.FBufferCount=0,this.FActive=!1,this.FDataSourceFixed=!1,this.FEditing=!1,this.FReadOnly=!1,this.FUpdatingRecord=!1,this.FVisualControl=!1,this.FDataSource=null},this.$final=function(){this.FDataSource=void 0,pas.Classes.TPersistent.$final.call(this)},this.CalcFirstRecord=function(t){var e=0;return e=this.FDataSource.FDataSet.FActiveRecord>this.FFirstRecord+t+this.FBufferCount-1?this.FDataSource.FDataSet.FActiveRecord-(this.FFirstRecord+t+this.FBufferCount-1):this.FDataSource.FDataSet.FActiveRecord<this.FFirstRecord+t?this.FDataSource.FDataSet.FActiveRecord-(this.FFirstRecord+t):0,this.FFirstRecord+=t+e,e},this.CalcRange=function(){var t=0,e=0;(e=this.GetDataset().FActiveRecord-this.FBufferCount+1)<0&&(e=0),(t=this.GetDataset().FBufferCount-this.FBufferCount)<0&&(t=0),t>this.GetDataset().FActiveRecord&&(t=this.GetDataset().FActiveRecord),this.FFirstRecord<e&&(this.FFirstRecord=e),this.FFirstRecord>t&&(this.FFirstRecord=t),0!==this.FFirstRecord&&this.GetDataset().FActiveRecord-this.FFirstRecord<this.FBufferCount-1&&(this.FFirstRecord-=1)},this.CheckActiveAndEditing=function(){var e=!1;(e=null!=this.FDataSource&&!(this.FDataSource.FState in rtl.createSet(0,12)))!==this.FActive&&(this.FActive=e,this.ActiveChanged()),(e=null!=this.FDataSource&&this.FDataSource.FState in t.dsEditModes&&!this.FReadOnly)!==this.FEditing&&(this.FEditing=e,this.EditingChanged())},this.GetDataset=function(){return null!=this.FDataSource?this.FDataSource.FDataSet:null},this.SetActive=function(t){this.FActive!==t&&(this.FActive=t,this.ActiveChanged())},this.SetDataSource=function(t){this.FDataSource!==t&&(this.FDataSourceFixed||(null!=this.FDataSource&&(this.FDataSource.UnregisterDataLink(this),this.FDataSource=null,this.CheckActiveAndEditing()),this.FDataSource=t,null!=this.FDataSource&&(this.FDataSource.RegisterDataLink(this),this.CheckActiveAndEditing())))},this.ActiveChanged=function(){this.FFirstRecord=0},this.CheckBrowseMode=function(){},this.DataEvent=function(t,e){if(6===t)this.CheckActiveAndEditing();else if(this.FActive){var i=t;0===i||1===i?this.FUpdatingRecord||this.RecordChanged(rtl.getObject(e)):2===i?(this.SetActive(this.FDataSource.FDataSet.GetActive()),this.CalcRange(),this.CalcFirstRecord(rtl.trunc(e)),this.DataSetChanged()):3===i?this.DataSetScrolled(this.CalcFirstRecord(rtl.trunc(e))):4===i?(this.CalcFirstRecord(rtl.trunc(e)),this.LayoutChanged()):5===i?this.UpdateRecord():7===i?this.CheckBrowseMode():10===i&&this.FocusControl(e)}},this.DataSetChanged=function(){this.RecordChanged(null)},this.DataSetScrolled=function(t){this.DataSetChanged()},this.EditingChanged=function(){},this.FocusControl=function(t){},this.GetBufferCount=function(){return this.FBufferCount},this.LayoutChanged=function(){this.DataSetChanged()},this.RecordChanged=function(t){},this.UpdateData=function(){},this.Destroy=function(){this.FActive=!1,this.FEditing=!1,this.FDataSourceFixed=!1,this.SetDataSource(null),pas.System.TObject.Destroy.call(this)},this.UpdateRecord=function(){this.FUpdatingRecord=!0;try{this.UpdateData()}finally{this.FUpdatingRecord=!1}}})),this.$rtti.$MethodVar("TDataChangeEvent",{procsig:rtl.newTIProcSig([["Sender",pas.System.$rtti.TObject],["Field",this.$rtti.TField]]),methodkind:0}),rtl.createClass(this,"TDataSource",pas.Classes.TComponent,(function(){this.$init=function(){pas.Classes.TComponent.$init.call(this),this.FDataSet=null,this.FDataLinks=null,this.FEnabled=!1,this.FAutoEdit=!1,this.FState=0,this.FOnStateChange=null,this.FOnDataChange=null,this.FOnUpdateData=null},this.$final=function(){this.FDataSet=void 0,this.FDataLinks=void 0,this.FOnStateChange=void 0,this.FOnDataChange=void 0,this.FOnUpdateData=void 0,pas.Classes.TComponent.$final.call(this)},this.DistributeEvent=function(t,e){for(var i=0,s=0,n=this.FDataLinks.GetCount()-1;s<=n;s++)i=s,rtl.getObject(this.FDataLinks.Get(i)).FVisualControl||rtl.getObject(this.FDataLinks.Get(i)).DataEvent(t,e);for(var r=0,a=this.FDataLinks.GetCount()-1;r<=a;r++)i=r,rtl.getObject(this.FDataLinks.Get(i)).FVisualControl&&rtl.getObject(this.FDataLinks.Get(i)).DataEvent(t,e)},this.RegisterDataLink=function(t){this.FDataLinks.Add(t),null!=this.FDataSet&&this.FDataSet.RecalcBufListSize()};var e=rtl.createSet(1,2,3,4,6);this.ProcessEvent=function(t,i){var s=!1,n=0;if(6===t){if(s=0===this.FState,n=this.FState,null!=this.FDataSet&&this.FEnabled?this.FState=this.FDataSet.FState:this.FState=0,this.FState===n)return}else s=!0;this.DistributeEvent(t,i),3 in this.FComponentState||(6===t&&this.DoStateChange(),t in e&&s&&this.DoDataChange(null),0===t&&this.DoDataChange(i),5===t&&this.DoUpdateData())},this.SetDataSet=function(t){null!==this.FDataSet&&(this.FDataSet.UnRegisterDataSource(this),this.FDataSet=null,this.ProcessEvent(6,0)),null!==t&&(t.RegisterDataSource(this),this.FDataSet=t,this.ProcessEvent(6,0))},this.SetEnabled=function(t){this.FEnabled=t,this.ProcessEvent(6,0)},this.UnregisterDataLink=function(t){this.FDataLinks.Remove(t),null!==this.FDataSet&&this.FDataSet.RecalcBufListSize()},this.DoDataChange=function(t){null!=this.FOnDataChange&&(null!=t?this.FOnDataChange(this,t):this.FOnDataChange(this,null))},this.DoStateChange=function(){null!=this.FOnStateChange&&this.FOnStateChange(this)},this.DoUpdateData=function(){null!=this.FOnUpdateData&&this.FOnUpdateData(this)},this.Create$1=function(t){return pas.Classes.TComponent.Create$1.call(this,t),this.FDataLinks=pas.Classes.TList.$create("Create$1"),this.FEnabled=!0,this.FAutoEdit=!0,this},this.Destroy=function(){for(this.FOnStateChange=null,this.SetDataSet(null);this.FDataLinks.GetCount()>0;)rtl.getObject(this.FDataLinks.Get(this.FDataLinks.GetCount()-1)).SetDataSource(null);rtl.free(this,"FDataLinks"),pas.Classes.TComponent.Destroy.call(this)},rtl.addIntf(this,pas.System.IUnknown);var i=this.$rtti;i.addProperty("AutoEdit",0,rtl.boolean,"FAutoEdit","FAutoEdit",4,{Default:!0}),i.addProperty("DataSet",2,t.$rtti.TDataSet,"FDataSet","SetDataSet"),i.addProperty("Enabled",2,rtl.boolean,"FEnabled","SetEnabled",4,{Default:!0}),i.addProperty("OnStateChange",0,pas.Classes.$rtti.TNotifyEvent,"FOnStateChange","FOnStateChange"),i.addProperty("OnDataChange",0,t.$rtti.TDataChangeEvent,"FOnDataChange","FOnDataChange"),i.addProperty("OnUpdateData",0,pas.Classes.$rtti.TNotifyEvent,"FOnUpdateData","FOnUpdateData")})),rtl.createClass(this,"TDataProxy",pas.Classes.TComponent,(function(){rtl.addIntf(this,pas.System.IUnknown)})),this.dsEditModes=rtl.createSet(2,3,4),this.DatabaseError=function(e){throw t.EDatabaseError.$create("Create$1",[e])},this.DatabaseError$1=function(e,i){if(null!=i&&""!==i.FName)throw t.EDatabaseError.$create("CreateFmt",["%s : %s",pas.System.VarRecs(18,i.FName,18,e)]);t.DatabaseError(e)},this.DatabaseErrorFmt=function(e,i){throw t.EDatabaseError.$create("CreateFmt",[e,i])},this.DatabaseErrorFmt$1=function(e,i,s){if(null!=s)throw t.EDatabaseError.$create("CreateFmt",[pas.SysUtils.Format("%s : %s",pas.System.VarRecs(18,s.FName,18,e)),i]);t.DatabaseErrorFmt(e,i)},this.ExtractFieldName=function(t,e){var i,s,n=0;for(n=e.get(),s=t.length;n<=s&&";"!==t.charAt(n-1);)n+=1;return i=pas.SysUtils.Trim(pas.System.Copy(t,e.get(),n-e.get())),n<=s&&";"===t.charAt(n-1)&&(n+=1),e.set(n),i},t.$implcode=function(){e.DefaultBufferCount=10,e.SJSValue="JSValue"}}),["DBConst","TypInfo"]),rtl.module("WEBLib.Ctrls.SVG",["System"],(function(){"use strict";this.ICON_SEARCH="data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAPJJREFUOE+l0i0sR1EUAPDfv0ka0UemEhUzhU0yjeaj0YxJiCrDRqFoPpqPbjRTbHRVQLO73bfd//Mue3s3nt3zO+eee1oanlbDfFXAJFYwFPF77OCyqlgZ2MYqXnEdE8bQjy2sl5EUCJXPcYQlfMXLHdjFHMKdtk5S4A49GEiSi4IBecYbRtMuUuADJ1jIDHYfM+j8CzjFfAY4wBS6csAtev95wgvGc8AELnCMxdIQ9zCLaZzlgBDfxFocVvqNfTHpKQ7xvUCqFil0soxhfOMRh9jAINqQOqvcjZuIPBSbWgcIXQfkCp8YCYG6wK8fbgz8AH9+LhG4lkRRAAAAAElFTkSuQmCC",this.ICON_FILTER="data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAPhJREFUOE/N078rxWEUx/HXpYz+ABN2A4q6ZTBZkCy3rMomm7qDukWxir9BpKRYLW7Rne5kpvwHRj+io+dbt2/fr68fi7M9z/mcd+d8zvPU/DFqGMYu+n/IekMzAKPoYgAX34Qs4BnjAYiYwyW2sFcBaWIbS1GTAaJmHftYwXEJZBmn2MBhaHoBcT7AKmbRyUEmcI0jrGW5PCCMPMckpvGYhEMJeId5vJYB4n4QN8mkmSRsJ5PreOrtLN9BlovV3iNmjjjDCB7y3pQBQveORio4KfDrM/W/AS+4wi1avxlhETsYSz4UjvuVB1HXlzYxhc2i11kFqPxbH57RKFOftCADAAAAAElFTkSuQmCC"})),rtl.module("WEBLib.Grids",["System","Classes","JS","WEBLib.Controls","WEBLib.Graphics","Web","DB","WEBLib.Menus","WEBLib.StdCtrls","WEBLib.Ctrls.SVG","Types"],(function(){"use strict";var t=this,e=t.$impl;rtl.recNewT(this,"TGridCoord",(function(){this.X=0,this.Y=0,this.$eq=function(t){return this.X===t.X&&this.Y===t.Y},this.$assign=function(t){return this.X=t.X,this.Y=t.Y,this}})),this.TGridSortIndicator={0:"siNone",siNone:0,1:"siAscending",siAscending:1,2:"siDescending",siDescending:2},this.$rtti.$Enum("TGridSortIndicator",{minvalue:0,maxvalue:2,ordtype:1,enumtype:this.TGridSortIndicator}),this.$rtti.$MethodVar("TGridGetCellDataEvent",{procsig:rtl.newTIProcSig([["Sender",pas.System.$rtti.TObject],["ACol",rtl.longint],["ARow",rtl.longint],["AField",pas.DB.$rtti.TField],["AValue",rtl.string,1]]),methodkind:0}),this.$rtti.$MethodVar("TGridGetCellClassEvent",{procsig:rtl.newTIProcSig([["Sender",pas.System.$rtti.TObject],["ACol",rtl.longint],["ARow",rtl.longint],["AField",pas.DB.$rtti.TField],["AValue",rtl.string],["AClassName",rtl.string,1]]),methodkind:0}),this.$rtti.$MethodVar("TGridGetCellChildrenEvent",{procsig:rtl.newTIProcSig([["Sender",pas.System.$rtti.TObject],["ACol",rtl.longint],["ARow",rtl.longint],["AField",pas.DB.$rtti.TField],["AValue",rtl.string],["AElement",pas["WEBLib.Controls"].$rtti.TJSHTMLElementRecord]]),methodkind:0}),this.$rtti.$MethodVar("TGridSortClickEvent",{procsig:rtl.newTIProcSig([["Sender",pas.System.$rtti.TObject],["ACol",rtl.longint],["ARow",rtl.longint],["ASortIndicator",this.$rtti.TGridSortIndicator]]),methodkind:0}),rtl.createClass(this,"TCustomGrid",pas["WEBLib.Menus"].TWebCustomControl,(function(){this.$init=function(){pas["WEBLib.Menus"].TWebCustomControl.$init.call(this),this.FRowCount=0,this.FColCount=0},this.GetCells=function(t,e){return"",""},this.SetCells=function(t,e,i){},this.SetColCount=function(t){var e=0;this.FColCount!==t&&t>=0&&(e=t-this.FColCount,this.FColCount=t,null!=this.GetElementHandle()&&(this.ColCountChanged(e),this.GridChanged()))},this.SetRowCount=function(t){var e=0;this.FRowCount!==t&&t>=0&&(e=t-this.FRowCount,this.FRowCount=t,null!=this.GetElementHandle()&&(this.RowCountChanged(e),this.GridChanged()))},this.GridChanged=function(){},this.RowCountChanged=function(t){},this.ColCountChanged=function(t){},rtl.addIntf(this,pas["WEBLib.Controls"].IControl),rtl.addIntf(this,pas.System.IUnknown)})),this.$rtti.$MethodVar("TCellEvent",{procsig:rtl.newTIProcSig([["Sender",pas.System.$rtti.TObject],["ACol",rtl.longint],["ARow",rtl.longint]]),methodkind:0}),this.$rtti.$MethodVar("TCellCheckEvent",{procsig:rtl.newTIProcSig([["Sender",pas.System.$rtti.TObject],["ACol",rtl.longint],["ARow",rtl.longint],["Checked",rtl.boolean]]),methodkind:0}),this.$rtti.$Class("TCustomTableControl"),this.TTablePager={0:"tpNone",tpNone:0,1:"tpDropDown",tpDropDown:1,2:"tpLink",tpLink:2,3:"tpButton",tpButton:3,4:"tpList",tpList:4,5:"tpPrevNext",tpPrevNext:5},this.$rtti.$Enum("TTablePager",{minvalue:0,maxvalue:5,ordtype:1,enumtype:this.TTablePager}),this.TTablePagerAlign={0:"paRight",paRight:0,1:"paCenter",paCenter:1,2:"paLeft",paLeft:2},this.$rtti.$Enum("TTablePagerAlign",{minvalue:0,maxvalue:2,ordtype:1,enumtype:this.TTablePagerAlign}),rtl.createClass(this,"TTableControlHeader",pas.Classes.TPersistent,(function(){this.$init=function(){pas.Classes.TPersistent.$init.call(this),this.FPageEventPtr=null,this.FFilterEventPtr=null,this.FSearchEventPtr=null,this.FOwner=null,this.FElement=null,this.FPagerElement=null,this.FSearchElement=null,this.FFilterElement=null,this.FSearchInput=null,this.FFilterInput=null,this.FVisible=!1,this.FCaption="",this.FSearchValue="",this.FFilterValue="",this.FPager=0,this.FButtonElementClassName="",this.FLinkElementClassName="",this.FDropDownElementClassName="",this.FListElementClassName="",this.FListItemElementClassName="",this.FInputElementClassName="",this.FFilterColumn=0,this.FSearch=!1,this.FFilter=!1,this.FButtonActiveElementClassName="",this.FLinkActiveElementClassName="",this.FListLinkElementClassName="",this.FPagerAlign=0},this.$final=function(){this.FOwner=void 0,this.FElement=void 0,this.FPagerElement=void 0,this.FSearchElement=void 0,this.FFilterElement=void 0,this.FSearchInput=void 0,this.FFilterInput=void 0,pas.Classes.TPersistent.$final.call(this)},this.SetCaption=function(t){this.FCaption!==t&&(this.FCaption=t,this.FOwner.RenderGrid())},this.SetVisible=function(t){this.FVisible!==t&&(this.FVisible=t,this.FOwner.ReRenderGrid())},this.SetPager=function(t){this.FPager!==t&&(this.FPager=t,this.Update(this.FOwner.FPaging.FSize,this.FOwner.FRowCount,this.FOwner.FPaging.FActivePage))},this.SetPagerAlign=function(t){this.FPagerAlign!==t&&(this.FPagerAlign=t,this.FOwner.ReRenderGrid())},this.Update=function(t,e,i){var s=null,n=null,r=null,a=null,o=0,l=0,h=0;if(null!=this.FElement&&(null!=this.FSearchElement&&(this.FSearchElement.parentElement.removeChild(this.FSearchElement),this.FSearchElement=null),null!=this.FFilterElement&&(this.FFilterElement.parentElement.removeChild(this.FFilterElement),this.FFilterElement=null),this.FSearch&&(this.FSearchElement=document.createElement("DIV"),this.FSearchElement.style.setProperty("float","left"),this.FSearchInput=document.createElement("INPUT"),""!==this.FInputElementClassName&&this.FSearchInput.setAttribute("class",this.FInputElementClassName),this.FSearchInput.style.setProperty("display","inline"),this.FSearchInput.style.setProperty("width","auto"),(a=document.createElement("IMG")).setAttribute("src",pas["WEBLib.Ctrls.SVG"].ICON_SEARCH),a.style.setProperty("vertical-align","middle"),a.style.setProperty("margin-right","10px"),this.FSearchElement.appendChild(this.FSearchInput),this.FSearchElement.appendChild(a),this.FElement.appendChild(this.FSearchElement),a.addEventListener("click",this.FSearchEventPtr),this.FSearchInput.value=this.FSearchValue),this.FFilter&&(this.FFilterElement=document.createElement("DIV"),this.FFilterElement.style.setProperty("float","left"),this.FFilterInput=document.createElement("INPUT"),""!==this.FInputElementClassName&&this.FFilterInput.setAttribute("class",this.FInputElementClassName),this.FFilterInput.style.setProperty("display","inline"),this.FFilterInput.style.setProperty("width","auto"),(a=document.createElement("IMG")).setAttribute("src",pas["WEBLib.Ctrls.SVG"].ICON_FILTER),a.style.setProperty("vertical-align","middle"),a.style.setProperty("margin-right","10px"),this.FFilterElement.appendChild(this.FFilterInput),this.FFilterElement.appendChild(a),this.FElement.appendChild(this.FFilterElement),a.addEventListener("click",this.FFilterEventPtr),this.FFilterInput.value=this.FFilterValue),h=0,this.FOwner.FRowHeader&&(h+=1),l=rtl.trunc((e-h)/t),(e-h)%t>0&&(l+=1),this.FOwner.FPaging.FPageCount=l,null!=this.FPagerElement&&(this.FPagerElement.parentElement.removeChild(this.FPagerElement),this.FPagerElement=null),this.FOwner.FPaging.FEnabled)){if(1===this.FPager){this.FPagerElement=document.createElement("SELECT"),""!==this.FDropDownElementClassName&&this.FPagerElement.setAttribute("class",this.FDropDownElementClassName),this.FPagerElement.addEventListener("change",this.FPageEventPtr);for(var d=0,u=l-1;d<=u;d++)o=d,(s=document.createElement("option")).text=pas["WEBLib.Utils"].TLongIntHelper.ToString.call({a:o+1,get:function(){return this.a},set:function(t){rtl.raiseE("EPropReadOnly")}}),s.setAttribute("data",pas["WEBLib.Utils"].TLongIntHelper.ToString.call({get:function(){return o},set:function(t){o=t}})),o===i&&s.setAttribute("selected","selected"),this.FPagerElement.add(s);var c=this.FPagerAlign;0===c?this.FPagerElement.style.setProperty("float","right"):2===c?this.FPagerElement.style.setProperty("float","left"):1===c&&(this.FPagerElement.style.removeProperty("float"),this.FPagerElement.style.setProperty("max-width","content"),this.FPagerElement.style.setProperty("margin-left","auto"),this.FPagerElement.style.setProperty("margin-right","auto")),this.FPagerElement.style.setProperty("display","inline"),this.FPagerElement.style.setProperty("width","auto"),this.FElement.appendChild(this.FPagerElement)}if(2===this.FPager){this.FPagerElement=document.createElement("DIV");for(var F=0,p=l-1;F<=p;F++)o=F,(n=document.createElement("A")).innerHTML=pas["WEBLib.Utils"].TLongIntHelper.ToString.call({a:o+1,get:function(){return this.a},set:function(t){rtl.raiseE("EPropReadOnly")}}),n.setAttribute("href","#"),""!==this.FLinkElementClassName&&(o===i&&""!==this.FLinkActiveElementClassName?n.setAttribute("class",this.FLinkActiveElementClassName):n.setAttribute("class",this.FLinkElementClassName)),n.style.setProperty("margin-right","4px"),n.style.setProperty("display","inline"),n.setAttribute("data",pas["WEBLib.Utils"].TLongIntHelper.ToString.call({get:function(){return o},set:function(t){o=t}})),n.addEventListener("click",this.FPageEventPtr),this.FPagerElement.appendChild(n);var S=this.FPagerAlign;0===S?this.FPagerElement.style.setProperty("float","right"):2===S?this.FPagerElement.style.setProperty("float","left"):1===S&&(this.FPagerElement.style.removeProperty("float"),this.FPagerElement.style.setProperty("max-width","content"),this.FPagerElement.style.setProperty("margin-left","auto"),this.FPagerElement.style.setProperty("margin-right","auto")),this.FElement.appendChild(this.FPagerElement)}if(3===this.FPager){this.FPagerElement=document.createElement("DIV");for(var m=0,C=l-1;m<=C;m++)o=m,(n=document.createElement("BUTTON")).innerHTML=pas["WEBLib.Utils"].TLongIntHelper.ToString.call({a:o+1,get:function(){return this.a},set:function(t){rtl.raiseE("EPropReadOnly")}}),""!==this.FButtonElementClassName&&(o===i&&""!==this.FButtonActiveElementClassName?n.setAttribute("class",this.FButtonActiveElementClassName):n.setAttribute("class",this.FButtonElementClassName)),n.setAttribute("data",pas["WEBLib.Utils"].TLongIntHelper.ToString.call({get:function(){return o},set:function(t){o=t}})),n.addEventListener("click",this.FPageEventPtr),n.style.setProperty("margin-right","4px"),this.FPagerElement.appendChild(n);var g=this.FPagerAlign;0===g?this.FPagerElement.style.setProperty("float","right"):2===g?this.FPagerElement.style.setProperty("float","left"):1===g&&(this.FPagerElement.style.removeProperty("float"),this.FPagerElement.style.setProperty("max-width","content"),this.FPagerElement.style.setProperty("margin-left","auto"),this.FPagerElement.style.setProperty("margin-right","auto")),this.FElement.appendChild(this.FPagerElement)}if(5===this.FPager){this.FPagerElement=document.createElement("DIV"),(n=document.createElement("BUTTON")).innerHTML="&#xab;",n.setAttribute("data","0"),""!==this.FButtonElementClassName&&n.setAttribute("class",this.FButtonElementClassName),n.addEventListener("click",this.FPageEventPtr),n.style.setProperty("margin-right","4px"),0===this.FOwner.FPaging.FActivePage&&n.setAttribute("disabled",""),this.FPagerElement.appendChild(n),(n=document.createElement("BUTTON")).innerHTML="&#x2039",n.setAttribute("data","1"),""!==this.FButtonElementClassName&&n.setAttribute("class",this.FButtonElementClassName),n.addEventListener("click",this.FPageEventPtr),n.style.setProperty("margin-right","4px"),0===this.FOwner.FPaging.FActivePage&&n.setAttribute("disabled",""),this.FPagerElement.appendChild(n),(n=document.createElement("BUTTON")).innerHTML="&#x203A;",n.setAttribute("data","2"),""!==this.FButtonElementClassName&&n.setAttribute("class",this.FButtonElementClassName),n.addEventListener("click",this.FPageEventPtr),n.style.setProperty("margin-right","4px"),this.FOwner.FPaging.FActivePage===this.FOwner.FPaging.FPageCount&&n.setAttribute("disabled",""),this.FPagerElement.appendChild(n),(n=document.createElement("BUTTON")).innerHTML="&#xbb;",n.setAttribute("data","3"),n.addEventListener("click",this.FPageEventPtr),""!==this.FButtonElementClassName&&n.setAttribute("class",this.FButtonElementClassName),n.style.setProperty("margin-right","4px"),this.FPagerElement.appendChild(n);var b=this.FPagerAlign;0===b?this.FPagerElement.style.setProperty("float","right"):2===b?this.FPagerElement.style.setProperty("float","left"):1===b&&(this.FPagerElement.style.removeProperty("float"),this.FPagerElement.style.setProperty("max-width","content"),this.FPagerElement.style.setProperty("margin-left","auto"),this.FPagerElement.style.setProperty("margin-right","auto")),this.FOwner.FPaging.FActivePage===this.FOwner.FPaging.FPageCount&&n.setAttribute("disabled",""),this.FElement.appendChild(this.FPagerElement)}if(4===this.FPager){this.FPagerElement=document.createElement("UL"),""!==this.FListElementClassName&&this.FPagerElement.setAttribute("class",this.FListElementClassName),this.FPagerElement.style.setProperty("margin","0px");for(var f=0,T=l-1;f<=T;f++)o=f,r=document.createElement("LI"),""!==this.FListItemElementClassName&&(o===i?r.setAttribute("class",this.FListItemElementClassName+" active"):r.setAttribute("class",this.FListItemElementClassName)),(n=document.createElement("A")).innerHTML=pas["WEBLib.Utils"].TLongIntHelper.ToString.call({a:o+1,get:function(){return this.a},set:function(t){rtl.raiseE("EPropReadOnly")}}),n.setAttribute("href","#"),n.setAttribute("data",pas["WEBLib.Utils"].TLongIntHelper.ToString.call({get:function(){return o},set:function(t){o=t}})),n.addEventListener("click",this.FPageEventPtr),""!==this.FListLinkElementClassName&&n.setAttribute("class",this.FListLinkElementClassName),r.appendChild(n),this.FPagerElement.appendChild(r);var y=this.FPagerAlign;0===y?this.FPagerElement.style.setProperty("float","right"):2===y?this.FPagerElement.style.setProperty("float","left"):1===y&&(this.FPagerElement.style.removeProperty("float"),this.FPagerElement.style.setProperty("max-width","content"),this.FPagerElement.style.setProperty("margin-left","auto"),this.FPagerElement.style.setProperty("margin-right","auto")),this.FElement.appendChild(this.FPagerElement)}}},this.HandlePagerClick=function(t){var e=0,i="";if(t.preventDefault(),t.stopPropagation(),!0,1===this.FPager)e=this.FPagerElement.selectedIndex;else if(5===this.FPager){i=t.target.getAttribute("data");var s=e=pas.SysUtils.StrToInt(i);if(0===s){if(!(this.FOwner.FPaging.FActivePage>0))return!0;e=0}else if(1===s){if(!(this.FOwner.FPaging.FActivePage>0))return!0;e=this.FOwner.FPaging.FActivePage-1}else if(2===s){if(!(this.FOwner.FPaging.FActivePage<this.FOwner.FPaging.FPageCount-1))return!0;e=this.FOwner.FPaging.FActivePage+1}else if(3===s){if(!(this.FOwner.FPaging.FActivePage<this.FOwner.FPaging.FPageCount-1))return!0;e=this.FOwner.FPaging.FPageCount-1}}else i=t.target.getAttribute("data"),e=pas.SysUtils.StrToInt(i);return this.FOwner.DoSelectPage(e),!0},this.HandleSearchClick=function(t){var e;return""!==(e=this.FSearchInput.value)&&e!==this.FSearchValue?(this.FSearchValue=e,this.FOwner.FindCell(this.FSearchValue,!0,!1)):this.FOwner.FindNext(),!0,!0},this.HandleFilterClick=function(t){var e;return""!==(e=this.FFilterInput.value)&&e===this.FFilterValue||this.FOwner.RemoveFilter(),""!==e&&(this.FFilterValue=e,this.FOwner.SetFilter(this.FFilterColumn,this.FFilterValue,!0)),!0,!0},this.Create$1=function(t){return pas.System.TObject.Create.call(this),this.FOwner=t,this.FPagerElement=null,this.FPagerAlign=0,this.FPageEventPtr=rtl.createCallback(this,"HandlePagerClick"),this.FSearchEventPtr=rtl.createCallback(this,"HandleSearchClick"),this.FFilterEventPtr=rtl.createCallback(this,"HandleFilterClick"),this},this.Assign=function(e){t.TTableControlHeader.isPrototypeOf(e)&&(this.FCaption=rtl.as(e,t.TTableControlHeader).FCaption,this.FVisible=rtl.as(e,t.TTableControlHeader).FVisible,this.FPager=rtl.as(e,t.TTableControlHeader).FPager,this.FPagerAlign=rtl.as(e,t.TTableControlHeader).FPagerAlign,this.FButtonActiveElementClassName=rtl.as(e,t.TTableControlHeader).FButtonActiveElementClassName,this.FButtonElementClassName=rtl.as(e,t.TTableControlHeader).FButtonElementClassName,this.FLinkActiveElementClassName=rtl.as(e,t.TTableControlHeader).FLinkActiveElementClassName,this.FLinkElementClassName=rtl.as(e,t.TTableControlHeader).FLinkElementClassName,this.FDropDownElementClassName=rtl.as(e,t.TTableControlHeader).FDropDownElementClassName,this.FInputElementClassName=rtl.as(e,t.TTableControlHeader).FInputElementClassName,this.FFilterColumn=rtl.as(e,t.TTableControlHeader).FFilterColumn,this.FFilter=rtl.as(e,t.TTableControlHeader).FFilter,this.FSearch=rtl.as(e,t.TTableControlHeader).FSearch,this.FListElementClassName=rtl.as(e,t.TTableControlHeader).FListElementClassName,this.FListItemElementClassName=rtl.as(e,t.TTableControlHeader).FListItemElementClassName,this.FListLinkElementClassName=rtl.as(e,t.TTableControlHeader).FListLinkElementClassName)};var e=this.$rtti;e.addProperty("FilterColumn",0,rtl.longint,"FFilterColumn","FFilterColumn",4,{Default:0}),e.addProperty("Filter",0,rtl.boolean,"FFilter","FFilter",4,{Default:!1}),e.addProperty("Search",0,rtl.boolean,"FSearch","FSearch",4,{Default:!1}),e.addProperty("ButtonActiveElementClassName",0,pas["WEBLib.Controls"].$rtti.TElementClassName,"FButtonActiveElementClassName","FButtonActiveElementClassName"),e.addProperty("ButtonElementClassName",0,pas["WEBLib.Controls"].$rtti.TElementClassName,"FButtonElementClassName","FButtonElementClassName"),e.addProperty("DropDownElementClassName",0,pas["WEBLib.Controls"].$rtti.TElementClassName,"FDropDownElementClassName","FDropDownElementClassName"),e.addProperty("InputElementClassName",0,pas["WEBLib.Controls"].$rtti.TElementClassName,"FInputElementClassName","FInputElementClassName"),e.addProperty("LinkActiveElementClassName",0,pas["WEBLib.Controls"].$rtti.TElementClassName,"FLinkActiveElementClassName","FLinkActiveElementClassName"),e.addProperty("LinkElementClassName",0,pas["WEBLib.Controls"].$rtti.TElementClassName,"FLinkElementClassName","FLinkElementClassName"),e.addProperty("ListElementClassName",0,pas["WEBLib.Controls"].$rtti.TElementClassName,"FListElementClassName","FListElementClassName"),e.addProperty("ListLinkElementClassName",0,pas["WEBLib.Controls"].$rtti.TElementClassName,"FListLinkElementClassName","FListLinkElementClassName"),e.addProperty("ListItemElementClassName",0,pas["WEBLib.Controls"].$rtti.TElementClassName,"FListItemElementClassName","FListItemElementClassName"),e.addProperty("Caption",2,rtl.string,"FCaption","SetCaption"),e.addProperty("Pager",2,t.$rtti.TTablePager,"FPager","SetPager"),e.addProperty("PagerAlign",2,t.$rtti.TTablePagerAlign,"FPagerAlign","SetPagerAlign",4,{Default:t.TTablePagerAlign.paRight}),e.addProperty("Visible",2,rtl.boolean,"FVisible","SetVisible",4,{Default:!1})})),rtl.createClass(this,"TTableControlPaging",pas.Classes.TPersistent,(function(){this.$init=function(){pas.Classes.TPersistent.$init.call(this),this.FOwner=null,this.FSize=0,this.FIndex=0,this.FEnabled=!1,this.FActivePage=0,this.FPageCount=0},this.$final=function(){this.FOwner=void 0,pas.Classes.TPersistent.$final.call(this)},this.SetIndex=function(t){if(this.FIndex!==t&&t>=0){if(0!==this.FOwner.FPaging.FSize&&!(t<rtl.trunc(this.FOwner.FRowCount/this.FOwner.FPaging.FSize)))return;this.FActivePage=t,this.FIndex=t,this.FOwner.DoSelectPage(this.FIndex)}},this.SetSize=function(t){var e=0;this.FSize!==t&&(e=this.FSize,this.FSize=t,this.FOwner.RowCountChanged(this.FSize-e),this.FOwner.GridChanged())},this.SetEnabled=function(t){var e=0;this.FEnabled!==t&&(this.FEnabled=t,e=0,this.FOwner.FRowHeader&&(e=1),this.FEnabled?this.FOwner.RowCountChanged(this.FSize+e-this.FOwner.FRowCount):this.FOwner.RowCountChanged(this.FOwner.FRowCount-this.FSize-e),this.FOwner.ReRenderGrid())},this.Create$1=function(t){return pas.System.TObject.Create.call(this),this.FOwner=t,this.FSize=10,this.FIndex=0,this},this.Assign=function(e){t.TTableControlPaging.isPrototypeOf(e)&&(this.FEnabled=rtl.as(e,t.TTableControlPaging).FEnabled,this.FSize=rtl.as(e,t.TTableControlPaging).FSize,this.FIndex=rtl.as(e,t.TTableControlPaging).FActivePage)};var e=this.$rtti;e.addProperty("Enabled",2,rtl.boolean,"FEnabled","SetEnabled",4,{Default:!1}),e.addProperty("Index",2,rtl.longint,"FActivePage","SetIndex",4,{Default:0}),e.addProperty("Size",2,rtl.longint,"FSize","SetSize",4,{Default:10})})),rtl.createClass(this,"TTableControlOptions",pas.Classes.TPersistent,(function(){this.$init=function(){pas.Classes.TPersistent.$init.call(this),this.FOwner=null,this.FScrollVertical=!1,this.FResizeColumns=!1,this.FAutoCellURL=!1,this.FAutoCellEmail=!1,this.FAutoCellImage=!1,this.FCellBorderColor=0,this.FCellBorders=!1,this.FAutoNumAlign=!1,this.FImageAlign=0,this.FImageWidth=0},this.$final=function(){this.FOwner=void 0,pas.Classes.TPersistent.$final.call(this)},this.SetResizeColumns=function(t){this.FResizeColumns=t,this.FOwner.EnableColResize()},this.SetCellBorderColor=function(t){this.FCellBorderColor=t,this.FOwner.RenderGridBorders()},this.SetCellBorders=function(t){this.FCellBorders=t,this.FOwner.RenderGridBorders()},this.SetScrollVertical=function(t){this.FScrollVertical=t,this.FOwner.UpdateElement()},this.Create$1=function(t){return this.FOwner=t,this.FCellBorderColor=12632256,this.FImageAlign=0,this.FImageWidth=0,this},this.Assign=function(e){t.TTableControlOptions.isPrototypeOf(e)&&(this.FScrollVertical=rtl.as(e,t.TTableControlOptions).FScrollVertical,this.FResizeColumns=rtl.as(e,t.TTableControlOptions).FResizeColumns,this.FAutoCellURL=rtl.as(e,t.TTableControlOptions).FAutoCellURL,this.FAutoCellEmail=rtl.as(e,t.TTableControlOptions).FAutoCellEmail,this.FAutoCellImage=rtl.as(e,t.TTableControlOptions).FAutoCellImage,this.FAutoNumAlign=rtl.as(e,t.TTableControlOptions).FAutoNumAlign,this.FCellBorders=rtl.as(e,t.TTableControlOptions).FCellBorders,this.FCellBorderColor=rtl.as(e,t.TTableControlOptions).FCellBorderColor,this.FImageWidth=rtl.as(e,t.TTableControlOptions).FImageWidth,this.FImageAlign=rtl.as(e,t.TTableControlOptions).FImageAlign)};var e=this.$rtti;e.addProperty("AutoCellEmail",0,rtl.boolean,"FAutoCellEmail","FAutoCellEmail",4,{Default:!1}),e.addProperty("AutoCellURL",0,rtl.boolean,"FAutoCellURL","FAutoCellURL",4,{Default:!1}),e.addProperty("AutoCellImage",0,rtl.boolean,"FAutoCellImage","FAutoCellImage",4,{Default:!1}),e.addProperty("AutoNumAlign",0,rtl.boolean,"FAutoNumAlign","FAutoNumAlign",4,{Default:!1}),e.addProperty("CellBorders",2,rtl.boolean,"FCellBorders","SetCellBorders",4,{Default:!1}),e.addProperty("CellBorderColor",2,pas["WEBLib.Graphics"].$rtti.TColor,"FCellBorderColor","SetCellBorderColor",4,{Default:12632256}),e.addProperty("ImageAlign",0,pas.Classes.$rtti.TAlignment,"FImageAlign","FImageAlign",4,{Default:pas.Classes.TAlignment.taLeftJustify}),e.addProperty("ImageWidth",0,rtl.longint,"FImageWidth","FImageWidth",4,{Default:0}),e.addProperty("ScrollVertical",2,rtl.boolean,"FScrollVertical","SetScrollVertical",4,{Default:!1}),e.addProperty("ResizeColumns",2,rtl.boolean,"FResizeColumns","SetResizeColumns",4,{Default:!1})})),this.$rtti.$MethodVar("TPageSelectEvent",{procsig:rtl.newTIProcSig([["Sender",pas.System.$rtti.TObject],["NewPage",rtl.longint],["Allow",rtl.boolean,1],["DefaultSelect",rtl.boolean,1]]),methodkind:0}),rtl.createClass(this,"TCustomTableControl",this.TCustomGrid,(function(){this.$init=function(){t.TCustomGrid.$init.call(this),this.FData=void 0,this.FUnfiltered=void 0,this.FTable=null,this.FBody=null,this.FRowHeader=!1,this.FColHeader=!1,this.FFindCol=0,this.FFindRow=0,this.FFindCase=!1,this.FFindCondition="",this.FElementHeaderClassName="",this.FElementTableClassName="",this.FOnHttpRequestError=null,this.FOnHttpRequestSuccess=null,this.FOnDblClickCell=null,this.FOnClickCell=null,this.FOptions=null,this.FOnGetCellClass=null,this.FOnGetCellData=null,this.FOnGetCellChildren=null,this.FOnCheckClick=null,this.FOnButtonClick=null,this.FHandleCheckClickPtr=null,this.FHandleButtonClickPtr=null,this.FOnSortClick=null,this.FSortIndex=0,this.FSortDirection=0,this.FElementSelectionClassName="",this.FElementRowSelectClassName="",this.FRowIndex=0,this.FSelectionTextColor=0,this.FSelectionColor=0,this.FHeader=null,this.FFooter=null,this.FPaging=null,this.FOnSelectPage=null,this.FHiddenCols=null,this.FWordWrap=!1},this.$final=function(){this.FTable=void 0,this.FBody=void 0,this.FOnHttpRequestError=void 0,this.FOnHttpRequestSuccess=void 0,this.FOnDblClickCell=void 0,this.FOnClickCell=void 0,this.FOptions=void 0,this.FOnGetCellClass=void 0,this.FOnGetCellData=void 0,this.FOnGetCellChildren=void 0,this.FOnCheckClick=void 0,this.FOnButtonClick=void 0,this.FOnSortClick=void 0,this.FHeader=void 0,this.FFooter=void 0,this.FPaging=void 0,this.FOnSelectPage=void 0,this.FHiddenCols=void 0,t.TCustomGrid.$final.call(this)},this.GetCells=function(t,e){var i="",s="",n=0;if(i="",n=0,this.FHeader.FVisible&&(n=1),this.RenderRowCount(),this.FRowHeader&&1,t>=0&&e>=0&&t<this.FColCount&&n<2){var r=this.FTable.rows[e+n].cells[t];s=r.textContent,r.childElementCount>0&&"DIV"==r.firstChild.tagName&&(s=r.firstChild.textContent),i=s}return i},this.SetCells=function(t,e,i){var s,n=0,r=null;null!=this.FTable&&(n=this.FRowCount,s=e,this.FRowHeader&&(n+=1),t>=0&&e>=0&&t<this.FColCount&&e<=n&&(0===e&&this.EnableColResize(),e<this.FData.length&&(this.FData[e][t]=i),this.FRowHeader&&(e-=1),(this.InVisiblePage({get:function(){return e},set:function(t){e=t}})||-1===e&&this.FRowHeader&&s<1)&&(this.FHeader.FVisible&&(e+=1),this.FRowHeader&&(e+=1),r=this.FTable.rows[e].cells[t],this.SetTableCell(t,e,r,i))))},this.GetCellElement=function(t,e){var i=null,s=0,n=0;return i=null,s=0,this.FHeader.FVisible&&(s=1),n=0,this.FColHeader&&(n=1),t>=0&&e>=0&&t<this.FColCount&&e<=this.RenderRowCount()+s+n&&null!=this.FTable&&this.FTable.rows.length>e+s&&this.FTable.rows[e+s].cells.length>t&&(i=this.FTable.rows[e+s].cells[t]),i},this.SetOptions=function(t){this.FOptions.Assign(t)},this.SetElementHeaderClassName=function(t){var e=null;this.FElementHeaderClassName!==t&&(this.FElementHeaderClassName=t,null!=this.FTable&&null!=(e=this.FTable.firstChild)&&"THEAD"===e.tagName&&e.setAttribute("class",this.FElementHeaderClassName))},this.SetElementTableClassName=function(t){this.FElementTableClassName!==t&&(this.FElementTableClassName=t,null!=this.FTable&&this.FTable.setAttribute("class",this.FElementTableClassName))},this.SetColHeader=function(t){this.FColHeader!==t&&(this.FColHeader=t,null!=this.FTable&&(0 in this.FComponentState||this.ReRenderGrid()))},this.SetRowHeader=function(t){this.FRowHeader!==t&&(this.FRowHeader=t,null!=this.FTable&&(0 in this.FComponentState||this.ReRenderGrid()))},this.SetRowIndex=function(t){var e=null;-1!==this.FRowIndex&&null!=(e=this.GetCellElement(0,this.FRowIndex))&&(""===this.FElementRowSelectClassName?(e.parentElement.style.removeProperty("color"),e.parentElement.style.removeProperty("background-color")):e.parentElement.className=""),this.FRowIndex=t,-1!==this.FRowIndex&&null!=(e=this.GetCellElement(0,this.FRowIndex))&&(""===this.FElementRowSelectClassName?(-1!==this.FSelectionTextColor&&e.parentElement.style.setProperty("color",pas["WEBLib.Graphics"].ColorToHTML(this.FSelectionTextColor)),-1!==this.FSelectionColor&&e.parentElement.style.setProperty("background-color",pas["WEBLib.Graphics"].ColorToHTML(this.FSelectionColor))):e.parentElement.classList.add(this.FElementRowSelectClassName))},this.SetSelectionColor=function(t){this.FSelectionColor!==t&&(this.FSelectionColor=t,this.UpdateElement())},this.SetSelectionTextColor=function(t){this.FSelectionTextColor!==t&&(this.FSelectionTextColor=t,this.UpdateElement())},this.SetFooter=function(t){this.FFooter.Assign(t)},this.SetHeader=function(t){this.FHeader.Assign(t)},this.SetPaging=function(t){this.FPaging.Assign(t)},this.SetTableCell=function(t,e,i,s){var n,r="",a="",o="";if(4 in this.FComponentState&&""===this.FElementTableClassName&&!this.FOptions.FCellBorders)return i.style.borderRight="1px dashed gray",i.style.borderBottom="1px dashed gray",void(i.innerHTML="&nbsp;");if(this.FOptions.FAutoCellEmail&&/\S+@\S+\.\S+/.test(s))a='<a href="mailto:'+s+'">'+s+"</a>";else if(this.FOptions.FAutoCellImage&&function(t){return/\.(jpg|jpeg|png|webp|avif|gif)$/.test(t)}(s)){a=this.FOptions.FImageWidth>0?'<img src="'+s+'" width="'+pas["WEBLib.Utils"].TLongIntHelper.ToString.call({p:this.FOptions,get:function(){return this.p.FImageWidth},set:function(t){this.p.FImageWidth=t}})+'px">':'<img src="'+s+'">';var l=this.FOptions.FImageAlign;2===l?i.setAttribute("align","center"):1===l&&i.setAttribute("align","right")}else this.FOptions.FAutoCellURL&&function(t){try{url=new URL(t)}catch(t){return!1}return"http:"===url.protocol||"https:"===url.protocol}(s)?a='<a href="'+s+'">'+s+"</a>":(a=s,!this.FOptions.FAutoNumAlign||("string"!=typeof(n=s)||isNaN(n)||isNaN(parseFloat(n)))||i.setAttribute("align","right"));this.FWordWrap?i.innerHTML=a:i.innerHTML='<div style="overflow: hidden; text-overflow: ellipsis; white-space:nowrap;">'+a+"</div>",""===this.FElementTableClassName&&this.FOptions.FCellBorders&&(r=pas["WEBLib.Graphics"].ColorToHTML(this.FOptions.FCellBorderColor),i.style.borderRight="1px solid "+r,i.style.borderBottom="1px solid "+r),o="",this.GetCellClassName(t,e,null,s,{get:function(){return o},set:function(t){o=t}}),""!==o&&i.setAttribute("class",o)},this.SetWordWrap=function(t){this.FWordWrap!==t&&(this.FWordWrap=t,null!=this.FTable&&(0 in this.FComponentState||this.ReRenderGrid()))},this.ClearMethodPointers=function(){pas["WEBLib.Controls"].TControl.ClearMethodPointers.call(this),this.FHandleCheckClickPtr=null,this.FHandleButtonClickPtr=null},this.GetMethodPointers=function(){pas["WEBLib.Controls"].TControl.GetMethodPointers.call(this),this.FHandleCheckClickPtr=rtl.createCallback(this,"HandleCheckBoxClick"),this.FHandleButtonClickPtr=rtl.createCallback(this,"HandleButtonClick")},this.HandleDoKeyPress=function(t){return pas["WEBLib.Controls"].TControl.HandleDoKeyPress.apply(this,arguments),!0},this.HandleDoClick=function(t){var e=!1,i=0,s=0,n=null,r=0,a="",o="";if(n=t.target,"BUTTON"===pas.SysUtils.UpperCase(n.tagName))return e;if("INPUT"===pas.SysUtils.UpperCase(n.tagName)&&(o=n.getAttribute("type"),pas.System.Assigned(o)&&"CHECKBOX"===pas.SysUtils.UpperCase(o)))return e;r=0,"SPAN"===n.tagName&&("up"===n.getAttribute("sort")?r=1:"dn"===n.getAttribute("sort")&&(r=2));do{"td"!==(a=n.tagName.toLowerCase())&&"th"!==a&&(n=n.parentElement)}while("td"!==a&&"th"!==a&&null!==n);"td"!==a&&"th"!==a||(i=n.cellIndex,s=n.parentElement.rowIndex,this.FHeader.FVisible&&(s-=1),this.FPaging.FEnabled&&(s+=this.FPaging.FActivePage*this.FPaging.FSize),null!=this.FOnClickCell&&0===r&&this.FEnabled&&this.FOnClickCell(this,i,s));return 1===r?(this.DoSortClick(i,s,2),this.SetSortIndicator(i,s,2)):2===r&&(this.DoSortClick(i,s,1),this.SetSortIndicator(i,s,1)),null!=this.FOnClick&&this.FOnClick(this),e=!0},this.HandleDoDblClick=function(t){var e,i=0,s=0;"TD"!==(e=t.target).tagName&&"TH"!==e.tagName||(i=e.cellIndex,s=e.parentElement.rowIndex,this.FPaging.FEnabled&&(s+=this.FPaging.FActivePage*this.FPaging.FSize),null!=this.FOnDblClickCell&&this.FOnDblClickCell(this,i,s));return!0,!0},this.HandleCheckBoxClick=function(t){var e,i=0,s=0;i=-1,s=-1;var n=t.target;e=n.checked;var r=n.parentElement;("div"==r.tagName.toLowerCase()&&(r=r.parentElement),"td"==r.tagName.toLowerCase())&&(s=r.cellIndex,i=r.parentElement.rowIndex);"th"==r.tagName.toLowerCase()&&(s=r.cellIndex,i=r.parentElement.rowIndex);return this.FPaging.FEnabled&&(i+=this.FPaging.FActivePage*this.FPaging.FSize),-1!==i&&-1!==s&&this.DoCheckClick(s,i,e),!0},this.HandleButtonClick=function(t){var e=0,i=0;e=-1,i=-1;var s=t.target.parentElement;("div"==s.tagName.toLowerCase()&&(s=s.parentElement),"td"==s.tagName.toLowerCase())&&(i=s.cellIndex,e=s.parentElement.rowIndex);return this.FPaging.FEnabled&&(e+=this.FPaging.FActivePage*this.FPaging.FSize),-1!==e&&-1!==i&&this.DoButtonClick(i,e),!0},this.HandleDoMouseUp=function(t){return pas["WEBLib.Controls"].TControl.HandleDoMouseUp.apply(this,arguments),resetResize(),!0},this.HandleDoMouseMove=function(t){var e=!1;return pas["WEBLib.Controls"].TControl.HandleDoMouseMove.apply(this,arguments),e=this.FWidthStyle in rtl.createSet(2),autoWidth=e,resizeColumn(t),!0},this.HandleDoMouseDown=function(t){var e=0,i=null,s=null,n="";if(!0,!this.FEnabled)return!0;i=t.target,n="",s=null;do{"td"!==(n=i.tagName.toLowerCase())&&"th"!==n&&(i=i.parentElement)}while("td"!==n&&"th"!==n&&null!==i);if("td"===n||"th"===n){if(e=(s=i.parentElement).rowIndex,this.FHeader.FVisible&&(e-=1),e>(this.FPaging.FEnabled?this.FPaging.FSize:this.FRowCount))return!0;("td"===n||"th"===n&&this.FEnabled)&&"thead"!==(n=s.parentElement.tagName.toLowerCase())&&this.SetRowIndex(e)}return!0},this.DoCheckClick=function(t,e,i){null!=this.FOnCheckClick&&this.FOnCheckClick(this,t,e,i)},this.DoButtonClick=function(t,e){null!=this.FOnButtonClick&&this.FOnButtonClick(this,t,e)},this.DoSortClick=function(t,e,i){var s=0;this.FSortIndex=t;for(var n=0,r=this.FColCount-1;n<=r;n++)s=n,this.SelectSortIndicator(s,e,s===t);this.FSortDirection=i,null!=this.FOnSortClick&&this.FOnSortClick(this,t,e,i),this.Sort(t,i)},this.GetCellClassName=function(t,e,i,s,n){null!=this.FOnGetCellClass&&this.FOnGetCellClass(this,t,e,i,s,n)},this.RenderGrid=function(){var t=0,e=null,i=null,s=null,n=0,r=0,a=0,o=0,l=!1,h=!1,d="",u="",c="",F=0;if(null==this.FTable){for(this.FTable=document.createElement("TABLE"),this.GetElementHandle().appendChild(this.FTable),pas["WEBLib.Controls"].SetHTMLElementFont(this.FTable,this.FFont,!(""===this.FElementClassName&&0===this.FElementFont)),(e=this.FTable).setAttribute("id",this.FName+"Table"),e.style.setProperty("vertical-align","middle"),n=this.RenderRowCount(),r=this.FColCount,l=this.FRowHeader,h=this.FColHeader,o=this.FRowCount,u="",F=0,a=0,""===this.FElementTableClassName?(e.style.setProperty("border-collapse","collapse"),e.setAttribute("border","0"),e.setAttribute("cellpadding","0"),e.setAttribute("cellspacing","0"),e.setAttribute("width","100%"),e.setAttribute("table-layout","fixed"),e.setAttribute("height","100%")):e.setAttribute("class",this.FElementTableClassName),d=this.FElementHeaderClassName;e.firstChild;)e.removeChild(e.firstChild);if(this.FHeader.FElement=null,this.FHeader.FVisible){F+=1,c=this.FHeader.FCaption;var p=e.createTHead();""!=d&&p.setAttribute("class",d);var S=p.insertRow(0);s=document.createElement("th"),S.appendChild(s),s.setAttribute("colspan",r),s.setAttribute("vertical-align","middle"),""!=c&&(s.innerHTML='<div style="float:left;margin-right:10px;vertical-align:middle">'+c+"</div>"),this.FHeader.FElement=s}t=0;var m=0;if(l){a++;p=e.createTHead();""!=d&&p.setAttribute("class",d);S=p.insertRow(F);for(t=0;t<r;t++){o>0?null==(u=this.FData[0][t])&&(u=""):u="",(s=document.createElement("th")).setAttribute("scope","col"),this.SetTableCell(t,0,s,u),S.appendChild(s)}}for(i=e.appendChild(document.createElement("tbody")),t=0;t<n&&!(t+a>=this.FData.length);t++){S=i.insertRow(i.length);for(m=0;m<r;m++)if(null==(u=this.FData[t+a][m])&&(u=""),0==m&&h){(s=document.createElement("th")).setAttribute("scope","row"),S.appendChild(s),this.SetTableCell(m,t+a,s,u)}else{S.insertCell();var C=S.cells[m];this.SetTableCell(m,t+a,C,u)}}if(this.FBody=i,this.FFooter.FElement=null,this.FFooter.FVisible){F+=1,c=this.FFooter.FCaption;p=e.createTFoot();""!=d&&p.setAttribute("class",d);S=p.insertRow(0);s=document.createElement("th"),S.appendChild(s),s.setAttribute("colspan",r),s.innerHTML=c,this.FFooter.FElement=s}1===this.FDragMode&&this.EnableDrag()}if(this.FOptions.FResizeColumns,this.EnableColResize(),this.FHiddenCols.GetCount()>0)for(var g=0,b=this.FColCount-1;g<=b;g++)t=g,this.IsHiddenColumn(t)&&this.HideColumn(t)},this.ReRenderGrid=function(){null==this.GetElementHandle()||this.IsUpdating()||(null!=this.FTable&&this.FTable.parentElement.removeChild(this.FTable),this.FTable=null,this.RenderGrid(),this.RenderHeaderFooter())},this.RenderGridBorders=function(){for(var t=0,e=0,i=null,s="",n=0,r=this.FColCount-1;n<=r;n++){t=n;for(var a=0,o=this.RenderRowCount();a<=o;a++)e=a,null!=(i=this.GetCellElement(t,e))&&(this.FOptions.FCellBorders?(s=pas["WEBLib.Graphics"].ColorToHTML(this.FOptions.FCellBorderColor),i.style.borderRight="1px solid "+s,i.style.borderBottom="1px solid "+s):(i.style.borderRight="",i.style.borderBottom=""))}},this.RenderGridScript=function(){this.AddControlScriptSource('var pageX,curCol,nxtCol,curColWidth,nxtColWidth,autoWidth,curTable,curTableWidth;autoWidth = false;function resizeColumn(e) {   if (curCol) {    var diffX = e.pageX - pageX;\t\tif ((nxtCol) && (!autoWidth)){\t\t nxtCol.style.width = (nxtColWidth - diffX)+"px";   } else {   }   newColWidth = (curColWidth + diffX);   if (newColWidth < 10)    newColWidth = 10;\t  curCol.style.width = newColWidth + "px";   } }function resetResize() {   curCol = undefined;   nxtCol = undefined;   pageX = undefined;   nxtColWidth = undefined;   curColWidth = undefined;   curTable = undefined;   curTableWidth = undefined; }function resizableGrid(tablename, enabled,ridx) { var table = document.getElementById(tablename + "Table"); if (!table) return; var row = table.getElementsByTagName("tr")[ridx], cols = row ? row.children : undefined; if (!cols) return; for (var i=0;i<cols.length;i++){  var coldiv = document.getElementById(tablename + "Div" + i);  if (coldiv)    coldiv.remove();  if (enabled) {    var div = createDiv();    cols[i].appendChild(div);    cols[i].style.position = "relative";    div.id = tablename + "Div" + i;    setListeners(div);  } } function setListeners(div){  div.addEventListener("mousedown", function (e) {   curCol = e.target.parentElement;   nxtCol = curCol.nextElementSibling;   pageX = e.pageX;   curColWidth = curCol.offsetWidth;   curTable = curCol.parentElement.parentElement.parentElement;   curTableWidth = curTable.offsetWidth;   if (nxtCol)    nxtColWidth = nxtCol.offsetWidth;  });  div.addEventListener("mouseover", function (e) {   e.target.style.borderRight = "2px solid #0000ff";  });  div.addEventListener("mouseout", function (e) {   e.target.style.borderRight = "";  });  document.addEventListener("mousemove", function (e) {   resizeColumn(e);  });  document.addEventListener("mouseup", function (e) {   resetResize(e);  }); } function createDiv(){  var div = document.createElement("div");  div.style.top = 0;  div.style.right = 0;  div.style.width = "10px";  div.style.position = "absolute";  div.style.cursor = "col-resize";  div.style.userSelect = "none";  div.style.height = "100%";  div.innerHTML = "&nbsp;";  return div; }};')},this.RenderHeaderFooter=function(){this.FHeader.FVisible&&this.FHeader.Update(this.FPaging.FSize,this.FRowCount,this.FPaging.FActivePage),this.FFooter.FVisible&&this.FFooter.Update(this.FPaging.FSize,this.FRowCount,this.FPaging.FActivePage)},this.BindEvents=function(){pas["WEBLib.Controls"].TCustomControl.BindEvents.call(this),this.RenderGridScript()},this.KeyDown=function(t,e){var i=0;pas["WEBLib.Controls"].TControl.KeyDown.apply(this,arguments),this.FEnabled&&(i=0,this.FRowHeader&&(i=1),38===t.get()&&this.SetRowIndex(Math.max(i,this.FRowIndex-1)),40===t.get()&&this.SetRowIndex(Math.min(this.FRowCount-1,this.FRowIndex+1)),36===t.get()&&this.SetRowIndex(i),35===t.get()&&this.SetRowIndex(this.FRowCount-1),34===t.get()&&this.SetRowIndex(Math.min(this.FRowCount-1,this.FRowIndex+4)),33===t.get()&&this.SetRowIndex(Math.max(i,this.FRowIndex-4)))},this.CreateElement=function(){var t;return t=document.createElement("DIV"),this.FTable=null,t},this.UpdateElement=function(){pas["WEBLib.Controls"].TControl.UpdateElement.call(this),this.IsUpdating()||null!=this.GetElementHandle()&&(this.FOptions.FScrollVertical?this.GetElementHandle().style.setProperty("overflow-y","scroll"):this.GetElementHandle().style.setProperty("height",""),4 in this.FComponentState&&(this.GetElementHandle().style.setProperty("width",pas.SysUtils.IntToStr(this.GetWidth())+"px"),this.GetElementHandle().style.setProperty("height",pas.SysUtils.IntToStr(this.GetHeight())+"px")),this.GetElementHandle().style.setProperty("user-select",""),0===this.FCursor&&this.GetElementHandle().style.setProperty("cursor",""),1!==this.FBorderStyle||-1===this.FBorderColor||""!==this.FElementClassName||""!==this.FElementTableClassName||this.GetIsLinked()?this.GetElementHandle().style.setProperty("border",""):this.GetElementHandle().style.setProperty("border","1px "+pas["WEBLib.Graphics"].ColorToHTML(this.FBorderColor)+" solid"),-1!==this.FColor&&16711422!==this.FColor?this.GetElementHandle().style.setProperty("background-color",pas["WEBLib.Graphics"].ColorToHTML(this.FColor)):this.GetElementHandle().style.setProperty("background-color",""),this.RenderGrid())},this.SetRowCount=function(t){var e=0,i=0,s=0,n=0;if(this.FRowCount!==t&&t>=0){for(i=t,this.FData.length=i,n=0;n<this.FData.length;n++)null==this.FData[n]&&(this.FData[n]=[],this.FData[n].length=this.FColCount);if(e=t-this.FRowCount,0===this.FRowCount&&this.FRowHeader&&(e=t-1),this.FRowCount=t,this.RowCountChanged(e),this.GridChanged(),this.FPaging.FEnabled){i=0,s=0,this.FRowHeader&&(i+=1),this.FHeader.FVisible&&(s+=1);for(var r=this.FPaging.FSize+i+s,a=this.FRowCount-1+s;r<=a;r++)n=r,this.HideRow(n)}0!==this.FHeader.FPager&&this.FHeader.Update(this.FPaging.FSize,this.FRowCount,this.FPaging.FActivePage),0!==this.FFooter.FPager&&this.FFooter.Update(this.FPaging.FSize,this.FRowCount,this.FPaging.FActivePage)}},this.SetColCount=function(e){var i;for(t.TCustomGrid.SetColCount.apply(this,arguments),i=0;i<this.FData.length;i++)null==this.FData[i]&&(this.FData[i]=[]),this.FData[i].length=e},this.RowCountChanged=function(t){var e=null;if(null!=this.FTable){if(e=this.FBody,t>0){var i=0,s=0,n=void 0,r=e.rows.length;for(i=0;i<t;i++)for(n=e.insertRow(r),s=0;s<this.FColCount;s++)if(0==s&&this.FColHeader){var a=document.createElement("th");a.setAttribute("scope","row"),n.appendChild(a)}else n.insertCell();1===this.FDragMode&&this.EnableDrag()}if(t<0){i=0;if((r=this.FBody.rows.length)<-t)return;for(i=0;i<-t;i++)this.FBody.deleteRow(r-i-1)}}},this.ColCountChanged=function(t){var e=0,i=0,s="";if(!this.IsUpdating()&&null!=this.FTable){if(s="","",4 in this.FComponentState&&("1px dashed gray",s="&nbsp;"),e=0,i=this.RenderRowCount(),this.FRowHeader&&(i+=1),this.FHeader.FVisible&&(this.FHeader.FElement.setAttribute("colspan",pas["WEBLib.Utils"].TLongIntHelper.ToString.call({p:this,get:function(){return this.p.FColCount},set:function(t){this.p.FColCount=t}})),e=1,i+=1),this.FFooter.FVisible&&this.FFooter.FElement.setAttribute("colspan",pas["WEBLib.Utils"].TLongIntHelper.ToString.call({p:this,get:function(){return this.p.FColCount},set:function(t){this.p.FColCount=t}})),t>0){var n=0,r=0,a=0,o=void 0,l=void 0;for(r=e;r<i;r++)if(null!=(o=this.FTable.rows[r]))for(a=o.cells.length,n=0;n<t;n++){var h;if(r==e&&this.FRowHeader)(h=document.createElement("th")).setAttribute("scope","col"),o.appendChild(h),this.SetTableCell(n,r,h,s);else if(0==o.cells.length&&this.FColHeader)(h=document.createElement("th")).setAttribute("scope","row"),this.SetTableCell(n,r,h,s),o.appendChild(h);else l=o.insertCell(),l=o.cells[a],this.SetTableCell(n,r,l,s)}1===this.FDragMode&&this.EnableDrag()}if(t<0){n=0,r=0,a=0,o=void 0;for(r=e;r<i;r++)if(null!=(o=this.FTable.rows[r]))for(a=o.cells.length,n=0;n<-t;n++)a-n-1<a&&a-n-1>=0&&o.deleteCell(a-n-1)}}},this.EnableColResize=function(){var t,e,i=0;t=this.FName,e=this.FOptions.FResizeColumns,4 in this.FComponentState||(i=this.FHeader.FVisible?1:0,resizableGrid(t,e,i))},this.EnableDrag=function(){null!=this.GetContainer()&&function t(e){for(var i=0,s=0,n=e.children.length-1;s<=n;s++)i=s,"TD"===e.children.item(i).tagName?(e.children.item(i).setAttribute("draggable","true"),t(e.children.item(i))):t(e.children.item(i))}(this.GetContainer())},this.DisableDrag=function(){null!=this.GetContainer()&&function t(e){for(var i=0,s=0,n=e.children.length-1;s<=n;s++)i=s,"TD"===e.children.item(i).tagName?(e.children.item(i).removeAttribute("draggable"),t(e.children.item(i))):t(e.children.item(i))}(this.GetContainer())},this.FindFrom=function(e,i,s,n,r){var a=t.TGridCoord.$new(),o=0,l=0,h=0,d=0,u="";d=e,a.X=-1,a.Y=-1;for(var c=i,F=this.FRowCount-1;c<=F;c++){o=c;for(var p=d,S=this.FColCount-1;p<=S;p++)if(l=p,null!=(u=this.FData[o][l])&&pas["WEBLib.Utils"].MatchStr("*"+s+"*",u,n))return a.X=l,a.Y=o,this.FFindCol=l,this.FFindRow=o,this.FPaging.FEnabled&&(h=rtl.trunc((o-i)/this.FPaging.FSize),this.SelectPage(h,!0),this.FFindRow=o%this.FPaging.FSize,this.FFindRow<i&&(this.FFindRow=this.FPaging.FSize),a.Y=this.FFindRow),this.ScrollRowInView(this.FFindRow),this.SelectCell(l,this.FFindRow),a;d=this.FColHeader&&!r?1:0}return a},this.RenderRowCount=function(){return this.FPaging.FEnabled&&this.FPaging.FSize>0?this.FPaging.FSize:this.FRowHeader?this.FRowCount-1:this.FRowCount},this.InVisiblePage=function(t){var e=!1;return this.FPaging.FEnabled?(e=t.get()>=this.FPaging.FSize*this.FPaging.FActivePage&&t.get()<this.FPaging.FSize*(this.FPaging.FActivePage+1),t.set(t.get()-this.FPaging.FSize*this.FPaging.FActivePage)):e=t.get()<=this.FRowCount,e},this.DoSelectPage=function(t){var e=!1,i=!1;e=!0,i=!0,null!=this.FOnSelectPage&&this.FOnSelectPage(this,t,{get:function(){return e},set:function(t){e=t}},{get:function(){return i},set:function(t){i=t}}),e&&this.SelectPage(t,i)},this.SelectPage=function(t,e){var i=0,s=0,n=0,r=0,a=0,o=null,l=null,h="";if(this.FPaging.FEnabled&&(this.FPaging.FActivePage=t,l=null,this.RenderHeaderFooter(),e)){n=this.FRowHeader?1:0,a=this.FHeader.FVisible?1:0,r=t*this.FPaging.FSize;for(var d=0,u=this.FPaging.FSize-1;d<=u;d++)if(i=d,null!=(o=this.FTable.rows[i+n+a])){if(r+i+n>=this.FRowCount){o.style.setProperty("display","none");continue}h="";for(var c=0,F=this.FColCount-1;c<=F;c++)s=c,null!=(h=this.FData[r+i+n][s])&&(l=o.cells[s],this.SetTableCell(s,i+n,l,h)),o.style.removeProperty("display")}}},this.Loaded=function(){pas["WEBLib.Controls"].TCustomControl.Loaded.call(this)},this.InitCSSLibrary=function(e){1===e&&(this.SetElementFont(1),this.SetElementHeaderClassName("thead-light"),this.SetElementTableClassName("table table-striped table-bordered  table-hover"),null==this.FHeader&&(this.FHeader=t.TTableControlHeader.$create("Create$1",[this])),this.FHeader.FButtonActiveElementClassName="btn btn-primary",this.FHeader.FButtonElementClassName="btn btn-light",this.FHeader.FLinkActiveElementClassName="link-primary",this.FHeader.FLinkElementClassName="link-secondary",this.FHeader.FListElementClassName="pagination",this.FHeader.FListLinkElementClassName="page-link",this.FHeader.FListItemElementClassName="page-item",this.FHeader.FDropDownElementClassName="form-control",this.FHeader.FInputElementClassName="form-control",null==this.FFooter&&(this.FFooter=t.TTableControlHeader.$create("Create$1",[this])),this.FFooter.FButtonActiveElementClassName="btn btn-primary",this.FFooter.FButtonElementClassName="btn btn-light",this.FFooter.FLinkActiveElementClassName="link-primary",this.FFooter.FLinkElementClassName="link-secondary",this.FFooter.FListElementClassName="pagination",this.FFooter.FListLinkElementClassName="page-link",this.FFooter.FListItemElementClassName="page-item",this.FFooter.FDropDownElementClassName="form-control",this.FFooter.FInputElementClassName="form-control")},this.Create$1=function(t){return this.FHeader=null,this.FFooter=null,pas["WEBLib.Controls"].TControl.Create$1.apply(this,arguments),this.SetTabStop(!1),this},this.CreateInitialize=function(){var e;for(pas["WEBLib.Controls"].TCustomControl.CreateInitialize.call(this),this.FOptions=t.TTableControlOptions.$create("Create$1",[this]),this.FData=null,this.FUnfiltered=null,null==this.FData&&(null==this.FHeader&&(this.FHeader=t.TTableControlHeader.$create("Create$1",[this])),null==this.FFooter&&(this.FFooter=t.TTableControlHeader.$create("Create$1",[this])),this.FPaging=t.TTableControlPaging.$create("Create$1",[this]),this.FHiddenCols=pas.Classes.TStringList.$create("Create$1"),this.FHiddenCols.FDuplicates=0),this.FData=[],this.FData.length=11,e=0;e<11;e++)null==this.FData[e]&&(this.FData[e]=[]),this.FData[e].length=5;this.FColCount=5,this.FRowCount=10,this.FRowHeader=!0,this.FColHeader=!0,this.FRowIndex=-1,this.FSelectionColor=16748379,this.FSelectionTextColor=16777215,this.SetEnabled(!0),4 in this.FComponentState&&(this.SetWidth(400),this.SetHeight(300))},this.Destroy=function(){rtl.free(this,"FHiddenCols"),rtl.free(this,"FOptions"),rtl.free(this,"FHeader"),rtl.free(this,"FFooter"),rtl.free(this,"FPaging"),pas["WEBLib.Controls"].TCustomControl.Destroy.call(this)},this.Invalidate=function(){pas["WEBLib.Controls"].TCustomControl.Invalidate.call(this),0 in this.FComponentState&&(this.ReRenderGrid(),this.FHeader.FVisible&&this.FHeader.Update(this.FPaging.FSize,this.FRowCount,this.FPaging.FActivePage),this.FFooter.FVisible&&this.FFooter.Update(this.FPaging.FSize,this.FRowCount,this.FPaging.FActivePage))},this.SelectSortIndicator=function(t,e,i){var s,n=null;s=this.FName+"si"+pas["WEBLib.Utils"].TLongIntHelper.ToString.call({get:function(){return t},set:function(t){rtl.raiseE("EPropReadOnly")}})+"_"+pas["WEBLib.Utils"].TLongIntHelper.ToString.call({get:function(){return e},set:function(t){rtl.raiseE("EPropReadOnly")}}),null!=(n=document.getElementById(s))&&(""===this.FElementSelectionClassName?i?n.style.setProperty("color",pas["WEBLib.Graphics"].ColorToHTML(16748379)):n.style.removeProperty("color"):i?n.classList.add(this.FElementSelectionClassName):n.classList.remove(this.FElementSelectionClassName))},this.SetSortIndicator=function(t,i,s){var n,r=null;n=this.FName+"si"+pas["WEBLib.Utils"].TLongIntHelper.ToString.call({get:function(){return t},set:function(t){rtl.raiseE("EPropReadOnly")}})+"_"+pas["WEBLib.Utils"].TLongIntHelper.ToString.call({get:function(){return i},set:function(t){rtl.raiseE("EPropReadOnly")}}),null!=(r=document.getElementById(n))&&(1===s?(r.innerHTML=e.GlyphAscending,r.setAttribute("sort","up")):(r.innerHTML=e.GlyphDescending,r.setAttribute("sort","dn")))},this.SetFilter=function(t,e,i){var s=0,n=0,r=0,a=0,o="";if(null!=this.FTable){if(""===e)return void this.RemoveFilter();if(r=0,n=0,this.FRowHeader&&(n=1),this.FHeader.FVisible&&(r=1),this.FPaging.FEnabled){pas.System.Assigned(this.FUnfiltered)||(this.FUnfiltered=Array.from(this.FData));for(var l=this.FRowCount-1,h=n;l>=h;l--)s=l,o=this.FData[s][t],!pas["WEBLib.Utils"].MatchStr(e,o,i)&&r<2&&this.FData.splice(s,1);a=this.FData.length,this.SetRowCount(a),this.SelectPage(this.FPaging.FActivePage,!0)}else for(var d=n,u=this.FRowCount-1;d<=u;d++)s=d,!pas["WEBLib.Utils"].MatchStr(e,this.GetCells(t,s),i)&&r<2&&this.FTable.rows[s+r].style.setProperty("display","none")}},this.RemoveFilter=function(){var t=0,e=0,i=0;if(null!=this.FTable)if(e=this.FColHeader?1:0,this.FPaging.FEnabled)pas.System.Assigned(this.FUnfiltered)&&(this.FData=Array.from(this.FUnfiltered),this.FUnfiltered=null),i=this.FData.length,this.SetRowCount(i),this.SelectPage(this.FPaging.FActivePage,!0);else for(var s=e,n=this.FRowCount-1;s<=n;s++)t=s,this.FTable.rows[t].style.removeProperty("display")},this.ScrollRowInView=function(t){t<this.FRowCount&&null!=this.FTable&&this.FTable.rows[t].scrollIntoView({behavior:"smooth",block:"center"})},this.SelectCell=function(t,e){var i=null;e<this.FRowCount&&t<this.FColCount&&null!=(i=this.GetCellElement(t,e))&&pas["WEBLib.Utils"].SelectElementContents(i)},this.FindCell=function(e,i,s){var n=t.TGridCoord.$new(),r=0,a=0;return r=this.FColHeader&&!s?1:0,a=this.FRowHeader?1:0,this.FFindCase=i,this.FFindCondition=e,n.$assign(this.FindFrom(r,a,e,i,s)),n},this.FindNext=function(){var e=t.TGridCoord.$new();return this.FFindCol+1===this.FRowCount?(this.FColHeader?this.FFindCol=1:this.FFindCol=0,this.FFindRow=this.FFindRow+1):this.FFindCol=this.FFindCol+1,e.$assign(this.FindFrom(this.FFindCol,this.FFindRow,this.FFindCondition,this.FFindCase,!1)),e},this.HideColumn=function(t){var e=0;if(!(t<0||t>this.FColCount)){for(e=this.FFooter.FVisible?1:0,i=0;i<this.FTable.rows.length-e;i++)tr=this.FTable.rows[i],td=tr.cells[t],td.style.setProperty("display","none");this.FHiddenCols.Add(pas["WEBLib.Utils"].TLongIntHelper.ToString.call({get:function(){return t},set:function(t){rtl.raiseE("EPropReadOnly")}}))}},this.IsHiddenColumn=function(t){return-1!==this.FHiddenCols.IndexOf(pas["WEBLib.Utils"].TLongIntHelper.ToString.call({get:function(){return t},set:function(t){rtl.raiseE("EPropReadOnly")}}))},this.HideRow=function(t){t<0||t>this.FRowCount||null!=this.FTable&&this.FTable.rows[t].style.setProperty("display","none")},this.Sort=function(t,e){var i,s,n,r=!1;if(null!=this.FTable)if(s=this.FTable.children.item(1),n=1===e,i=t,this.FPaging.FEnabled){(r=this.FRowHeader)&&(fixrow=this.FData[0]);const t=(t,e)=>t[e],e=(e,i)=>(s,n)=>{return r=t(i?s:n,e),a=t(i?n:s,e),""===r||""===a||isNaN(r)||isNaN(a)?r.toString().localeCompare(a):r-a;var r,a};var a=Array.from(this.FData);r&&a.shift(),a.sort(e(i,n)),r&&a.splice(0,0,fixrow),this.FData=a,this.SelectPage(this.FPaging.FActivePage,!0)}else{const t=(t,e)=>t.children[e].innerText||t.children[e].textContent,e=(e,i)=>(s,n)=>{return r=t(i?s:n,e),a=t(i?n:s,e),""===r||""===a||isNaN(r)||isNaN(a)?r.toString().localeCompare(a):r-a;var r,a},r=s;Array.from(r.querySelectorAll("tr")).sort(e(i,n)).forEach(t=>r.appendChild(t))}},rtl.addIntf(this,pas["WEBLib.Controls"].IControl),rtl.addIntf(this,pas.System.IUnknown);var s=this.$rtti;s.addProperty("Align",2,pas["WEBLib.Controls"].$rtti.TAlign,"FAlign","SetAlign",4,{Default:pas["WEBLib.Controls"].TAlign.alNone}),s.addProperty("AlignWithMargins",2,rtl.boolean,"FAlignWithMargins","SetAlignWithMargins",4,{Default:!1}),s.addProperty("Anchors",2,pas["WEBLib.Controls"].$rtti.TAnchors,"FAnchors","SetAnchors",4,{Default:rtl.createSet(0,1)}),s.addProperty("BorderColor",2,pas["WEBLib.Graphics"].$rtti.TColor,"FBorderColor","SetBorderColor",4,{Default:12632256}),s.addProperty("BorderStyle",2,pas["WEBLib.Controls"].$rtti.TBorderStyle,"FBorderStyle","SetBorderStyle",4,{Default:pas["WEBLib.Controls"].TBorderStyle.bsSingle}),s.addProperty("Color",2,pas["WEBLib.Graphics"].$rtti.TColor,"FColor","SetColor"),s.addProperty("DragMode",2,pas["WEBLib.Controls"].$rtti.TDragMode,"FDragMode","SetDragMode",4,{Default:pas["WEBLib.Controls"].TDragMode.dmManual}),s.addProperty("ElementClassName",2,pas["WEBLib.Controls"].$rtti.TElementClassName,"FElementClassName","SetElementClassName"),s.addProperty("ElementFont",2,pas["WEBLib.Controls"].$rtti.TElementFont,"FElementFont","SetElementFont",4,{Default:pas["WEBLib.Controls"].TElementFont.efProperty}),s.addProperty("ElementID",3,pas["WEBLib.Controls"].$rtti.TElementID,"GetID","SetID"),s.addProperty("ElementPosition",2,pas["WEBLib.Controls"].$rtti.TElementPosition,"FElementPosition","SetElementPosition",4,{Default:pas["WEBLib.Controls"].TElementPosition.epAbsolute}),s.addProperty("ElementHeaderClassName",2,pas["WEBLib.Controls"].$rtti.TElementClassName,"FElementHeaderClassName","SetElementHeaderClassName"),s.addProperty("ElementRowSelectClassName",0,pas["WEBLib.Controls"].$rtti.TElementClassName,"FElementRowSelectClassName","FElementRowSelectClassName"),s.addProperty("ElementSelectionClassName",0,pas["WEBLib.Controls"].$rtti.TElementClassName,"FElementSelectionClassName","FElementSelectionClassName"),s.addProperty("ElementTableClassName",2,pas["WEBLib.Controls"].$rtti.TElementClassName,"FElementTableClassName","SetElementTableClassName"),s.addProperty("Enabled",2,rtl.boolean,"FEnabled","SetEnabled",4,{Default:!1}),s.addProperty("Font",2,pas["WEBLib.Graphics"].$rtti.TFont,"FFont","SetFont"),s.addProperty("Footer",2,t.$rtti.TTableControlHeader,"FFooter","SetFooter"),s.addProperty("Header",2,t.$rtti.TTableControlHeader,"FHeader","SetHeader"),s.addProperty("Height",3,rtl.longint,"GetHeight","SetHeight"),s.addProperty("HeightPercent",2,rtl.double,"FHeightPercent","SetHeightPercent",4,{Default:100}),s.addProperty("HeightStyle",2,pas["WEBLib.Controls"].$rtti.TSizeStyle,"FHeightStyle","SetHeightStyle",4,{Default:pas["WEBLib.Controls"].TSizeStyle.ssAbsolute}),s.addProperty("Margins",2,pas["WEBLib.Controls"].$rtti.TMargins,"FMargins","SetMargins"),s.addProperty("RowHeader",2,rtl.boolean,"FRowHeader","SetRowHeader",4,{Default:!0}),s.addProperty("ColHeader",2,rtl.boolean,"FColHeader","SetColHeader",4,{Default:!0}),s.addProperty("Options",2,t.$rtti.TTableControlOptions,"FOptions","SetOptions"),s.addProperty("Paging",2,t.$rtti.TTableControlPaging,"FPaging","SetPaging"),s.addProperty("ParentBiDiMode",0,rtl.boolean,"FParentBiDiMode","FParentBiDiMode",4,{Default:!0}),s.addProperty("PopupMenu",0,pas["WEBLib.Menus"].$rtti.TPopupMenu,"FPopupMenu","FPopupMenu"),s.addProperty("SelectionColor",2,pas["WEBLib.Graphics"].$rtti.TColor,"FSelectionColor","SetSelectionColor",4,{Default:16748379}),s.addProperty("SelectionTextColor",2,pas["WEBLib.Graphics"].$rtti.TColor,"FSelectionTextColor","SetSelectionTextColor",4,{Default:16777215}),s.addProperty("Visible",2,rtl.boolean,"FVisible","SetVisible",4,{Default:!0}),s.addProperty("Width",3,rtl.longint,"GetWidth","SetWidth"),s.addProperty("WidthPercent",2,rtl.double,"FWidthPercent","SetWidthPercent",4,{Default:100}),s.addProperty("WidthStyle",2,pas["WEBLib.Controls"].$rtti.TSizeStyle,"FWidthStyle","SetWidthStyle",4,{Default:pas["WEBLib.Controls"].TSizeStyle.ssAbsolute}),s.addProperty("WordWrap",2,rtl.boolean,"FWordWrap","SetWordWrap",4,{Default:!1}),s.addProperty("OnButtonClick",0,t.$rtti.TCellEvent,"FOnButtonClick","FOnButtonClick"),s.addProperty("OnCheckClick",0,t.$rtti.TCellCheckEvent,"FOnCheckClick","FOnCheckClick"),s.addProperty("OnClick",0,pas["WEBLib.Controls"].$rtti.TNotifyEvent,"FOnClick","FOnClick"),s.addProperty("OnClickCell",0,t.$rtti.TCellEvent,"FOnClickCell","FOnClickCell"),s.addProperty("OnDblClickCell",0,t.$rtti.TCellEvent,"FOnDblClickCell","FOnDblClickCell"),s.addProperty("OnDblClick",0,pas["WEBLib.Controls"].$rtti.TNotifyEvent,"FOnDblClick","FOnDblClick"),s.addProperty("OnGetCellData",0,t.$rtti.TGridGetCellDataEvent,"FOnGetCellData","FOnGetCellData"),s.addProperty("OnGetCellChildren",0,t.$rtti.TGridGetCellChildrenEvent,"FOnGetCellChildren","FOnGetCellChildren"),s.addProperty("OnGetCellClass",0,t.$rtti.TGridGetCellClassEvent,"FOnGetCellClass","FOnGetCellClass"),s.addProperty("OnSortClick",0,t.$rtti.TGridSortClickEvent,"FOnSortClick","FOnSortClick"),s.addProperty("OnDragDrop",0,pas["WEBLib.Controls"].$rtti.TDragDropEvent,"FOnDragDrop","FOnDragDrop"),s.addProperty("OnDragOver",0,pas["WEBLib.Controls"].$rtti.TDragOverEvent,"FOnDragOver","FOnDragOver"),s.addProperty("OnEndDrag",0,pas["WEBLib.Controls"].$rtti.TEndDragEvent,"FonEndDrag","FonEndDrag"),s.addProperty("OnResize",0,pas["WEBLib.Controls"].$rtti.TNotifyEvent,"FOnResize","FOnResize"),s.addProperty("OnSelectPage",0,t.$rtti.TPageSelectEvent,"FOnSelectPage","FOnSelectPage"),s.addProperty("OnStartDrag",0,pas["WEBLib.Controls"].$rtti.TStartDragEvent,"FOnStartDrag","FOnStartDrag")})),rtl.createClass(this,"TTableControl",this.TCustomTableControl,(function(){rtl.addIntf(this,pas["WEBLib.Controls"].IControl),rtl.addIntf(this,pas.System.IUnknown);var t=this.$rtti;t.addProperty("RowCount",2,rtl.longint,"FRowCount","SetRowCount"),t.addProperty("ColCount",2,rtl.longint,"FColCount","SetColCount"),t.addProperty("OnHttpRequestError",0,pas["WEBLib.Controls"].$rtti.TNotifyEvent,"FOnHttpRequestError","FOnHttpRequestError"),t.addProperty("OnHttpRequestSuccess",0,pas["WEBLib.Controls"].$rtti.TNotifyEvent,"FOnHttpRequestSuccess","FOnHttpRequestSuccess")})),t.$implcode=function(){e.GlyphAscending="&#x25B2;",e.GlyphDescending="&#x25BC;"}}),["SysUtils","Math","WEBLib.Utils","WEBLib.WebTools","WEBLib.Forms"]),rtl.module("mpoView.UserProfile",["System","SysUtils","Classes","WEBLib.Graphics","WEBLib.Controls","WEBLib.Forms","WEBLib.Dialogs","WEBLib.Controls","WEBLib.StdCtrls","WEBLib.StdCtrls","XData.Web.Connection","XData.Web.Client","WEBLib.Grids","DB","WEBLib.REST","WEBLib.ExtCtrls","WEBLib.WebCtrls"],(function(){"use strict";rtl.createClass(this,"TFViewUserProfile",pas["WEBLib.Forms"].TForm,(function(){this.$init=function(){pas["WEBLib.Forms"].TForm.$init.call(this),this.WebLabel1=null,this.edEmail=null,this.Client=null,this.pnlMessage=null,this.lbMessage=null,this.WebBessageButton=null,this.WebLabel2=null,this.WebLabel4=null,this.WebLabel5=null,this.edNachname=null,this.wlInfoTextUserInfo=null,this.FMessage="",this.edVorname=null},this.$final=function(){this.WebLabel1=void 0,this.edEmail=void 0,this.Client=void 0,this.pnlMessage=void 0,this.lbMessage=void 0,this.WebBessageButton=void 0,this.WebLabel2=void 0,this.WebLabel4=void 0,this.WebLabel5=void 0,this.edNachname=void 0,this.wlInfoTextUserInfo=void 0,this.edVorname=void 0,pas["WEBLib.Forms"].TForm.$final.call(this)},this.WebBessageButtonClick=function(t){this.HiddenNotification()},this.WebFormCreate=function(t){""!==this.FMessage?this.ShowNotification(this.FMessage):this.HiddenNotification()},this.WebFormShow=function(t){this.edEmail.SetText(pas.JS.ToString(pas["mpoweb.Auth.Service"].AuthService().TokenPayload().user)),this.wlInfoTextUserInfo.SetCaption(this.wlInfoTextUserInfo.FCaption+JSON.stringify(pas["mpoweb.Auth.Service"].AuthService().TokenPayload())),window.console.log("X2: "+JSON.stringify(pas["mpoweb.Auth.Service"].AuthService().TokenPayload())),this.HoleUserInfoDS(),""!==this.FMessage?this.ShowNotification(this.FMessage):this.HiddenNotification()},this.HiddenNotification=function(){this.pnlMessage.GetElementHandle().hidden=!0},this.HoleUserInfoDS=async function(){var t=null,e=null;window.console.log("Abfrage"),200===(t=await this.Client.RawInvokeAsync("IMPOBewerberService.UserInfo",[])).GetStatusCode()&&(window.console.log("Text: "+t.GetResponseText()),e=rtl.as(pas["WEBLib.JSON"].TJSONObject.ParseJSONValue(t.GetResponseText()),pas["WEBLib.JSON"].TJSONObject),window.console.log("Daten: "+t.GetResponseText()),window.console.log(e),this.edNachname.SetText(rtl.as(e.GetValue$1("Nachname"),pas["WEBLib.JSON"].TJSONString).GetStrValue()),this.edVorname.SetText(rtl.as(e.GetValue$1("Vorname"),pas["WEBLib.JSON"].TJSONString).GetStrValue()),this.edEmail.SetText(rtl.as(e.GetValue$1("Email"),pas["WEBLib.JSON"].TJSONString).GetStrValue()),this.wlInfoTextUserInfo.SetCaption(this.wlInfoTextUserInfo.FCaption+"<BR>"+rtl.as(e.GetValue$1("Benutzerinformation"),pas["WEBLib.JSON"].TJSONString).GetStrValue()))},this.ShowNotification=function(t){""!==t&&(this.lbMessage.SetCaption(t),this.pnlMessage.GetElementHandle().hidden=!1)},this.LoadDFMValues=function(){pas["WEBLib.Forms"].TCustomForm.LoadDFMValues.call(this),this.WebLabel1=pas["WEBLib.StdCtrls"].TLabel.$create("Create$2",["view.userprofile.title"]),this.WebLabel2=pas["WEBLib.StdCtrls"].TLabel.$create("Create$2",["view.userprofile.form.lbVorname"]),this.WebLabel4=pas["WEBLib.StdCtrls"].TLabel.$create("Create$2",["view.userprofile.form.lbEmail"]),this.WebLabel5=pas["WEBLib.StdCtrls"].TLabel.$create("Create$2",["view.userprofile.form.lbNachname"]),this.wlInfoTextUserInfo=pas["WEBLib.StdCtrls"].TLabel.$create("Create$2",["view.userprofile.form.InfoTextUserInfo"]),this.edEmail=pas["WEBLib.StdCtrls"].TEdit.$create("Create$2",["view.userprofile.form.edEmail"]),this.edVorname=pas["WEBLib.StdCtrls"].TEdit.$create("Create$2",["view.userprofile.form.edVorname"]),this.pnlMessage=pas["WEBLib.ExtCtrls"].TPanel.$create("Create$2",["view.userprofile.message"]),this.lbMessage=pas["WEBLib.StdCtrls"].TLabel.$create("Create$2",["view.userprofile.message.label"]),this.WebBessageButton=pas["WEBLib.StdCtrls"].TButton.$create("Create$2",["view.userprofile.message.button"]),this.edNachname=pas["WEBLib.StdCtrls"].TEdit.$create("Create$2",["view.userprofile.form.edNachname"]),this.Client=pas["XData.Web.Client"].TXDataWebClient.$create("Create$1",[this]),this.WebLabel1.BeforeLoadDFMValues(),this.WebLabel2.BeforeLoadDFMValues(),this.WebLabel4.BeforeLoadDFMValues(),this.WebLabel5.BeforeLoadDFMValues(),this.wlInfoTextUserInfo.BeforeLoadDFMValues(),this.edEmail.BeforeLoadDFMValues(),this.edVorname.BeforeLoadDFMValues(),this.pnlMessage.BeforeLoadDFMValues(),this.lbMessage.BeforeLoadDFMValues(),this.WebBessageButton.BeforeLoadDFMValues(),this.edNachname.BeforeLoadDFMValues(),this.Client.BeforeLoadDFMValues();try{this.SetName("FViewUserProfile"),this.SetWidth(466),this.SetHeight(387),this.SetElementPosition(2),this.FFont.FCharset=1,this.FFont.SetColor(65793),this.FFont.SetHeight(-11),this.FFont.SetName("Tahoma"),this.FFont.SetStyle({}),this.SetParentFont(!1),this.SetEvent(this,"OnCreate","WebFormCreate"),this.SetEvent(this,"OnShow","WebFormShow"),this.WebLabel1.SetParentComponent(this),this.WebLabel1.SetName("WebLabel1"),this.WebLabel1.SetLeft(8),this.WebLabel1.SetTop(16),this.WebLabel1.SetWidth(67),this.WebLabel1.SetHeight(13),this.WebLabel1.SetCaption("Benutzerprofil"),this.WebLabel1.SetHeightPercent(100),this.WebLabel1.SetWidthPercent(100),this.WebLabel2.SetParentComponent(this),this.WebLabel2.SetName("WebLabel2"),this.WebLabel2.SetLeft(8),this.WebLabel2.SetTop(95),this.WebLabel2.SetWidth(42),this.WebLabel2.SetHeight(13),this.WebLabel2.SetCaption("Vorname"),this.WebLabel2.SetElementFont(1),this.WebLabel2.SetElementPosition(2),this.WebLabel2.SetHeightStyle(2),this.WebLabel2.SetHeightPercent(100),this.WebLabel2.SetWidthStyle(2),this.WebLabel2.SetWidthPercent(100),this.WebLabel4.SetParentComponent(this),this.WebLabel4.SetName("WebLabel4"),this.WebLabel4.SetLeft(8),this.WebLabel4.SetTop(59),this.WebLabel4.SetWidth(24),this.WebLabel4.SetHeight(13),this.WebLabel4.SetCaption("Email"),this.WebLabel4.SetElementFont(1),this.WebLabel4.SetElementPosition(2),this.WebLabel4.SetHeightStyle(2),this.WebLabel4.SetHeightPercent(100),this.WebLabel4.SetWidthStyle(2),this.WebLabel4.SetWidthPercent(100),this.WebLabel5.SetParentComponent(this),this.WebLabel5.SetName("WebLabel5"),this.WebLabel5.SetLeft(2),this.WebLabel5.SetTop(126),this.WebLabel5.SetWidth(50),this.WebLabel5.SetHeight(13),this.WebLabel5.SetCaption("Nachname"),this.WebLabel5.SetElementFont(1),this.WebLabel5.SetElementPosition(2),this.WebLabel5.SetHeightStyle(2),this.WebLabel5.SetHeightPercent(100),this.WebLabel5.SetWidthStyle(2),this.WebLabel5.SetWidthPercent(100),this.wlInfoTextUserInfo.SetParentComponent(this),this.wlInfoTextUserInfo.SetName("wlInfoTextUserInfo"),this.wlInfoTextUserInfo.SetLeft(58),this.wlInfoTextUserInfo.SetTop(176),this.wlInfoTextUserInfo.SetWidth(63),this.wlInfoTextUserInfo.SetHeight(13),this.wlInfoTextUserInfo.SetCaption("UerSinfoText"),this.wlInfoTextUserInfo.SetElementFont(1),this.wlInfoTextUserInfo.SetElementPosition(2),this.wlInfoTextUserInfo.SetHeightStyle(2),this.wlInfoTextUserInfo.SetHeightPercent(100),this.wlInfoTextUserInfo.SetWidthStyle(2),this.wlInfoTextUserInfo.SetWidthPercent(100),this.edEmail.SetParentComponent(this),this.edEmail.SetName("edEmail"),this.edEmail.SetLeft(56),this.edEmail.SetTop(56),this.edEmail.SetWidth(121),this.edEmail.SetHeight(21),this.edEmail.SetHeightPercent(100),this.edEmail.SetReadOnly(!0),this.edEmail.SetWidthPercent(100),this.edVorname.SetParentComponent(this),this.edVorname.SetName("edVorname"),this.edVorname.SetLeft(56),this.edVorname.SetTop(83),this.edVorname.SetWidth(121),this.edVorname.SetHeight(25),this.edVorname.SetChildOrderEx(9),this.edVorname.SetElementFont(1),this.edVorname.SetElementPosition(2),this.edVorname.SetHeightStyle(2),this.edVorname.SetHeightPercent(100),this.edVorname.SetReadOnly(!0),this.edVorname.SetWidthStyle(2),this.edVorname.SetWidthPercent(100),this.pnlMessage.SetParentComponent(this),this.pnlMessage.SetName("pnlMessage"),this.pnlMessage.SetLeft(240),this.pnlMessage.SetTop(32),this.pnlMessage.SetWidth(121),this.pnlMessage.SetHeight(33),this.pnlMessage.SetHeightStyle(2),this.pnlMessage.SetWidthStyle(2),this.pnlMessage.SetChildOrderEx(8),this.pnlMessage.SetElementFont(1),this.pnlMessage.SetElementPosition(2),this.lbMessage.SetParentComponent(this.pnlMessage),this.lbMessage.SetName("lbMessage"),this.lbMessage.SetLeft(16),this.lbMessage.SetTop(11),this.lbMessage.SetWidth(42),this.lbMessage.SetHeight(13),this.lbMessage.SetCaption("Message"),this.lbMessage.SetHeightPercent(100),this.lbMessage.SetWidthPercent(100),this.WebBessageButton.SetParentComponent(this.pnlMessage),this.WebBessageButton.SetName("WebBessageButton"),this.WebBessageButton.SetLeft(96),this.WebBessageButton.SetTop(3),this.WebBessageButton.SetWidth(22),this.WebBessageButton.SetHeight(25),this.WebBessageButton.SetCaption("x"),this.WebBessageButton.SetChildOrderEx(1),this.WebBessageButton.SetElementFont(1),this.WebBessageButton.SetElementPosition(2),this.WebBessageButton.SetHeightStyle(2),this.WebBessageButton.SetHeightPercent(100),this.WebBessageButton.SetWidthStyle(2),this.WebBessageButton.SetWidthPercent(100),this.SetEvent$1(this.WebBessageButton,this,"OnClick","WebBessageButtonClick"),this.edNachname.SetParentComponent(this),this.edNachname.SetName("edNachname"),this.edNachname.SetLeft(58),this.edNachname.SetTop(123),this.edNachname.SetWidth(119),this.edNachname.SetHeight(30),this.edNachname.SetChildOrderEx(9),this.edNachname.SetElementFont(1),this.edNachname.SetElementPosition(2),this.edNachname.SetHeightStyle(2),this.edNachname.SetHeightPercent(100),this.edNachname.SetWidthStyle(2),this.edNachname.SetWidthPercent(100),this.Client.SetParentComponent(this),this.Client.SetName("Client"),this.Client.SetConnection(pas["mpoweb.ConnectionModule"].DMConnection.ApiConnection),this.Client.SetLeft(16),this.Client.SetTop(240)}finally{this.WebLabel1.AfterLoadDFMValues(),this.WebLabel2.AfterLoadDFMValues(),this.WebLabel4.AfterLoadDFMValues(),this.WebLabel5.AfterLoadDFMValues(),this.wlInfoTextUserInfo.AfterLoadDFMValues(),this.edEmail.AfterLoadDFMValues(),this.edVorname.AfterLoadDFMValues(),this.pnlMessage.AfterLoadDFMValues(),this.lbMessage.AfterLoadDFMValues(),this.WebBessageButton.AfterLoadDFMValues(),this.edNachname.AfterLoadDFMValues(),this.Client.AfterLoadDFMValues()}},rtl.addIntf(this,pas["WEBLib.Controls"].IControl),rtl.addIntf(this,pas.System.IUnknown);var t=this.$rtti;t.addField("WebLabel1",pas["WEBLib.StdCtrls"].$rtti.TLabel,4),t.addField("edEmail",pas["WEBLib.StdCtrls"].$rtti.TEdit,4),t.addField("Client",pas["XData.Web.Client"].$rtti.TXDataWebClient,4),t.addField("pnlMessage",pas["WEBLib.ExtCtrls"].$rtti.TPanel,4),t.addField("lbMessage",pas["WEBLib.StdCtrls"].$rtti.TLabel,4),t.addField("WebBessageButton",pas["WEBLib.StdCtrls"].$rtti.TButton,4),t.addField("WebLabel2",pas["WEBLib.StdCtrls"].$rtti.TLabel,4),t.addField("WebLabel4",pas["WEBLib.StdCtrls"].$rtti.TLabel,4),t.addField("WebLabel5",pas["WEBLib.StdCtrls"].$rtti.TLabel,4),t.addField("edNachname",pas["WEBLib.StdCtrls"].$rtti.TEdit,4),t.addField("wlInfoTextUserInfo",pas["WEBLib.StdCtrls"].$rtti.TLabel,4),t.addMethod("WebBessageButtonClick",0,[["Sender",pas.System.$rtti.TObject]],4),t.addMethod("WebFormCreate",0,[["Sender",pas.System.$rtti.TObject]],4),t.addMethod("WebFormShow",0,[["Sender",pas.System.$rtti.TObject]],4)}))}),["Web","JS","WEBLib.JSON","mpoweb.ConnectionModule","mpoweb.Auth.Service"]),rtl.module("mpoView.Kontakt",["System","SysUtils","Classes","JS","Web","WEBLib.Graphics","WEBLib.Controls","WEBLib.Forms","WEBLib.Dialogs","WEBLib.StdCtrls","WEBLib.StdCtrls","WEBLib.Controls","WEBLib.ExtCtrls","WEBLib.WebCtrls"],(function(){"use strict";rtl.createClass(this,"TFViewKontakt",pas["WEBLib.Forms"].TForm,(function(){this.$init=function(){pas["WEBLib.Forms"].TForm.$init.call(this),this.pnlMessage=null,this.lbMessage=null,this.WebMessageButton=null,this.WebButton1=null,this.lblNachricht=null,this.lblBetreff=null,this.WebMemo1=null,this.edBetreff=null,this.lblTitelzeile=null,this.FMessage=""},this.$final=function(){this.pnlMessage=void 0,this.lbMessage=void 0,this.WebMessageButton=void 0,this.WebButton1=void 0,this.lblNachricht=void 0,this.lblBetreff=void 0,this.WebMemo1=void 0,this.edBetreff=void 0,this.lblTitelzeile=void 0,pas["WEBLib.Forms"].TForm.$final.call(this)},this.WebFormCreate=function(t){this.edBetreff.SetText(""),this.WebMemo1.FLines.Clear(),""!==this.FMessage?this.ShowNotification(this.FMessage):this.HiddenNotification()},this.WebMessageButtonClick=function(t){this.HiddenNotification()},this.HiddenNotification=function(){this.pnlMessage.GetElementHandle().hidden=!0},this.ShowNotification=function(t){""!==t&&(this.lbMessage.SetCaption(t),this.pnlMessage.GetElementHandle().hidden=!1)},this.LoadDFMValues=function(){pas["WEBLib.Forms"].TCustomForm.LoadDFMValues.call(this),this.lblNachricht=pas["WEBLib.StdCtrls"].TLabel.$create("Create$2",["view.Kontakt.form.lb.Feld2"]),this.lblBetreff=pas["WEBLib.StdCtrls"].TLabel.$create("Create$2",["view.Kontakt.form.lb.Feld1"]),this.lblTitelzeile=pas["WEBLib.StdCtrls"].TLabel.$create("Create$2",["view.Kontakt.title"]),this.pnlMessage=pas["WEBLib.ExtCtrls"].TPanel.$create("Create$2",["view.Kontakt.message"]),this.lbMessage=pas["WEBLib.StdCtrls"].TLabel.$create("Create$2",["view.Kontakt.message.label"]),this.WebMessageButton=pas["WEBLib.StdCtrls"].TButton.$create("Create$2",["view.Kontakt.message.button"]),this.WebButton1=pas["WEBLib.StdCtrls"].TButton.$create("Create$2",["view.Kontakt.btSave"]),this.WebMemo1=pas["WEBLib.StdCtrls"].TMemo.$create("Create$2",["view.Kontakt.form.ed.Feld2"]),this.edBetreff=pas["WEBLib.StdCtrls"].TEdit.$create("Create$2",["view.Kontakt.form.ed.Feld1"]),this.lblNachricht.BeforeLoadDFMValues(),this.lblBetreff.BeforeLoadDFMValues(),this.lblTitelzeile.BeforeLoadDFMValues(),this.pnlMessage.BeforeLoadDFMValues(),this.lbMessage.BeforeLoadDFMValues(),this.WebMessageButton.BeforeLoadDFMValues(),this.WebButton1.BeforeLoadDFMValues(),this.WebMemo1.BeforeLoadDFMValues(),this.edBetreff.BeforeLoadDFMValues();try{this.SetName("FViewKontakt"),this.SetWidth(640),this.SetHeight(480),this.SetEvent(this,"OnCreate","WebFormCreate"),this.lblNachricht.SetParentComponent(this),this.lblNachricht.SetName("lblNachricht"),this.lblNachricht.SetLeft(183),this.lblNachricht.SetTop(152),this.lblNachricht.SetWidth(45),this.lblNachricht.SetHeight(13),this.lblNachricht.SetCaption("Nachricht"),this.lblNachricht.SetElementFont(1),this.lblNachricht.SetElementPosition(2),this.lblNachricht.SetHeightStyle(2),this.lblNachricht.SetHeightPercent(100),this.lblNachricht.SetWidthStyle(2),this.lblNachricht.SetWidthPercent(100),this.lblBetreff.SetParentComponent(this),this.lblBetreff.SetName("lblBetreff"),this.lblBetreff.SetLeft(202),this.lblBetreff.SetTop(214),this.lblBetreff.SetWidth(34),this.lblBetreff.SetHeight(13),this.lblBetreff.SetCaption("Betreff"),this.lblBetreff.SetElementFont(1),this.lblBetreff.SetElementPosition(2),this.lblBetreff.SetHeightStyle(2),this.lblBetreff.SetHeightPercent(100),this.lblBetreff.SetWidthStyle(2),this.lblBetreff.SetWidthPercent(100),this.lblTitelzeile.SetParentComponent(this),this.lblTitelzeile.SetName("lblTitelzeile"),this.lblTitelzeile.SetLeft(335),this.lblTitelzeile.SetTop(232),this.lblTitelzeile.SetWidth(77),this.lblTitelzeile.SetHeight(13),this.lblTitelzeile.SetCaption("Kontaktformular"),this.lblTitelzeile.SetElementFont(1),this.lblTitelzeile.SetElementPosition(2),this.lblTitelzeile.SetHeightStyle(2),this.lblTitelzeile.SetHeightPercent(100),this.lblTitelzeile.SetWidthStyle(2),this.lblTitelzeile.SetWidthPercent(100),this.pnlMessage.SetParentComponent(this),this.pnlMessage.SetName("pnlMessage"),this.pnlMessage.SetLeft(0),this.pnlMessage.SetTop(0),this.pnlMessage.SetWidth(121),this.pnlMessage.SetHeight(33),this.pnlMessage.SetHeightStyle(2),this.pnlMessage.SetWidthStyle(2),this.pnlMessage.SetChildOrderEx(8),this.pnlMessage.SetElementFont(1),this.pnlMessage.SetElementPosition(2),this.lbMessage.SetParentComponent(this.pnlMessage),this.lbMessage.SetName("lbMessage"),this.lbMessage.SetLeft(16),this.lbMessage.SetTop(11),this.lbMessage.SetWidth(42),this.lbMessage.SetHeight(13),this.lbMessage.SetCaption("Message"),this.lbMessage.SetHeightPercent(100),this.lbMessage.SetWidthPercent(100),this.WebMessageButton.SetParentComponent(this.pnlMessage),this.WebMessageButton.SetName("WebMessageButton"),this.WebMessageButton.SetLeft(96),this.WebMessageButton.SetTop(3),this.WebMessageButton.SetWidth(22),this.WebMessageButton.SetHeight(25),this.WebMessageButton.SetCaption("x"),this.WebMessageButton.SetChildOrderEx(1),this.WebMessageButton.SetElementFont(1),this.WebMessageButton.SetElementPosition(2),this.WebMessageButton.SetHeightStyle(2),this.WebMessageButton.SetHeightPercent(100),this.WebMessageButton.SetWidthStyle(2),this.WebMessageButton.SetWidthPercent(100),this.SetEvent$1(this.WebMessageButton,this,"OnClick","WebMessageButtonClick"),this.WebButton1.SetParentComponent(this),this.WebButton1.SetName("WebButton1"),this.WebButton1.SetLeft(202),this.WebButton1.SetTop(30),this.WebButton1.SetWidth(96),this.WebButton1.SetHeight(25),this.WebButton1.SetCaption("Senden"),this.WebButton1.SetChildOrderEx(5),this.WebButton1.SetElementFont(1),this.WebButton1.SetElementPosition(2),this.WebButton1.SetHeightStyle(2),this.WebButton1.SetHeightPercent(100),this.WebButton1.SetWidthStyle(2),this.WebButton1.SetWidthPercent(100),this.WebMemo1.SetParentComponent(this),this.WebMemo1.SetName("WebMemo1"),this.WebMemo1.SetLeft(379),this.WebMemo1.SetTop(50),this.WebMemo1.SetWidth(185),this.WebMemo1.SetHeight(89),this.WebMemo1.SetElementFont(1),this.WebMemo1.SetHeightPercent(100),this.WebMemo1.FLines.BeginUpdate();try{this.WebMemo1.FLines.Clear(),this.WebMemo1.FLines.Add("WebMemo1")}finally{this.WebMemo1.FLines.EndUpdate()}this.WebMemo1.SetSelLength(0),this.WebMemo1.SetSelStart(0),this.WebMemo1.SetWidthPercent(100),this.edBetreff.SetParentComponent(this),this.edBetreff.SetName("edBetreff"),this.edBetreff.SetLeft(202),this.edBetreff.SetTop(0),this.edBetreff.SetWidth(96),this.edBetreff.SetHeight(25),this.edBetreff.SetChildOrderEx(6),this.edBetreff.SetElementFont(1),this.edBetreff.SetElementPosition(2),this.edBetreff.SetHeightStyle(2),this.edBetreff.SetHeightPercent(100),this.edBetreff.SetText("WebEdit2"),this.edBetreff.SetWidthStyle(2),this.edBetreff.SetWidthPercent(100)}finally{this.lblNachricht.AfterLoadDFMValues(),this.lblBetreff.AfterLoadDFMValues(),this.lblTitelzeile.AfterLoadDFMValues(),this.pnlMessage.AfterLoadDFMValues(),this.lbMessage.AfterLoadDFMValues(),this.WebMessageButton.AfterLoadDFMValues(),this.WebButton1.AfterLoadDFMValues(),this.WebMemo1.AfterLoadDFMValues(),this.edBetreff.AfterLoadDFMValues()}},rtl.addIntf(this,pas["WEBLib.Controls"].IControl),rtl.addIntf(this,pas.System.IUnknown);var t=this.$rtti;t.addField("pnlMessage",pas["WEBLib.ExtCtrls"].$rtti.TPanel,4),t.addField("lbMessage",pas["WEBLib.StdCtrls"].$rtti.TLabel,4),t.addField("WebMessageButton",pas["WEBLib.StdCtrls"].$rtti.TButton,4),t.addField("WebButton1",pas["WEBLib.StdCtrls"].$rtti.TButton,4),t.addField("lblNachricht",pas["WEBLib.StdCtrls"].$rtti.TLabel,4),t.addField("lblBetreff",pas["WEBLib.StdCtrls"].$rtti.TLabel,4),t.addField("WebMemo1",pas["WEBLib.StdCtrls"].$rtti.TMemo,4),t.addField("edBetreff",pas["WEBLib.StdCtrls"].$rtti.TEdit,4),t.addField("lblTitelzeile",pas["WEBLib.StdCtrls"].$rtti.TLabel,4),t.addMethod("WebFormCreate",0,[["Sender",pas.System.$rtti.TObject]],4),t.addMethod("WebMessageButtonClick",0,[["Sender",pas.System.$rtti.TObject]],4)}))})),rtl.module("WEBLib.ComCtrls",["System","Classes","SysUtils","Web","WEBLib.Controls","WEBLib.Graphics","WEBLib.ExtCtrls","WEBLib.Menus"],(function(){"use strict";var t=this;this.TProgressBarStyle={0:"pbstNormal",pbstNormal:0,1:"pbstMarquee",pbstMarquee:1,2:"pbstDiv",pbstDiv:2},this.$rtti.$Enum("TProgressBarStyle",{minvalue:0,maxvalue:2,ordtype:1,enumtype:this.TProgressBarStyle}),this.TProgressBarValue={0:"pbvNone",pbvNone:0,1:"pbvPercentage",pbvPercentage:1,2:"pbvAbsolute",pbvAbsolute:2},this.$rtti.$Enum("TProgressBarValue",{minvalue:0,maxvalue:2,ordtype:1,enumtype:this.TProgressBarValue}),rtl.createClass(this,"TProgressBar",pas["WEBLib.Menus"].TWebCustomControl,(function(){this.$init=function(){pas["WEBLib.Menus"].TWebCustomControl.$init.call(this),this.FMax=0,this.FMin=0,this.FPosition=0,this.FStyle=0,this.FElementBarClassName="",this.FValue=0,this.FValueColor=0},this.SetStyle=function(t){this.FStyle!==t&&(this.FStyle=t,null!=this.GetElementHandle()&&(this.CreateProgressElement(this.GetElementHandle()),this.DoUpdate()))},this.SetElementBarClassName=function(t){this.FElementBarClassName=t,this.DoUpdate()},this.SetValue=function(t){this.FValue=t,this.DoUpdate()},this.SetValueColor=function(t){this.FValueColor!==t&&(this.FValueColor=t,this.UpdateElementVisual())},this.CreateElement=function(){var t;return t=document.createElement("SPAN"),this.CreateProgressElement(t),t},this.SetMax=function(t){this.FMax=t,this.DoUpdate()},this.SetMin=function(t){this.FMin=t,this.DoUpdate()},this.SetPosition=function(t){t>=this.FMin&&t<=this.FMax&&(this.FPosition=t,this.DoUpdate())},this.DoUpdate=function(){var t=0,e=0,i=null,s=0;if(null!=this.GetContainer())if(s=this.FMax!==this.FMin?Math.round((this.FPosition-this.FMin)/(this.FMax-this.FMin)*100):0,this.GetIsLinked())"DIV"===this.GetElementHandle().tagName?"progressbar"===this.GetElementHandle().getAttribute("role")?this.GetElementHandle().style.setProperty("width",pas.SysUtils.IntToStr(s)+"%"):this.GetElementHandle().innerHTML=pas.SysUtils.IntToStr(s):this.GetElementHandle().setAttribute("value",pas.SysUtils.IntToStr(s));else if(2===this.FStyle){i=this.GetElementHandle().firstChild,""!==this.FElementClassName&&(i.setAttribute("class",this.FElementClassName),this.GetElementHandle().removeAttribute("class")),i.style.setProperty("height",pas.SysUtils.IntToStr(this.GetHeight())+"px"),1===this.FWidthStyle&&i.style.setProperty("width",pas.SysUtils.IntToStr(this.GetWidth())+"px"),(i=i.firstChild).style.setProperty("background-color","#3397FD"),""!==this.FElementBarClassName&&i.setAttribute("class",this.FElementBarClassName),i.setAttribute("role","progressbar"),i.style.setProperty("width",pas.SysUtils.IntToStr(s)+"%");var n=this.FValue;1===n?i.innerHTML=pas.SysUtils.IntToStr(s)+"%":2===n?i.innerHTML=pas.SysUtils.IntToStr(this.FPosition):0===n&&(i.innerHTML="&nbsp;")}else(i=this.GetElementHandle().firstChild).style.setProperty("width","100%"),i.style.setProperty("height","100%"),t=this.FPosition-this.FMin,e=this.FMax-this.FMin,i.setAttribute("max",pas.SysUtils.IntToStr(e)),0===this.FStyle?i.setAttribute("value",pas.SysUtils.IntToStr(t)):i.removeAttribute("value")},this.UpdateElementVisual=function(){pas["WEBLib.Controls"].TCustomControl.UpdateElementVisual.call(this),-1!==this.FValueColor&&(2===this.FStyle?this.GetElementHandle().firstChild.firstChild.style.setProperty("background-color",pas["WEBLib.Graphics"].ColorToHTML(this.FValueColor)):this.GetElementHandle().firstChild.style.setProperty("accent-color",pas["WEBLib.Graphics"].ColorToHTML(this.FValueColor)))},this.CreateProgressElement=function(t){for(var e=null;null!=t.firstChild;)t.removeChild(t.firstChild);2===this.FStyle?(e=document.createElement("DIV")).appendChild(document.createElement("DIV")):e=document.createElement("PROGRESS"),t.appendChild(e)},this.CreateInitialize=function(){pas["WEBLib.Controls"].TCustomControl.CreateInitialize.call(this),this.FMax=100,this.FMin=0,this.FPosition=0,this.FStyle=0,this.FValueColor=-1},this.AfterLoadDFMValues=function(){pas.Classes.TComponent.AfterLoadDFMValues.call(this),this.DoUpdate()},rtl.addIntf(this,pas["WEBLib.Controls"].IControl),rtl.addIntf(this,pas.System.IUnknown);var e=this.$rtti;e.addProperty("Align",2,pas["WEBLib.Controls"].$rtti.TAlign,"FAlign","SetAlign",4,{Default:pas["WEBLib.Controls"].TAlign.alNone}),e.addProperty("AlignWithMargins",2,rtl.boolean,"FAlignWithMargins","SetAlignWithMargins",4,{Default:!1}),e.addProperty("Anchors",2,pas["WEBLib.Controls"].$rtti.TAnchors,"FAnchors","SetAnchors",4,{Default:rtl.createSet(0,1)}),e.addProperty("DragMode",2,pas["WEBLib.Controls"].$rtti.TDragMode,"FDragMode","SetDragMode",4,{Default:pas["WEBLib.Controls"].TDragMode.dmManual}),e.addProperty("ElementBarClassName",2,rtl.string,"FElementBarClassName","SetElementBarClassName"),e.addProperty("ElementPosition",2,pas["WEBLib.Controls"].$rtti.TElementPosition,"FElementPosition","SetElementPosition",4,{Default:pas["WEBLib.Controls"].TElementPosition.epAbsolute}),e.addProperty("Height",3,rtl.longint,"GetHeight","SetHeight"),e.addProperty("HeightPercent",2,rtl.double,"FHeightPercent","SetHeightPercent",4,{Default:100}),e.addProperty("HeightStyle",2,pas["WEBLib.Controls"].$rtti.TSizeStyle,"FHeightStyle","SetHeightStyle",4,{Default:pas["WEBLib.Controls"].TSizeStyle.ssAbsolute}),e.addProperty("Left",3,rtl.longint,"GetLeft","SetLeft"),e.addProperty("Margins",2,pas["WEBLib.Controls"].$rtti.TMargins,"FMargins","SetMargins"),e.addProperty("Max",2,rtl.longint,"FMax","SetMax"),e.addProperty("Min",2,rtl.longint,"FMin","SetMin"),e.addProperty("PopupMenu",0,pas["WEBLib.Menus"].$rtti.TPopupMenu,"FPopupMenu","FPopupMenu"),e.addProperty("Position",2,rtl.longint,"FPosition","SetPosition"),e.addProperty("Style",2,t.$rtti.TProgressBarStyle,"FStyle","SetStyle"),e.addProperty("Top",3,rtl.longint,"GetTop","SetTop"),e.addProperty("Value",2,t.$rtti.TProgressBarValue,"FValue","SetValue"),e.addProperty("ValueColor",2,pas["WEBLib.Graphics"].$rtti.TColor,"FValueColor","SetValueColor",4,{Default:-1}),e.addProperty("Visible",2,rtl.boolean,"FVisible","SetVisible",4,{Default:!0}),e.addProperty("Width",3,rtl.longint,"GetWidth","SetWidth"),e.addProperty("WidthPercent",2,rtl.double,"FWidthPercent","SetWidthPercent",4,{Default:100}),e.addProperty("WidthStyle",2,pas["WEBLib.Controls"].$rtti.TSizeStyle,"FWidthStyle","SetWidthStyle",4,{Default:pas["WEBLib.Controls"].TSizeStyle.ssAbsolute}),e.addProperty("OnDragDrop",0,pas["WEBLib.Controls"].$rtti.TDragDropEvent,"FOnDragDrop","FOnDragDrop"),e.addProperty("OnDragOver",0,pas["WEBLib.Controls"].$rtti.TDragOverEvent,"FOnDragOver","FOnDragOver"),e.addProperty("OnEndDrag",0,pas["WEBLib.Controls"].$rtti.TEndDragEvent,"FonEndDrag","FonEndDrag"),e.addProperty("OnStartDrag",0,pas["WEBLib.Controls"].$rtti.TStartDragEvent,"FOnStartDrag","FOnStartDrag")}))}),["WEBLib.Forms","WEBLib.Utils"]),rtl.module("WEBLib.Imaging.gifimg",["System"],(function(){"use strict";this.$init=function(){}})),rtl.module("mpoView.Upload",["System","SysUtils","Classes","JS","Web","WEBLib.Graphics","WEBLib.Controls","WEBLib.Forms","WEBLib.Dialogs","WEBLib.StdCtrls","WEBLib.ExtCtrls","WEBLib.WebCtrls","WEBLib.ComCtrls","WEBLib.Imaging.gifimg","WEBLib.StdCtrls","WEBLib.Controls","mpoweb.Auth.Service","mpoweb.App.Config","mpoweb.ConnectionModule"],(function(){"use strict";var t=this;rtl.createClass(this,"TFViewUpload",pas["WEBLib.Forms"].TForm,(function(){this.$init=function(){pas["WEBLib.Forms"].TForm.$init.call(this),this.pnlMessage=null,this.btMessage=null,this.lbMessage=null,this.WebFilePicker1=null,this.WebLabel2=null,this.wlTitel=null,this.btSave=null,this.WebLabel4=null,this.edKommentar=null,this.WebLabel1=null,this.edBetreff=null,this.WebWaitMessage1=null,this.PanelProgress=null,this.WebLabel5=null,this.WebProgressBar1=null,this.wlFooterText=null,this.FMessage=""},this.$final=function(){this.pnlMessage=void 0,this.btMessage=void 0,this.lbMessage=void 0,this.WebFilePicker1=void 0,this.WebLabel2=void 0,this.wlTitel=void 0,this.btSave=void 0,this.WebLabel4=void 0,this.edKommentar=void 0,this.WebLabel1=void 0,this.edBetreff=void 0,this.WebWaitMessage1=void 0,this.PanelProgress=void 0,this.WebLabel5=void 0,this.WebProgressBar1=void 0,this.wlFooterText=void 0,pas["WEBLib.Forms"].TForm.$final.call(this)},this.btMessageClick=function(t){this.HiddenNotification()},this.btSaveClick=function(e){var i,s,n=void 0;(n=new FormData).append("fileUpload",document.getElementById("view.upload.form.ed.Datei1").files[0]),i=document.getElementById("view.upload.form.ed.Datei1").files[0].size,n.append("Betreff",document.getElementById("view.upload.form.ed.Betreff").value),n.append("Kommentar",document.getElementById("view.upload.form.ed.Kommentar").value),t.maxfsize=i,t.progressCounter=0,this.WebProgressBar1.SetMax(100),this.WebProgressBar1.SetMin(0),t.xhr=new XMLHttpRequest,s=pas["mpoweb.ConnectionModule"].DMConnection.URL_UploadUrl,window.console.log("URL: "+s),t.xhr.open("POST",s),pas["mpoweb.Auth.Service"].AuthService().Authenticated()&&t.xhr.setRequestHeader("Authorization","Bearer "+pas["mpoweb.Auth.Service"].AuthService().GetToken()),t.xhr.upload.addEventListener("loadend",rtl.createCallback(this,"_loadend")),t.xhr.upload.addEventListener("progress",rtl.createCallback(this,"_progress")),t.xhr.upload.addEventListener("error",rtl.createCallback(this,"_error")),t.xhr.upload.addEventListener("timeout",rtl.createCallback(this,"_timeout")),t.xhr.upload.addEventListener("abort",rtl.createCallback(this,"_abort")),t.xhr.addEventListener("loadend",rtl.createCallback(this,"_final")),this.WebWaitMessage1.Show$1(),t.xhr.send(n),this.btSave.SetEnabled(!1),this.WebFilePicker1.SetEnabled(!1),this.edBetreff.SetEnabled(!1),this.edKommentar.SetEnabled(!1)},this.WebFormCreate=function(t){""!==this.FMessage?this.ShowNotification(this.FMessage):this.HiddenNotification()},this._abort=function(t){return this.WebLabel1.SetCaption("Upload Aborted!"),!1},this._error=function(t){return this.WebLabel1.SetCaption("Upload Error!!"),!1},this._final=function(e){return this.wlFooterText.SetCaption(pas.SysUtils.IntToStr(t.xhr.status)),this.btSave.SetCaption(t.xhr.responseText),!1},this._loadend=function(e){return this.wlFooterText.SetCaption("Fortschritt: "+pas.SysUtils.IntToStr(t.progressCounter)+" "),this.WebWaitMessage1.Hide$1(),this.WebLabel1.SetCaption("Upload Complete"),!0,!0},this._progress=function(e){return t.progressCounter=t.progressCounter+1,this.wlFooterText.SetCaption("Fortschritt: "+pas.SysUtils.IntToStr(t.progressCounter)),this.WebProgressBar1.SetPosition(Math.round(e.loaded/t.maxfsize*100)),!1},this._timeout=function(t){return this.WebLabel1.SetCaption("Upload Timed Out!"),!1},this.HiddenNotification=function(){this.pnlMessage.GetElementHandle().hidden=!0},this.ShowNotification=function(t){""!==t&&(this.lbMessage.SetCaption(t),this.pnlMessage.GetElementHandle().hidden=!1)},this.LoadDFMValues=function(){pas["WEBLib.Forms"].TCustomForm.LoadDFMValues.call(this),this.WebLabel2=pas["WEBLib.StdCtrls"].TLabel.$create("Create$2",["view.upload.form.lb.Betreff"]),this.wlTitel=pas["WEBLib.StdCtrls"].TLabel.$create("Create$2",["view.upload.title"]),this.WebLabel4=pas["WEBLib.StdCtrls"].TLabel.$create("Create$2",["view.upload.form.lb.Kommentar"]),this.WebLabel1=pas["WEBLib.StdCtrls"].TLabel.$create("Create$2",["view.upload.form.lb.Datei1"]),this.wlFooterText=pas["WEBLib.StdCtrls"].TLabel.$create("Create$2",["view.upload.formFooter.Infotextx"]),this.pnlMessage=pas["WEBLib.WebCtrls"].THTMLDiv.$create("Create$2",["view.upload.message"]),this.lbMessage=pas["WEBLib.StdCtrls"].TLabel.$create("Create$2",["view.upload.message.label"]),this.btMessage=pas["WEBLib.StdCtrls"].TButton.$create("Create$2",["view.upload.message.button"]),this.WebFilePicker1=pas["WEBLib.Dialogs"].TFilePicker.$create("Create$2",["view.upload.form.ed.Datei1"]),this.btSave=pas["WEBLib.StdCtrls"].TButton.$create("Create$2",["view.upload.btSave"]),this.edKommentar=pas["WEBLib.StdCtrls"].TMemo.$create("Create$2",["view.upload.form.ed.Kommentar"]),this.edBetreff=pas["WEBLib.StdCtrls"].TEdit.$create("Create$2",["view.upload.form.ed.Betreff"]),this.WebWaitMessage1=pas["WEBLib.Dialogs"].TWaitMessage.$create("Create$1",[this]),this.PanelProgress=pas["WEBLib.WebCtrls"].THTMLDiv.$create("Create$2",["view.upload.Progress"]),this.WebLabel5=pas["WEBLib.StdCtrls"].TLabel.$create("Create$2",["view.upload.Progress.Label"]),this.WebProgressBar1=pas["WEBLib.ComCtrls"].TProgressBar.$create("Create$2",["view.upload.Progress.Bar"]),this.WebLabel2.BeforeLoadDFMValues(),this.wlTitel.BeforeLoadDFMValues(),this.WebLabel4.BeforeLoadDFMValues(),this.WebLabel1.BeforeLoadDFMValues(),this.wlFooterText.BeforeLoadDFMValues(),this.pnlMessage.BeforeLoadDFMValues(),this.lbMessage.BeforeLoadDFMValues(),this.btMessage.BeforeLoadDFMValues(),this.WebFilePicker1.BeforeLoadDFMValues(),this.btSave.BeforeLoadDFMValues(),this.edKommentar.BeforeLoadDFMValues(),this.edBetreff.BeforeLoadDFMValues(),this.WebWaitMessage1.BeforeLoadDFMValues(),this.PanelProgress.BeforeLoadDFMValues(),this.WebLabel5.BeforeLoadDFMValues(),this.WebProgressBar1.BeforeLoadDFMValues();try{this.SetName("FViewUpload"),this.SetWidth(640),this.SetHeight(623),this.SetElementPosition(2),this.SetEvent(this,"OnCreate","WebFormCreate"),this.WebLabel2.SetParentComponent(this),this.WebLabel2.SetName("WebLabel2"),this.WebLabel2.SetLeft(176),this.WebLabel2.SetTop(41),this.WebLabel2.SetWidth(34),this.WebLabel2.SetHeight(13),this.WebLabel2.SetCaption("Betreff"),this.WebLabel2.SetElementFont(1),this.WebLabel2.SetElementPosition(2),this.WebLabel2.SetHeightStyle(2),this.WebLabel2.SetHeightPercent(100),this.WebLabel2.SetWidthStyle(2),this.WebLabel2.SetWidthPercent(100),this.wlTitel.SetParentComponent(this),this.wlTitel.SetName("wlTitel"),this.wlTitel.SetLeft(176),this.wlTitel.SetTop(8),this.wlTitel.SetWidth(89),this.wlTitel.SetHeight(13),this.wlTitel.SetCaption("Datei hochladen..."),this.wlTitel.SetElementFont(1),this.wlTitel.SetElementPosition(2),this.wlTitel.SetHeightStyle(2),this.wlTitel.SetHeightPercent(100),this.wlTitel.SetWidthStyle(2),this.wlTitel.SetWidthPercent(100),this.WebLabel4.SetParentComponent(this),this.WebLabel4.SetName("WebLabel4"),this.WebLabel4.SetLeft(76),this.WebLabel4.SetTop(126),this.WebLabel4.SetWidth(66),this.WebLabel4.SetHeight(13),this.WebLabel4.SetCaption("Kommentar..."),this.WebLabel4.SetElementFont(1),this.WebLabel4.SetElementPosition(2),this.WebLabel4.SetHeightStyle(2),this.WebLabel4.SetHeightPercent(100),this.WebLabel4.SetWidthStyle(2),this.WebLabel4.SetWidthPercent(100),this.WebLabel1.SetParentComponent(this),this.WebLabel1.SetName("WebLabel1"),this.WebLabel1.SetLeft(56),this.WebLabel1.SetTop(168),this.WebLabel1.SetWidth(79),this.WebLabel1.SetHeight(13),this.WebLabel1.SetCaption("Datei auswählen"),this.WebLabel1.SetElementFont(1),this.WebLabel1.SetElementPosition(2),this.WebLabel1.SetHeightStyle(2),this.WebLabel1.SetHeightPercent(100),this.WebLabel1.SetWidthStyle(2),this.WebLabel1.SetWidthPercent(100),this.wlFooterText.SetParentComponent(this),this.wlFooterText.SetName("wlFooterText"),this.wlFooterText.SetLeft(76),this.wlFooterText.SetTop(488),this.wlFooterText.SetWidth(37),this.wlFooterText.SetHeight(13),this.wlFooterText.SetCaption("Upload."),this.wlFooterText.SetElementLabelClassName("bg-info"),this.wlFooterText.SetElementFont(1),this.wlFooterText.SetElementPosition(2),this.wlFooterText.SetHeightStyle(2),this.wlFooterText.SetHeightPercent(100),this.wlFooterText.SetHTMLType(2),this.wlFooterText.FWordWrap=!0,this.wlFooterText.SetWidthStyle(2),this.wlFooterText.SetWidthPercent(100),this.pnlMessage.SetParentComponent(this),this.pnlMessage.SetName("pnlMessage"),this.pnlMessage.SetLeft(8),this.pnlMessage.SetTop(23),this.pnlMessage.SetWidth(113),this.pnlMessage.SetHeight(34),this.pnlMessage.SetHeightStyle(2),this.pnlMessage.SetWidthStyle(2),this.pnlMessage.SetChildOrderEx(1),this.pnlMessage.SetElementPosition(2),this.pnlMessage.SetElementFont(1),this.pnlMessage.SetRole(""),this.lbMessage.SetParentComponent(this.pnlMessage),this.lbMessage.SetName("lbMessage"),this.lbMessage.SetLeft(19),this.lbMessage.SetTop(3),this.lbMessage.SetWidth(42),this.lbMessage.SetHeight(13),this.lbMessage.SetCaption("Message"),this.lbMessage.SetElementFont(1),this.lbMessage.SetElementPosition(2),this.lbMessage.SetHeightStyle(2),this.lbMessage.SetHeightPercent(100),this.lbMessage.SetWidthStyle(2),this.lbMessage.SetWidthPercent(100),this.btMessage.SetParentComponent(this.pnlMessage),this.btMessage.SetName("btMessage"),this.btMessage.SetLeft(93),this.btMessage.SetTop(6),this.btMessage.SetWidth(17),this.btMessage.SetHeight(25),this.btMessage.SetCaption("X"),this.btMessage.SetElementFont(1),this.btMessage.SetElementPosition(2),this.btMessage.SetHeightStyle(2),this.btMessage.SetHeightPercent(100),this.btMessage.SetWidthStyle(2),this.btMessage.SetWidthPercent(100),this.SetEvent$1(this.btMessage,this,"OnClick","btMessageClick"),this.WebFilePicker1.SetParentComponent(this),this.WebFilePicker1.SetName("WebFilePicker1"),this.WebFilePicker1.SetLeft(56),this.WebFilePicker1.SetTop(232),this.WebFilePicker1.SetWidth(417),this.WebFilePicker1.SetHeight(19),this.WebFilePicker1.SetWidthStyle(2),this.WebFilePicker1.SetChildOrderEx(1),this.WebFilePicker1.SetElementFont(1),this.WebFilePicker1.SetElementPosition(2),this.btSave.SetParentComponent(this),this.btSave.SetName("btSave"),this.btSave.SetLeft(56),this.btSave.SetTop(278),this.btSave.SetWidth(96),this.btSave.SetHeight(25),this.btSave.SetCaption("Uploaden"),this.btSave.SetChildOrderEx(8),this.btSave.SetElementFont(1),this.btSave.SetElementPosition(2),this.btSave.SetHeightStyle(2),this.btSave.SetHeightPercent(100),this.btSave.SetWidthStyle(2),this.btSave.SetWidthPercent(100),this.SetEvent$1(this.btSave,this,"OnClick","btSaveClick"),this.edKommentar.SetParentComponent(this),this.edKommentar.SetName("edKommentar"),this.edKommentar.SetLeft(176),this.edKommentar.SetTop(123),this.edKommentar.SetWidth(185),this.edKommentar.SetHeight(89),this.edKommentar.SetElementFont(1),this.edKommentar.SetElementPosition(2),this.edKommentar.SetHeightPercent(100),this.edKommentar.SetSelLength(0),this.edKommentar.SetSelStart(0),this.edKommentar.SetShowHint(!0),this.edKommentar.SetTextHint("Kommentar"),this.edKommentar.SetWidthStyle(2),this.edKommentar.SetWidthPercent(100),this.edBetreff.SetParentComponent(this),this.edBetreff.SetName("edBetreff"),this.edBetreff.SetLeft(176),this.edBetreff.SetTop(60),this.edBetreff.SetWidth(96),this.edBetreff.SetHeight(25),this.edBetreff.SetChildOrderEx(8),this.edBetreff.SetElementFont(1),this.edBetreff.SetElementPosition(2),this.edBetreff.SetHeightStyle(2),this.edBetreff.SetHeightPercent(100),this.edBetreff.SetShowHint(!0),this.edBetreff.SetTextHint("Betreff"),this.edBetreff.SetWidthStyle(2),this.edBetreff.SetWidthPercent(100),this.WebWaitMessage1.SetParentComponent(this),this.WebWaitMessage1.SetName("WebWaitMessage1"),this.WebWaitMessage1.SetLeft(27),this.WebWaitMessage1.SetTop(80),this.WebWaitMessage1.SetWidth(24),this.WebWaitMessage1.SetHeight(24),this.WebWaitMessage1.SetHeightStyle(2),this.WebWaitMessage1.SetWidthStyle(2),this.WebWaitMessage1.FOpacity=.2,this.WebWaitMessage1.FPicture.LoadFromFile("mpoView.Upload.WebWaitMessage1.Picture.gif"),this.PanelProgress.SetParentComponent(this),this.PanelProgress.SetName("PanelProgress"),this.PanelProgress.SetLeft(56),this.PanelProgress.SetTop(384),this.PanelProgress.SetWidth(353),this.PanelProgress.SetHeight(57),this.PanelProgress.SetHeightStyle(2),this.PanelProgress.SetWidthStyle(2),this.PanelProgress.SetChildOrderEx(12),this.PanelProgress.SetElementPosition(2),this.PanelProgress.SetElementFont(1),this.PanelProgress.SetRole(""),this.WebLabel5.SetParentComponent(this.PanelProgress),this.WebLabel5.SetName("WebLabel5"),this.WebLabel5.SetLeft(3),this.WebLabel5.SetTop(3),this.WebLabel5.SetWidth(114),this.WebLabel5.SetHeight(13),this.WebLabel5.SetCaption("Fortschritt Dateiupload:"),this.WebLabel5.SetElementFont(1),this.WebLabel5.SetElementPosition(2),this.WebLabel5.SetHeightStyle(2),this.WebLabel5.SetHeightPercent(100),this.WebLabel5.SetWidthStyle(2),this.WebLabel5.SetWidthPercent(100),this.WebProgressBar1.SetParentComponent(this.PanelProgress),this.WebProgressBar1.SetName("WebProgressBar1"),this.WebProgressBar1.SetLeft(3),this.WebProgressBar1.SetTop(22),this.WebProgressBar1.SetWidth(329),this.WebProgressBar1.SetHeight(17),this.WebProgressBar1.SetHeightStyle(2),this.WebProgressBar1.SetWidthStyle(2),this.WebProgressBar1.SetChildOrderEx(12),this.WebProgressBar1.SetElementPosition(2)}finally{this.WebLabel2.AfterLoadDFMValues(),this.wlTitel.AfterLoadDFMValues(),this.WebLabel4.AfterLoadDFMValues(),this.WebLabel1.AfterLoadDFMValues(),this.wlFooterText.AfterLoadDFMValues(),this.pnlMessage.AfterLoadDFMValues(),this.lbMessage.AfterLoadDFMValues(),this.btMessage.AfterLoadDFMValues(),this.WebFilePicker1.AfterLoadDFMValues(),this.btSave.AfterLoadDFMValues(),this.edKommentar.AfterLoadDFMValues(),this.edBetreff.AfterLoadDFMValues(),this.WebWaitMessage1.AfterLoadDFMValues(),this.PanelProgress.AfterLoadDFMValues(),this.WebLabel5.AfterLoadDFMValues(),this.WebProgressBar1.AfterLoadDFMValues()}},rtl.addIntf(this,pas["WEBLib.Controls"].IControl),rtl.addIntf(this,pas.System.IUnknown);var e=this.$rtti;e.addField("pnlMessage",pas["WEBLib.WebCtrls"].$rtti.THTMLDiv,4),e.addField("btMessage",pas["WEBLib.StdCtrls"].$rtti.TButton,4),e.addField("lbMessage",pas["WEBLib.StdCtrls"].$rtti.TLabel,4),e.addField("WebFilePicker1",pas["WEBLib.Dialogs"].$rtti.TFilePicker,4),e.addField("WebLabel2",pas["WEBLib.StdCtrls"].$rtti.TLabel,4),e.addField("wlTitel",pas["WEBLib.StdCtrls"].$rtti.TLabel,4),e.addField("btSave",pas["WEBLib.StdCtrls"].$rtti.TButton,4),e.addField("WebLabel4",pas["WEBLib.StdCtrls"].$rtti.TLabel,4),e.addField("edKommentar",pas["WEBLib.StdCtrls"].$rtti.TMemo,4),e.addField("WebLabel1",pas["WEBLib.StdCtrls"].$rtti.TLabel,4),e.addField("edBetreff",pas["WEBLib.StdCtrls"].$rtti.TEdit,4),e.addField("WebWaitMessage1",pas["WEBLib.Dialogs"].$rtti.TWaitMessage,4),e.addField("PanelProgress",pas["WEBLib.WebCtrls"].$rtti.THTMLDiv,4),e.addField("WebLabel5",pas["WEBLib.StdCtrls"].$rtti.TLabel,4),e.addField("WebProgressBar1",pas["WEBLib.ComCtrls"].$rtti.TProgressBar,4),e.addField("wlFooterText",pas["WEBLib.StdCtrls"].$rtti.TLabel,4),e.addMethod("btMessageClick",0,[["Sender",pas.System.$rtti.TObject]],4),e.addMethod("btSaveClick",0,[["Sender",pas.System.$rtti.TObject]],4),e.addMethod("WebFormCreate",0,[["Sender",pas.System.$rtti.TObject]],4),e.addMethod("_abort",1,[["Event",pas.Web.$rtti.TJSProgressEvent]],4,rtl.boolean),e.addMethod("_error",1,[["Event",pas.Web.$rtti.TJSProgressEvent]],4,rtl.boolean),e.addMethod("_final",1,[["Event",pas.Web.$rtti.TJSProgressEvent]],4,rtl.boolean),e.addMethod("_loadend",1,[["Event",pas.Web.$rtti.TJSProgressEvent]],4,rtl.boolean),e.addMethod("_progress",1,[["Event",pas.Web.$rtti.TJSProgressEvent]],4,rtl.boolean),e.addMethod("_timeout",1,[["Event",pas.Web.$rtti.TJSProgressEvent]],4,rtl.boolean)})),this.xhr=null,this.progressCounter=0,this.maxfsize=0})),rtl.module("mpoView.Fragebogen",["System","SysUtils","Classes","JS","XData.Web.Connection","XData.Web.Client","Web","WEBLib.Graphics","WEBLib.Controls","WEBLib.Forms","WEBLib.Dialogs","WEBLib.StdCtrls","WEBLib.StdCtrls","WEBLib.Controls","WEBLib.REST","WEBLib.JSON","WEBLib.ExtCtrls","WEBLib.WebCtrls","mpoapi.ReturnTypes","mpoweb.App.Types"],(function(){"use strict";rtl.createClass(this,"TFViewFB",pas["WEBLib.Forms"].TForm,(function(){this.$init=function(){pas["WEBLib.Forms"].TForm.$init.call(this),this.pnlMessage=null,this.lbMessage=null,this.WebMessageButton=null,this.edOrt=null,this.edStockwerk=null,this.rbBalkonE=null,this.cbGBWMitglied=null,this.edMiete=null,this.rbBalkonN=null,this.cbInternet=null,this.edZimmerVon=null,this.cbZeitung=null,this.edNachname=null,this.cbBasketball=null,this.edVorname=null,this.cbFreunde=null,this.edPLZ=null,this.cbEBKleinanzeigen=null,this.cbVergabebedingungen=null,this.btSpeichern=null,this.edStrasse=null,this.cbBekannt=null,this.rbWBSN=null,this.rbBalkonJ=null,this.Client=null,this.rbWBSJ1=null,this.cbDatenschutz=null,this.rbStockwerkN=null,this.rbStockwerkJ=null,this.rbBetreuungJ=null,this.rbBetreuungN=null,this.edZimmerBis=null,this.rbWBSJ2=null,this.rbWBSJ3=null,this.edHausnummer=null,this.WebMessageDlg1=null,this.FMessage="",this.FFragebogen=null,this.SuccessProc=null},this.$final=function(){this.pnlMessage=void 0,this.lbMessage=void 0,this.WebMessageButton=void 0,this.edOrt=void 0,this.edStockwerk=void 0,this.rbBalkonE=void 0,this.cbGBWMitglied=void 0,this.edMiete=void 0,this.rbBalkonN=void 0,this.cbInternet=void 0,this.edZimmerVon=void 0,this.cbZeitung=void 0,this.edNachname=void 0,this.cbBasketball=void 0,this.edVorname=void 0,this.cbFreunde=void 0,this.edPLZ=void 0,this.cbEBKleinanzeigen=void 0,this.cbVergabebedingungen=void 0,this.btSpeichern=void 0,this.edStrasse=void 0,this.cbBekannt=void 0,this.rbWBSN=void 0,this.rbBalkonJ=void 0,this.Client=void 0,this.rbWBSJ1=void 0,this.cbDatenschutz=void 0,this.rbStockwerkN=void 0,this.rbStockwerkJ=void 0,this.rbBetreuungJ=void 0,this.rbBetreuungN=void 0,this.edZimmerBis=void 0,this.rbWBSJ2=void 0,this.rbWBSJ3=void 0,this.edHausnummer=void 0,this.WebMessageDlg1=void 0,this.FFragebogen=void 0,this.SuccessProc=void 0,pas["WEBLib.Forms"].TForm.$final.call(this)},this.btSpeichernClick=function(t){var e=this;this.FelderViewToObj(),this.FelderObjToView(),this.CheckFields(),""===this.FMessage?(this.HiddenNotification(),window.console.log("Fragebogen:"),window.console.log(this.FFragebogen),this.Client.RawInvoke$2("IMPOBewerberService.FragebogenSet",[this.FFragebogen],(function(t){var i=null;i=rtl.as(pas["WEBLib.JSON"].TJSONObject.ParseJSONValue(t.GetResponseText()),pas["WEBLib.JSON"].TJSONObject),window.console.log(i),e.FMessage=rtl.as(i.GetValue$1("Meldung"),pas["WEBLib.JSON"].TJSONString).GetStrValue(),i.GetJSONValue("AllesOK")===pas["mpoapi.ReturnTypes"].cJBoolTrue?(pas["WEBLib.Dialogs"].ShowMessage("Ihre Eingaben wurden erfolgreich gespeichert."+pas.System.sLineBreak+"Bei Verfügbarkeit werden Sie automatisch per Email über Wohnungsangebote informiert."),null!=e.SuccessProc&&e.SuccessProc()):e.ShowNotification(e.FMessage+" "+pas.SysUtils.TimeToStr(pas.SysUtils.Now()))}),null)):this.ShowNotification(this.FMessage)},this.WebMessageButtonClick=function(t){this.HiddenNotification()},this.WebFormCreate=function(t){""!==this.FMessage?this.ShowNotification(this.FMessage):this.HiddenNotification()},this.WebFormShow=function(t){this.HoleFragebogenDS(),""!==this.FMessage?this.ShowNotification(this.FMessage):this.HiddenNotification()},this.HiddenNotification=function(){this.pnlMessage.GetElementHandle().hidden=!0},this.ShowNotification=function(t){""!==t&&(this.lbMessage.SetCaption(t),this.pnlMessage.GetElementHandle().hidden=!1)},this.HoleFragebogenDS=async function(){var t=null,e=null;this.FFragebogen=pas["mpoapi.ReturnTypes"].TmpoFragebogenWeb.$create("Create"),window.console.log("Abfrage"),200===(t=await this.Client.RawInvokeAsync("IMPOBewerberService.FragebogenGet",[])).GetStatusCode()&&(window.console.log("Text: "+t.GetResponseText()),e=rtl.as(pas["WEBLib.JSON"].TJSONObject.ParseJSONValue(t.GetResponseText()),pas["WEBLib.JSON"].TJSONObject),window.console.log("Daten: "+t.GetResponseText()),window.console.log(e),window.console.log("Nun: Einzelwerte..."),this.FBDeSer(this.FFragebogen,t.GetResponseText()),this.FelderObjToView())},this.FBDeSer=function(t,e){var i=null;i=rtl.as(pas["WEBLib.JSON"].TJSONObject.ParseJSONValue(e),pas["WEBLib.JSON"].TJSONObject),window.console.log(i),t.istMitglied=i.GetJSONValue("istMitglied")===pas["mpoapi.ReturnTypes"].cJBoolTrue,t.Nachname=i.GetJSONValue("Nachname"),t.Vorname=rtl.as(i.GetValue$1("Vorname"),pas["WEBLib.JSON"].TJSONString).GetStrValue(),t.Strasse=rtl.as(i.GetValue$1("Strasse"),pas["WEBLib.JSON"].TJSONString).GetStrValue(),t.Hausnummer=rtl.as(i.GetValue$1("Hausnummer"),pas["WEBLib.JSON"].TJSONString).GetStrValue(),t.PLZ=rtl.as(i.GetValue$1("PLZ"),pas["WEBLib.JSON"].TJSONString).GetStrValue(),t.Ort=rtl.as(i.GetValue$1("Ort"),pas["WEBLib.JSON"].TJSONString).GetStrValue(),t.WW_ZimmerVon=rtl.as(i.GetValue$1("WW_ZimmerVon"),pas["WEBLib.JSON"].TJSONNumber).FInt,t.WW_ZimmerBis=rtl.as(i.GetValue$1("WW_ZimmerBis"),pas["WEBLib.JSON"].TJSONNumber).FInt,t.WW_Miete=rtl.as(i.GetValue$1("WW_Miete"),pas["WEBLib.JSON"].TJSONNumber).FInt,t.WW_StockwerkJN=i.GetJSONValue("WW_StockwerkJN")===pas["mpoapi.ReturnTypes"].cJBoolTrue,t.WW_Stockwerk=i.GetJSONValue("WW_Stockwerk"),t.WW_Balkon=rtl.as(i.GetValue$1("WW_Balkon"),pas["WEBLib.JSON"].TJSONNumber).FInt,t.WBSStufe=rtl.as(i.GetValue$1("WBSStufe"),pas["WEBLib.JSON"].TJSONNumber).FInt,t.istQBekannte=i.GetJSONValue("istQBekannte")===pas["mpoapi.ReturnTypes"].cJBoolTrue,t.istQInternet=i.GetJSONValue("istQInternet")===pas["mpoapi.ReturnTypes"].cJBoolTrue,t.istQKleinanzeigen=i.GetJSONValue("istQKleinanzeigen")===pas["mpoapi.ReturnTypes"].cJBoolTrue,t.istQZeitung=i.GetJSONValue("istQZeitung")===pas["mpoapi.ReturnTypes"].cJBoolTrue,t.istQBasketball=i.GetJSONValue("istQBasketball")===pas["mpoapi.ReturnTypes"].cJBoolTrue,t.istQBekannt=i.GetJSONValue("istQBekannt")===pas["mpoapi.ReturnTypes"].cJBoolTrue,t.istOKVergabe=i.GetJSONValue("istOKVergabe")===pas["mpoapi.ReturnTypes"].cJBoolTrue,t.istOKDatenschutz=i.GetJSONValue("istOKDatenschutz")===pas["mpoapi.ReturnTypes"].cJBoolTrue},this.FelderObjToView=function(){this.cbGBWMitglied.SetChecked(this.FFragebogen.istMitglied),this.edVorname.SetText(this.FFragebogen.Vorname),this.edNachname.SetText(this.FFragebogen.Nachname),this.edStrasse.SetText(this.FFragebogen.Strasse),this.edHausnummer.SetText(this.FFragebogen.Hausnummer),this.edPLZ.SetText(this.FFragebogen.PLZ),this.edOrt.SetText(this.FFragebogen.Ort),this.edZimmerVon.SetText(pas.SysUtils.TIntegerHelper.ToString$1.call({p:this.FFragebogen,get:function(){return this.p.WW_ZimmerVon},set:function(t){this.p.WW_ZimmerVon=t}})),this.edZimmerBis.SetText(pas.SysUtils.TIntegerHelper.ToString$1.call({p:this.FFragebogen,get:function(){return this.p.WW_ZimmerBis},set:function(t){this.p.WW_ZimmerBis=t}})),this.edMiete.SetText(pas.SysUtils.TIntegerHelper.ToString$1.call({p:this.FFragebogen,get:function(){return this.p.WW_Miete},set:function(t){this.p.WW_Miete=t}})),this.rbStockwerkN.SetChecked(!this.FFragebogen.WW_StockwerkJN),this.rbStockwerkJ.SetChecked(this.FFragebogen.WW_StockwerkJN),this.edStockwerk.SetText(this.FFragebogen.WW_Stockwerk),this.rbBalkonE.SetChecked(0===this.FFragebogen.WW_Balkon),this.rbBalkonN.SetChecked(1===this.FFragebogen.WW_Balkon),this.rbBalkonJ.SetChecked(2===this.FFragebogen.WW_Balkon),this.rbWBSJ1.SetChecked(1===this.FFragebogen.WBSStufe),this.rbWBSJ2.SetChecked(2===this.FFragebogen.WBSStufe),this.rbWBSJ3.SetChecked(3===this.FFragebogen.WBSStufe),this.rbWBSN.SetChecked(0===this.FFragebogen.WBSStufe),this.cbFreunde.SetChecked(this.FFragebogen.istQBekannte),this.cbInternet.SetChecked(this.FFragebogen.istQInternet),this.cbEBKleinanzeigen.SetChecked(this.FFragebogen.istQKleinanzeigen),this.cbZeitung.SetChecked(this.FFragebogen.istQZeitung),this.cbBasketball.SetChecked(this.FFragebogen.istQBasketball),this.cbBekannt.SetChecked(this.FFragebogen.istQBekannt),this.cbVergabebedingungen.SetChecked(this.FFragebogen.istOKVergabe),this.cbDatenschutz.SetChecked(this.FFragebogen.istOKDatenschutz)},this.FelderViewToObj=function(){this.FFragebogen.istMitglied=this.cbGBWMitglied.GetChecked(),this.FFragebogen.Vorname=this.edVorname.GetText(),this.FFragebogen.Nachname=this.edNachname.GetText(),this.FFragebogen.Strasse=this.edStrasse.GetText(),this.FFragebogen.Hausnummer=this.edHausnummer.GetText(),this.FFragebogen.PLZ=this.edPLZ.GetText(),this.FFragebogen.Ort=this.edOrt.GetText(),this.FFragebogen.WW_ZimmerVon=pas.SysUtils.TStringHelper.ToInteger$1.call({p:this.edZimmerVon.GetText(),get:function(){return this.p},set:function(t){this.p=t}}),this.FFragebogen.WW_ZimmerBis=pas.SysUtils.TStringHelper.ToInteger$1.call({p:this.edZimmerBis.GetText(),get:function(){return this.p},set:function(t){this.p=t}}),this.FFragebogen.WW_Miete=pas.SysUtils.TStringHelper.ToInteger$1.call({p:this.edMiete.GetText(),get:function(){return this.p},set:function(t){this.p=t}}),this.FFragebogen.WW_StockwerkJN=this.rbStockwerkJ.GetChecked(),this.FFragebogen.WW_Stockwerk=this.edStockwerk.GetText(),this.rbBalkonE.GetChecked()&&(this.FFragebogen.WW_Balkon=0),this.rbBalkonN.GetChecked()&&(this.FFragebogen.WW_Balkon=1),this.rbBalkonJ.GetChecked()&&(this.FFragebogen.WW_Balkon=2),this.rbWBSN.GetChecked()?this.FFragebogen.WBSStufe=0:this.rbWBSJ1.GetChecked()?this.FFragebogen.WBSStufe=1:this.rbWBSJ2.GetChecked()?this.FFragebogen.WBSStufe=2:this.rbWBSJ3.GetChecked()&&(this.FFragebogen.WBSStufe=3),this.FFragebogen.istQBekannte=this.cbFreunde.GetChecked(),this.FFragebogen.istQInternet=this.cbInternet.GetChecked(),this.FFragebogen.istQKleinanzeigen=this.cbEBKleinanzeigen.GetChecked(),this.FFragebogen.istQZeitung=this.cbZeitung.GetChecked(),this.FFragebogen.istQBasketball=this.cbBasketball.GetChecked(),this.FFragebogen.istQBekannt=this.cbBekannt.GetChecked(),this.FFragebogen.istOKVergabe=this.cbVergabebedingungen.GetChecked(),this.FFragebogen.istOKDatenschutz=this.cbDatenschutz.GetChecked()},this.CheckFields=function(){this.FMessage="",this.cbDatenschutz.GetChecked()?rtl.asExt(document.getElementById(this.cbDatenschutz.GetID()),HTMLElement).classList.remove("is-invalid"):(this.FMessage=this.FMessage+"Zustimmung zum Datenschutz fehlt"+pas.System.sLineBreak,rtl.asExt(document.getElementById(this.cbDatenschutz.GetID()),HTMLElement).classList.add("is-invalid")),this.cbVergabebedingungen.GetChecked()?rtl.asExt(document.getElementById(this.cbDatenschutz.GetID()),HTMLElement).classList.remove("is-invalid"):(this.FMessage=this.FMessage+"Zustimmung zu den Vergabebedingungen fehlt"+pas.System.sLineBreak,rtl.asExt(document.getElementById(this.cbDatenschutz.GetID()),HTMLElement).classList.add("is-invalid"))},this.LoadDFMValues=function(){pas["WEBLib.Forms"].TCustomForm.LoadDFMValues.call(this),this.pnlMessage=pas["WEBLib.ExtCtrls"].TPanel.$create("Create$2",["view.Fragebogen.message"]),this.lbMessage=pas["WEBLib.StdCtrls"].TLabel.$create("Create$2",["view.Fragebogen.message.label"]),this.WebMessageButton=pas["WEBLib.StdCtrls"].TButton.$create("Create$2",["view.Fragebogen.message.button"]),this.edOrt=pas["WEBLib.StdCtrls"].TEdit.$create("Create$2",["view.Fragebogen.edOrt"]),this.edStockwerk=pas["WEBLib.StdCtrls"].TEdit.$create("Create$2",["view.Fragebogen.edStockwerk"]),this.rbBalkonE=pas["WEBLib.StdCtrls"].TRadioButton.$create("Create$2",["view.Fragebogen.rbBalkonE"]),this.cbGBWMitglied=pas["WEBLib.StdCtrls"].TCheckBox.$create("Create$2",["view.Fragebogen.cbGBWMitglied"]),this.edMiete=pas["WEBLib.StdCtrls"].TSpinEdit.$create("Create$2",["view.Fragebogen.edMiete"]),this.rbBalkonN=pas["WEBLib.StdCtrls"].TRadioButton.$create("Create$2",["view.Fragebogen.rbBalkonN"]),this.cbInternet=pas["WEBLib.StdCtrls"].TCheckBox.$create("Create$2",["view.Fragebogen.cbInternet"]),this.edZimmerVon=pas["WEBLib.StdCtrls"].TSpinEdit.$create("Create$2",["view.Fragebogen.edZimmerVon"]),this.cbZeitung=pas["WEBLib.StdCtrls"].TCheckBox.$create("Create$2",["view.Fragebogen.cbZeitung"]),this.edNachname=pas["WEBLib.StdCtrls"].TEdit.$create("Create$2",["view.Fragebogen.edNachname"]),this.cbBasketball=pas["WEBLib.StdCtrls"].TCheckBox.$create("Create$2",["view.Fragebogen.cbBasketball"]),this.edVorname=pas["WEBLib.StdCtrls"].TEdit.$create("Create$2",["view.Fragebogen.edVorname"]),this.cbFreunde=pas["WEBLib.StdCtrls"].TCheckBox.$create("Create$2",["view.Fragebogen.cbFreunde"]),this.edPLZ=pas["WEBLib.StdCtrls"].TSpinEdit.$create("Create$2",["view.Fragebogen.edPLZ"]),this.cbEBKleinanzeigen=pas["WEBLib.StdCtrls"].TCheckBox.$create("Create$2",["view.Fragebogen.cbEBKleinanzeigen"]),this.cbVergabebedingungen=pas["WEBLib.StdCtrls"].TCheckBox.$create("Create$2",["view.Fragebogen.cbVergabebedingungen"]),this.btSpeichern=pas["WEBLib.StdCtrls"].TButton.$create("Create$2",["view.Fragebogen.btSave"]),this.edStrasse=pas["WEBLib.StdCtrls"].TEdit.$create("Create$2",["view.Fragebogen.edStrasse"]),this.cbBekannt=pas["WEBLib.StdCtrls"].TCheckBox.$create("Create$2",["view.Fragebogen.cbBekannt"]),this.rbWBSN=pas["WEBLib.StdCtrls"].TRadioButton.$create("Create$2",["view.Fragebogen.rbWBSN"]),this.rbBalkonJ=pas["WEBLib.StdCtrls"].TRadioButton.$create("Create$2",["view.Fragebogen.rbBalkonJ"]),this.rbWBSJ1=pas["WEBLib.StdCtrls"].TRadioButton.$create("Create$2",["view.Fragebogen.rbWBS1J"]),this.cbDatenschutz=pas["WEBLib.StdCtrls"].TCheckBox.$create("Create$2",["view.Fragebogen.cbDatenschutz"]),this.rbStockwerkN=pas["WEBLib.StdCtrls"].TRadioButton.$create("Create$2",["view.Fragebogen.rbStockwerkN"]),this.rbStockwerkJ=pas["WEBLib.StdCtrls"].TRadioButton.$create("Create$2",["view.Fragebogen.rbStockwerkJ"]),this.rbBetreuungJ=pas["WEBLib.StdCtrls"].TRadioButton.$create("Create$2",["view.Fragebogen.rbBetreuungJ"]),this.rbBetreuungN=pas["WEBLib.StdCtrls"].TRadioButton.$create("Create$2",["view.Fragebogen.rbBetreuungN"]),this.edZimmerBis=pas["WEBLib.StdCtrls"].TSpinEdit.$create("Create$2",["view.Fragebogen.edZimmerBis"]),this.rbWBSJ2=pas["WEBLib.StdCtrls"].TRadioButton.$create("Create$2",["view.Fragebogen.rbWBS2J"]),this.rbWBSJ3=pas["WEBLib.StdCtrls"].TRadioButton.$create("Create$2",["view.Fragebogen.rbWBS3J"]),this.edHausnummer=pas["WEBLib.StdCtrls"].TEdit.$create("Create$2",["view.Fragebogen.edHausnummer"]),this.WebMessageDlg1=pas["WEBLib.Dialogs"].TMessageDlg.$create("Create$1",[this]),this.Client=pas["XData.Web.Client"].TXDataWebClient.$create("Create$1",[this]),this.pnlMessage.BeforeLoadDFMValues(),this.lbMessage.BeforeLoadDFMValues(),this.WebMessageButton.BeforeLoadDFMValues(),this.edOrt.BeforeLoadDFMValues(),this.edStockwerk.BeforeLoadDFMValues(),this.rbBalkonE.BeforeLoadDFMValues(),this.cbGBWMitglied.BeforeLoadDFMValues(),this.edMiete.BeforeLoadDFMValues(),this.rbBalkonN.BeforeLoadDFMValues(),this.cbInternet.BeforeLoadDFMValues(),this.edZimmerVon.BeforeLoadDFMValues(),this.cbZeitung.BeforeLoadDFMValues(),this.edNachname.BeforeLoadDFMValues(),this.cbBasketball.BeforeLoadDFMValues(),this.edVorname.BeforeLoadDFMValues(),this.cbFreunde.BeforeLoadDFMValues(),this.edPLZ.BeforeLoadDFMValues(),this.cbEBKleinanzeigen.BeforeLoadDFMValues(),this.cbVergabebedingungen.BeforeLoadDFMValues(),this.btSpeichern.BeforeLoadDFMValues(),this.edStrasse.BeforeLoadDFMValues(),this.cbBekannt.BeforeLoadDFMValues(),this.rbWBSN.BeforeLoadDFMValues(),this.rbBalkonJ.BeforeLoadDFMValues(),this.rbWBSJ1.BeforeLoadDFMValues(),this.cbDatenschutz.BeforeLoadDFMValues(),this.rbStockwerkN.BeforeLoadDFMValues(),this.rbStockwerkJ.BeforeLoadDFMValues(),this.rbBetreuungJ.BeforeLoadDFMValues(),this.rbBetreuungN.BeforeLoadDFMValues(),this.edZimmerBis.BeforeLoadDFMValues(),this.rbWBSJ2.BeforeLoadDFMValues(),this.rbWBSJ3.BeforeLoadDFMValues(),this.edHausnummer.BeforeLoadDFMValues(),this.WebMessageDlg1.BeforeLoadDFMValues(),this.Client.BeforeLoadDFMValues();try{this.SetName("FViewFB"),this.SetWidth(640),this.SetHeight(545),this.SetElementClassName("view.Fragebogen.rbgStockwerk"),this.SetElementFont(1),this.SetEvent(this,"OnCreate","WebFormCreate"),this.SetEvent(this,"OnShow","WebFormShow"),this.pnlMessage.SetParentComponent(this),this.pnlMessage.SetName("pnlMessage"),this.pnlMessage.SetLeft(0),this.pnlMessage.SetTop(0),this.pnlMessage.SetWidth(121),this.pnlMessage.SetHeight(33),this.pnlMessage.SetHeightStyle(2),this.pnlMessage.SetWidthStyle(2),this.pnlMessage.SetChildOrderEx(8),this.pnlMessage.SetElementFont(1),this.pnlMessage.SetElementPosition(2),this.lbMessage.SetParentComponent(this.pnlMessage),this.lbMessage.SetName("lbMessage"),this.lbMessage.SetLeft(16),this.lbMessage.SetTop(11),this.lbMessage.SetWidth(42),this.lbMessage.SetHeight(13),this.lbMessage.SetCaption("Message"),this.lbMessage.SetHeightPercent(100),this.lbMessage.SetWidthPercent(100),this.WebMessageButton.SetParentComponent(this.pnlMessage),this.WebMessageButton.SetName("WebMessageButton"),this.WebMessageButton.SetLeft(96),this.WebMessageButton.SetTop(3),this.WebMessageButton.SetWidth(22),this.WebMessageButton.SetHeight(25),this.WebMessageButton.SetCaption("x"),this.WebMessageButton.SetChildOrderEx(1),this.WebMessageButton.SetElementFont(1),this.WebMessageButton.SetElementPosition(2),this.WebMessageButton.SetHeightStyle(2),this.WebMessageButton.SetHeightPercent(100),this.WebMessageButton.SetWidthStyle(2),this.WebMessageButton.SetWidthPercent(100),this.SetEvent$1(this.WebMessageButton,this,"OnClick","WebMessageButtonClick"),this.edOrt.SetParentComponent(this),this.edOrt.SetName("edOrt"),this.edOrt.SetLeft(404),this.edOrt.SetTop(0),this.edOrt.SetWidth(96),this.edOrt.SetHeight(25),this.edOrt.SetChildOrderEx(3),this.edOrt.SetElementFont(1),this.edOrt.SetElementPosition(2),this.edOrt.SetHeightStyle(2),this.edOrt.SetHeightPercent(100),this.edOrt.SetWidthStyle(2),this.edOrt.SetWidthPercent(100),this.edStockwerk.SetParentComponent(this),this.edStockwerk.SetName("edStockwerk"),this.edStockwerk.SetLeft(505),this.edStockwerk.SetTop(0),this.edStockwerk.SetWidth(96),this.edStockwerk.SetHeight(25),this.edStockwerk.SetChildOrderEx(4),this.edStockwerk.SetElementFont(1),this.edStockwerk.SetElementPosition(2),this.edStockwerk.SetHeightStyle(2),this.edStockwerk.SetHeightPercent(100),this.edStockwerk.SetWidthStyle(2),this.edStockwerk.SetWidthPercent(100),this.rbBalkonE.SetParentComponent(this),this.rbBalkonE.SetName("rbBalkonE"),this.rbBalkonE.SetLeft(13),this.rbBalkonE.SetTop(270),this.rbBalkonE.SetWidth(96),this.rbBalkonE.SetHeight(25),this.rbBalkonE.SetCaption("rbBalkonE"),this.rbBalkonE.SetChecked(!0),this.rbBalkonE.SetChildOrderEx(5),this.rbBalkonE.SetColor(-1),this.rbBalkonE.SetElementFont(1),this.rbBalkonE.SetElementPosition(2),this.rbBalkonE.SetGroupName("rbgBalkon"),this.rbBalkonE.SetHeightStyle(2),this.rbBalkonE.SetHeightPercent(100),this.rbBalkonE.SetWidthStyle(2),this.rbBalkonE.SetWidthPercent(100),this.cbGBWMitglied.SetParentComponent(this),this.cbGBWMitglied.SetName("cbGBWMitglied"),this.cbGBWMitglied.SetLeft(138),this.cbGBWMitglied.SetTop(29),this.cbGBWMitglied.SetWidth(96),this.cbGBWMitglied.SetHeight(25),this.cbGBWMitglied.SetCaption("cbGBWMitglied"),this.cbGBWMitglied.SetChildOrderEx(7),this.cbGBWMitglied.SetElementFont(1),this.cbGBWMitglied.SetElementPosition(2),this.cbGBWMitglied.SetHeightStyle(2),this.cbGBWMitglied.SetHeightPercent(100),this.cbGBWMitglied.SetWidthStyle(2),this.cbGBWMitglied.SetWidthPercent(100),this.edMiete.SetParentComponent(this),this.edMiete.SetName("edMiete"),this.edMiete.SetLeft(505),this.edMiete.SetTop(30),this.edMiete.SetWidth(96),this.edMiete.SetHeight(25),this.edMiete.SetHeightStyle(2),this.edMiete.SetWidthStyle(2),this.edMiete.FAutoSize=!1,this.edMiete.SetBorderStyle(1),this.edMiete.SetChildOrderEx(8),this.edMiete.SetColor(16777215),this.edMiete.SetElementFont(1),this.edMiete.SetElementPosition(2),this.edMiete.SetIncrement(1),this.edMiete.SetMaxValue(100),this.edMiete.SetMinValue(0),this.edMiete.SetRole(""),this.edMiete.SetValue(0),this.rbBalkonN.SetParentComponent(this),this.rbBalkonN.SetName("rbBalkonN"),this.rbBalkonN.SetLeft(13),this.rbBalkonN.SetTop(301),this.rbBalkonN.SetWidth(96),this.rbBalkonN.SetHeight(25),this.rbBalkonN.SetCaption("rbBalkonN"),this.rbBalkonN.SetChecked(!1),this.rbBalkonN.SetChildOrderEx(9),this.rbBalkonN.SetColor(-1),this.rbBalkonN.SetElementFont(1),this.rbBalkonN.SetElementPosition(2),this.rbBalkonN.SetGroupName("rbgBalkon"),this.rbBalkonN.SetHeightStyle(2),this.rbBalkonN.SetHeightPercent(100),this.rbBalkonN.SetWidthStyle(2),this.rbBalkonN.SetWidthPercent(100),this.cbInternet.SetParentComponent(this),this.cbInternet.SetName("cbInternet"),this.cbInternet.SetLeft(505),this.cbInternet.SetTop(394),this.cbInternet.SetWidth(96),this.cbInternet.SetHeight(25),this.cbInternet.SetCaption("cbInternet"),this.cbInternet.SetChildOrderEx(11),this.cbInternet.SetElementFont(1),this.cbInternet.SetElementPosition(2),this.cbInternet.SetHeightStyle(2),this.cbInternet.SetHeightPercent(100),this.cbInternet.SetWidthStyle(2),this.cbInternet.SetWidthPercent(100),this.edZimmerVon.SetParentComponent(this),this.edZimmerVon.SetName("edZimmerVon"),this.edZimmerVon.SetLeft(303),this.edZimmerVon.SetTop(60),this.edZimmerVon.SetWidth(96),this.edZimmerVon.SetHeight(25),this.edZimmerVon.SetHeightStyle(2),this.edZimmerVon.SetWidthStyle(2),this.edZimmerVon.FAutoSize=!1,this.edZimmerVon.SetBorderStyle(1),this.edZimmerVon.SetChildOrderEx(12),this.edZimmerVon.SetColor(16777215),this.edZimmerVon.SetElementFont(1),this.edZimmerVon.SetElementPosition(2),this.edZimmerVon.SetIncrement(1),this.edZimmerVon.SetMaxValue(100),this.edZimmerVon.SetMinValue(0),this.edZimmerVon.SetRole(""),this.edZimmerVon.SetValue(0),this.cbZeitung.SetParentComponent(this),this.cbZeitung.SetName("cbZeitung"),this.cbZeitung.SetLeft(505),this.cbZeitung.SetTop(279),this.cbZeitung.SetWidth(96),this.cbZeitung.SetHeight(25),this.cbZeitung.SetCaption("cbZeitung"),this.cbZeitung.SetChildOrderEx(13),this.cbZeitung.SetElementFont(1),this.cbZeitung.SetElementPosition(2),this.cbZeitung.SetHeightStyle(2),this.cbZeitung.SetHeightPercent(100),this.cbZeitung.SetWidthStyle(2),this.cbZeitung.SetWidthPercent(100),this.edNachname.SetParentComponent(this),this.edNachname.SetName("edNachname"),this.edNachname.SetLeft(303),this.edNachname.SetTop(137),this.edNachname.SetWidth(96),this.edNachname.SetHeight(25),this.edNachname.SetHint("Nachname"),this.edNachname.SetChildOrderEx(14),this.edNachname.SetElementFont(1),this.edNachname.SetElementPosition(2),this.edNachname.SetHeightStyle(2),this.edNachname.SetHeightPercent(100),this.edNachname.SetShowHint(!0),this.edNachname.SetWidthStyle(2),this.edNachname.SetWidthPercent(100),this.cbBasketball.SetParentComponent(this),this.cbBasketball.SetName("cbBasketball"),this.cbBasketball.SetLeft(505),this.cbBasketball.SetTop(248),this.cbBasketball.SetWidth(96),this.cbBasketball.SetHeight(25),this.cbBasketball.SetCaption("cbBasketball"),this.cbBasketball.SetChildOrderEx(16),this.cbBasketball.SetElementFont(1),this.cbBasketball.SetElementPosition(2),this.cbBasketball.SetHeightStyle(2),this.cbBasketball.SetHeightPercent(100),this.cbBasketball.SetWidthStyle(2),this.cbBasketball.SetWidthPercent(100),this.edVorname.SetParentComponent(this),this.edVorname.SetName("edVorname"),this.edVorname.SetLeft(303),this.edVorname.SetTop(106),this.edVorname.SetWidth(96),this.edVorname.SetHeight(25),this.edVorname.SetHint("Vorname"),this.edVorname.SetChildOrderEx(19),this.edVorname.SetElementFont(1),this.edVorname.SetElementPosition(2),this.edVorname.SetHeightStyle(2),this.edVorname.SetHeightPercent(100),this.edVorname.SetShowHint(!0),this.edVorname.SetWidthStyle(2),this.edVorname.SetWidthPercent(100),this.cbFreunde.SetParentComponent(this),this.cbFreunde.SetName("cbFreunde"),this.cbFreunde.SetLeft(505),this.cbFreunde.SetTop(363),this.cbFreunde.SetWidth(96),this.cbFreunde.SetHeight(25),this.cbFreunde.SetCaption("Empfehlung Freunde / Bekannte"),this.cbFreunde.SetChildOrderEx(20),this.cbFreunde.SetElementFont(1),this.cbFreunde.SetElementPosition(2),this.cbFreunde.SetHeightStyle(2),this.cbFreunde.SetHeightPercent(100),this.cbFreunde.SetWidthStyle(2),this.cbFreunde.SetWidthPercent(100),this.edPLZ.SetParentComponent(this),this.edPLZ.SetName("edPLZ"),this.edPLZ.SetLeft(101),this.edPLZ.SetTop(120),this.edPLZ.SetWidth(96),this.edPLZ.SetHeight(25),this.edPLZ.SetHeightStyle(2),this.edPLZ.SetWidthStyle(2),this.edPLZ.FAutoSize=!1,this.edPLZ.SetBorderStyle(1),this.edPLZ.SetChildOrderEx(22),this.edPLZ.SetColor(16777215),this.edPLZ.SetElementFont(1),this.edPLZ.SetElementPosition(2),this.edPLZ.SetIncrement(1),this.edPLZ.SetMaxValue(100),this.edPLZ.SetMinValue(0),this.edPLZ.SetRole(""),this.edPLZ.SetValue(0),this.cbEBKleinanzeigen.SetParentComponent(this),this.cbEBKleinanzeigen.SetName("cbEBKleinanzeigen"),this.cbEBKleinanzeigen.SetLeft(505),this.cbEBKleinanzeigen.SetTop(310),this.cbEBKleinanzeigen.SetWidth(96),this.cbEBKleinanzeigen.SetHeight(25),this.cbEBKleinanzeigen.SetCaption("cbEBKleinanzeigen"),this.cbEBKleinanzeigen.SetChildOrderEx(24),this.cbEBKleinanzeigen.SetElementFont(1),this.cbEBKleinanzeigen.SetElementPosition(2),this.cbEBKleinanzeigen.SetHeightStyle(2),this.cbEBKleinanzeigen.SetHeightPercent(100),this.cbEBKleinanzeigen.SetWidthStyle(2),this.cbEBKleinanzeigen.SetWidthPercent(100),this.cbVergabebedingungen.SetParentComponent(this),this.cbVergabebedingungen.SetName("cbVergabebedingungen"),this.cbVergabebedingungen.SetLeft(8),this.cbVergabebedingungen.SetTop(405),this.cbVergabebedingungen.SetWidth(138),this.cbVergabebedingungen.SetHeight(25),this.cbVergabebedingungen.SetCaption("cbVergabebedingungen"),this.cbVergabebedingungen.SetChildOrderEx(25),this.cbVergabebedingungen.SetElementFont(1),this.cbVergabebedingungen.SetElementPosition(2),this.cbVergabebedingungen.SetHeightStyle(2),this.cbVergabebedingungen.SetHeightPercent(100),this.cbVergabebedingungen.SetWidthStyle(2),this.cbVergabebedingungen.SetWidthPercent(100),this.btSpeichern.SetParentComponent(this),this.btSpeichern.SetName("btSpeichern"),this.btSpeichern.SetLeft(505),this.btSpeichern.SetTop(120),this.btSpeichern.SetWidth(96),this.btSpeichern.SetHeight(25),this.btSpeichern.SetCaption("Speichern"),this.btSpeichern.SetChildOrderEx(26),this.btSpeichern.SetElementFont(1),this.btSpeichern.SetElementPosition(2),this.btSpeichern.SetHeightStyle(2),this.btSpeichern.SetHeightPercent(100),this.btSpeichern.SetWidthStyle(2),this.btSpeichern.SetWidthPercent(100),this.SetEvent$1(this.btSpeichern,this,"OnClick","btSpeichernClick"),this.edStrasse.SetParentComponent(this),this.edStrasse.SetName("edStrasse"),this.edStrasse.SetLeft(303),this.edStrasse.SetTop(168),this.edStrasse.SetWidth(96),this.edStrasse.SetHeight(25),this.edStrasse.SetHint("Strasse"),this.edStrasse.SetChildOrderEx(28),this.edStrasse.SetElementFont(1),this.edStrasse.SetElementPosition(2),this.edStrasse.SetHeightStyle(2),this.edStrasse.SetHeightPercent(100),this.edStrasse.SetShowHint(!0),this.edStrasse.SetWidthStyle(2),this.edStrasse.SetWidthPercent(100),this.cbBekannt.SetParentComponent(this),this.cbBekannt.SetName("cbBekannt"),this.cbBekannt.SetLeft(505),this.cbBekannt.SetTop(332),this.cbBekannt.SetWidth(96),this.cbBekannt.SetHeight(25),this.cbBekannt.SetCaption("cbBekannt"),this.cbBekannt.SetChildOrderEx(29),this.cbBekannt.SetElementFont(1),this.cbBekannt.SetElementPosition(2),this.cbBekannt.SetHeightStyle(2),this.cbBekannt.SetHeightPercent(100),this.cbBekannt.SetWidthStyle(2),this.cbBekannt.SetWidthPercent(100),this.rbWBSN.SetParentComponent(this),this.rbWBSN.SetName("rbWBSN"),this.rbWBSN.SetLeft(394),this.rbWBSN.SetTop(301),this.rbWBSN.SetWidth(60),this.rbWBSN.SetHeight(25),this.rbWBSN.SetCaption("rbWBSN"),this.rbWBSN.SetChecked(!0),this.rbWBSN.SetChildOrderEx(31),this.rbWBSN.SetColor(-1),this.rbWBSN.SetElementFont(1),this.rbWBSN.SetElementPosition(2),this.rbWBSN.SetGroupName("rbgWBS"),this.rbWBSN.SetHeightStyle(2),this.rbWBSN.SetHeightPercent(100),this.rbWBSN.SetWidthStyle(2),this.rbWBSN.SetWidthPercent(100),this.rbBalkonJ.SetParentComponent(this),this.rbBalkonJ.SetName("rbBalkonJ"),this.rbBalkonJ.SetLeft(13),this.rbBalkonJ.SetTop(332),this.rbBalkonJ.SetWidth(96),this.rbBalkonJ.SetHeight(25),this.rbBalkonJ.SetCaption("rbBalkonJ"),this.rbBalkonJ.SetChecked(!1),this.rbBalkonJ.SetChildOrderEx(33),this.rbBalkonJ.SetColor(-1),this.rbBalkonJ.SetElementFont(1),this.rbBalkonJ.SetElementPosition(2),this.rbBalkonJ.SetGroupName("rbgBalkon"),this.rbBalkonJ.SetHeightStyle(2),this.rbBalkonJ.SetHeightPercent(100),this.rbBalkonJ.SetWidthStyle(2),this.rbBalkonJ.SetWidthPercent(100),this.rbWBSJ1.SetParentComponent(this),this.rbWBSJ1.SetName("rbWBSJ1"),this.rbWBSJ1.SetLeft(394),this.rbWBSJ1.SetTop(230),this.rbWBSJ1.SetWidth(60),this.rbWBSJ1.SetHeight(25),this.rbWBSJ1.SetCaption("rbWBSJ1"),this.rbWBSJ1.SetChecked(!1),this.rbWBSJ1.SetChildOrderEx(35),this.rbWBSJ1.SetColor(-1),this.rbWBSJ1.SetElementFont(1),this.rbWBSJ1.SetElementPosition(2),this.rbWBSJ1.SetGroupName("rbgWBS"),this.rbWBSJ1.SetHeightStyle(2),this.rbWBSJ1.SetHeightPercent(100),this.rbWBSJ1.SetWidthStyle(2),this.rbWBSJ1.SetWidthPercent(100),this.cbDatenschutz.SetParentComponent(this),this.cbDatenschutz.SetName("cbDatenschutz"),this.cbDatenschutz.SetLeft(8),this.cbDatenschutz.SetTop(430),this.cbDatenschutz.SetWidth(96),this.cbDatenschutz.SetHeight(25),this.cbDatenschutz.SetCaption("cbDatenschutz"),this.cbDatenschutz.SetChildOrderEx(37),this.cbDatenschutz.SetElementFont(1),this.cbDatenschutz.SetElementPosition(2),this.cbDatenschutz.SetHeightStyle(2),this.cbDatenschutz.SetHeightPercent(100),this.cbDatenschutz.SetWidthStyle(2),this.cbDatenschutz.SetWidthPercent(100),this.rbStockwerkN.SetParentComponent(this),this.rbStockwerkN.SetName("rbStockwerkN"),this.rbStockwerkN.SetLeft(16),this.rbStockwerkN.SetTop(181),this.rbStockwerkN.SetWidth(90),this.rbStockwerkN.SetHeight(25),this.rbStockwerkN.SetCaption("rbStockwerkN"),this.rbStockwerkN.SetChecked(!0),this.rbStockwerkN.SetChildOrderEx(38),this.rbStockwerkN.SetColor(-1),this.rbStockwerkN.SetElementFont(1),this.rbStockwerkN.SetElementPosition(2),this.rbStockwerkN.SetGroupName("rbgStockwerk"),this.rbStockwerkN.SetHeightStyle(2),this.rbStockwerkN.SetHeightPercent(100),this.rbStockwerkN.SetWidthStyle(2),this.rbStockwerkN.SetWidthPercent(100),this.rbStockwerkJ.SetParentComponent(this),this.rbStockwerkJ.SetName("rbStockwerkJ"),this.rbStockwerkJ.SetLeft(16),this.rbStockwerkJ.SetTop(204),this.rbStockwerkJ.SetWidth(90),this.rbStockwerkJ.SetHeight(25),this.rbStockwerkJ.SetCaption("rbStockwerkJ"),this.rbStockwerkJ.SetChecked(!1),this.rbStockwerkJ.SetChildOrderEx(39),this.rbStockwerkJ.SetColor(-1),this.rbStockwerkJ.SetElementFont(1),this.rbStockwerkJ.SetElementPosition(2),this.rbStockwerkJ.SetGroupName("rbgStockwerk"),this.rbStockwerkJ.SetHeightStyle(2),this.rbStockwerkJ.SetHeightPercent(100),this.rbStockwerkJ.SetWidthStyle(2),this.rbStockwerkJ.SetWidthPercent(100),this.rbBetreuungJ.SetParentComponent(this),this.rbBetreuungJ.SetName("rbBetreuungJ"),this.rbBetreuungJ.SetLeft(287),this.rbBetreuungJ.SetTop(444),this.rbBetreuungJ.SetWidth(96),this.rbBetreuungJ.SetHeight(25),this.rbBetreuungJ.SetCaption("rbBetreuungJ"),this.rbBetreuungJ.SetChecked(!1),this.rbBetreuungJ.SetChildOrderEx(43),this.rbBetreuungJ.SetColor(-1),this.rbBetreuungJ.SetElementFont(1),this.rbBetreuungJ.SetElementPosition(2),this.rbBetreuungJ.SetGroupName("rbgBetreuung"),this.rbBetreuungJ.SetHeightStyle(2),this.rbBetreuungJ.SetHeightPercent(100),this.rbBetreuungJ.SetWidthStyle(2),this.rbBetreuungJ.SetWidthPercent(100),this.rbBetreuungN.SetParentComponent(this),this.rbBetreuungN.SetName("rbBetreuungN"),this.rbBetreuungN.SetLeft(287),this.rbBetreuungN.SetTop(420),this.rbBetreuungN.SetWidth(96),this.rbBetreuungN.SetHeight(25),this.rbBetreuungN.SetCaption("rbBetreuungN"),this.rbBetreuungN.SetChecked(!0),this.rbBetreuungN.SetChildOrderEx(45),this.rbBetreuungN.SetColor(-1),this.rbBetreuungN.SetElementFont(1),this.rbBetreuungN.SetElementPosition(2),this.rbBetreuungN.SetGroupName("rbgBetreuung"),this.rbBetreuungN.SetHeightStyle(2),this.rbBetreuungN.SetHeightPercent(100),this.rbBetreuungN.SetWidthStyle(2),this.rbBetreuungN.SetWidthPercent(100),this.edZimmerBis.SetParentComponent(this),this.edZimmerBis.SetName("edZimmerBis"),this.edZimmerBis.SetLeft(405),this.edZimmerBis.SetTop(61),this.edZimmerBis.SetWidth(96),this.edZimmerBis.SetHeight(25),this.edZimmerBis.SetHeightStyle(2),this.edZimmerBis.SetWidthStyle(2),this.edZimmerBis.FAutoSize=!1,this.edZimmerBis.SetBorderStyle(1),this.edZimmerBis.SetChildOrderEx(12),this.edZimmerBis.SetColor(16777215),this.edZimmerBis.SetElementFont(1),this.edZimmerBis.SetElementPosition(2),this.edZimmerBis.SetIncrement(1),this.edZimmerBis.SetMaxValue(100),this.edZimmerBis.SetMinValue(0),this.edZimmerBis.SetRole(""),this.edZimmerBis.SetValue(0),this.rbWBSJ2.SetParentComponent(this),this.rbWBSJ2.SetName("rbWBSJ2"),this.rbWBSJ2.SetLeft(394),this.rbWBSJ2.SetTop(248),this.rbWBSJ2.SetWidth(60),this.rbWBSJ2.SetHeight(25),this.rbWBSJ2.SetCaption("rbWBSJ2"),this.rbWBSJ2.SetChecked(!1),this.rbWBSJ2.SetChildOrderEx(35),this.rbWBSJ2.SetColor(-1),this.rbWBSJ2.SetElementFont(1),this.rbWBSJ2.SetElementPosition(2),this.rbWBSJ2.SetGroupName("rbgWBS"),this.rbWBSJ2.SetHeightStyle(2),this.rbWBSJ2.SetHeightPercent(100),this.rbWBSJ2.SetWidthStyle(2),this.rbWBSJ2.SetWidthPercent(100),this.rbWBSJ3.SetParentComponent(this),this.rbWBSJ3.SetName("rbWBSJ3"),this.rbWBSJ3.SetLeft(394),this.rbWBSJ3.SetTop(270),this.rbWBSJ3.SetWidth(60),this.rbWBSJ3.SetHeight(25),this.rbWBSJ3.SetCaption("rbWBSJ3"),this.rbWBSJ3.SetChecked(!1),this.rbWBSJ3.SetChildOrderEx(35),this.rbWBSJ3.SetColor(-1),this.rbWBSJ3.SetElementFont(1),this.rbWBSJ3.SetElementPosition(2),this.rbWBSJ3.SetGroupName("rbgWBS"),this.rbWBSJ3.SetHeightStyle(2),this.rbWBSJ3.SetHeightPercent(100),this.rbWBSJ3.SetWidthStyle(2),this.rbWBSJ3.SetWidthPercent(100),this.edHausnummer.SetParentComponent(this),this.edHausnummer.SetName("edHausnummer"),this.edHausnummer.SetLeft(199),this.edHausnummer.SetTop(206),this.edHausnummer.SetWidth(96),this.edHausnummer.SetHeight(25),this.edHausnummer.SetChildOrderEx(32),this.edHausnummer.SetElementFont(1),this.edHausnummer.SetElementPosition(2),this.edHausnummer.SetHeightStyle(2),this.edHausnummer.SetHeightPercent(100),this.edHausnummer.SetWidthStyle(2),this.edHausnummer.SetWidthPercent(100),this.WebMessageDlg1.SetParentComponent(this),this.WebMessageDlg1.SetName("WebMessageDlg1"),this.WebMessageDlg1.SetLeft(312),this.WebMessageDlg1.SetTop(264),this.WebMessageDlg1.SetWidth(24),this.WebMessageDlg1.SetHeight(24),this.WebMessageDlg1.FButtons={},this.WebMessageDlg1.FOpacity=.2,this.Client.SetParentComponent(this),this.Client.SetName("Client"),this.Client.SetConnection(pas["mpoweb.ConnectionModule"].DMConnection.ApiConnection),this.Client.SetLeft(16),this.Client.SetTop(64)}finally{this.pnlMessage.AfterLoadDFMValues(),this.lbMessage.AfterLoadDFMValues(),this.WebMessageButton.AfterLoadDFMValues(),this.edOrt.AfterLoadDFMValues(),this.edStockwerk.AfterLoadDFMValues(),this.rbBalkonE.AfterLoadDFMValues(),this.cbGBWMitglied.AfterLoadDFMValues(),this.edMiete.AfterLoadDFMValues(),this.rbBalkonN.AfterLoadDFMValues(),this.cbInternet.AfterLoadDFMValues(),this.edZimmerVon.AfterLoadDFMValues(),this.cbZeitung.AfterLoadDFMValues(),this.edNachname.AfterLoadDFMValues(),this.cbBasketball.AfterLoadDFMValues(),this.edVorname.AfterLoadDFMValues(),this.cbFreunde.AfterLoadDFMValues(),this.edPLZ.AfterLoadDFMValues(),this.cbEBKleinanzeigen.AfterLoadDFMValues(),this.cbVergabebedingungen.AfterLoadDFMValues(),this.btSpeichern.AfterLoadDFMValues(),this.edStrasse.AfterLoadDFMValues(),this.cbBekannt.AfterLoadDFMValues(),this.rbWBSN.AfterLoadDFMValues(),this.rbBalkonJ.AfterLoadDFMValues(),this.rbWBSJ1.AfterLoadDFMValues(),this.cbDatenschutz.AfterLoadDFMValues(),this.rbStockwerkN.AfterLoadDFMValues(),this.rbStockwerkJ.AfterLoadDFMValues(),this.rbBetreuungJ.AfterLoadDFMValues(),this.rbBetreuungN.AfterLoadDFMValues(),this.edZimmerBis.AfterLoadDFMValues(),this.rbWBSJ2.AfterLoadDFMValues(),this.rbWBSJ3.AfterLoadDFMValues(),this.edHausnummer.AfterLoadDFMValues(),this.WebMessageDlg1.AfterLoadDFMValues(),this.Client.AfterLoadDFMValues()}},rtl.addIntf(this,pas["WEBLib.Controls"].IControl),rtl.addIntf(this,pas.System.IUnknown);var t=this.$rtti;t.addField("pnlMessage",pas["WEBLib.ExtCtrls"].$rtti.TPanel,4),t.addField("lbMessage",pas["WEBLib.StdCtrls"].$rtti.TLabel,4),t.addField("WebMessageButton",pas["WEBLib.StdCtrls"].$rtti.TButton,4),t.addField("edOrt",pas["WEBLib.StdCtrls"].$rtti.TEdit,4),t.addField("edStockwerk",pas["WEBLib.StdCtrls"].$rtti.TEdit,4),t.addField("rbBalkonE",pas["WEBLib.StdCtrls"].$rtti.TRadioButton,4),t.addField("cbGBWMitglied",pas["WEBLib.StdCtrls"].$rtti.TCheckBox,4),t.addField("edMiete",pas["WEBLib.StdCtrls"].$rtti.TSpinEdit,4),t.addField("rbBalkonN",pas["WEBLib.StdCtrls"].$rtti.TRadioButton,4),t.addField("cbInternet",pas["WEBLib.StdCtrls"].$rtti.TCheckBox,4),t.addField("edZimmerVon",pas["WEBLib.StdCtrls"].$rtti.TSpinEdit,4),t.addField("cbZeitung",pas["WEBLib.StdCtrls"].$rtti.TCheckBox,4),t.addField("edNachname",pas["WEBLib.StdCtrls"].$rtti.TEdit,4),t.addField("cbBasketball",pas["WEBLib.StdCtrls"].$rtti.TCheckBox,4),t.addField("edVorname",pas["WEBLib.StdCtrls"].$rtti.TEdit,4),t.addField("cbFreunde",pas["WEBLib.StdCtrls"].$rtti.TCheckBox,4),t.addField("edPLZ",pas["WEBLib.StdCtrls"].$rtti.TSpinEdit,4),t.addField("cbEBKleinanzeigen",pas["WEBLib.StdCtrls"].$rtti.TCheckBox,4),t.addField("cbVergabebedingungen",pas["WEBLib.StdCtrls"].$rtti.TCheckBox,4),t.addField("btSpeichern",pas["WEBLib.StdCtrls"].$rtti.TButton,4),t.addField("edStrasse",pas["WEBLib.StdCtrls"].$rtti.TEdit,4),t.addField("cbBekannt",pas["WEBLib.StdCtrls"].$rtti.TCheckBox,4),t.addField("rbWBSN",pas["WEBLib.StdCtrls"].$rtti.TRadioButton,4),t.addField("rbBalkonJ",pas["WEBLib.StdCtrls"].$rtti.TRadioButton,4),t.addField("Client",pas["XData.Web.Client"].$rtti.TXDataWebClient,4),t.addField("rbWBSJ1",pas["WEBLib.StdCtrls"].$rtti.TRadioButton,4),t.addField("cbDatenschutz",pas["WEBLib.StdCtrls"].$rtti.TCheckBox,4),t.addField("rbStockwerkN",pas["WEBLib.StdCtrls"].$rtti.TRadioButton,4),t.addField("rbStockwerkJ",pas["WEBLib.StdCtrls"].$rtti.TRadioButton,4),t.addField("rbBetreuungJ",pas["WEBLib.StdCtrls"].$rtti.TRadioButton,4),t.addField("rbBetreuungN",pas["WEBLib.StdCtrls"].$rtti.TRadioButton,4),t.addField("edZimmerBis",pas["WEBLib.StdCtrls"].$rtti.TSpinEdit,4),t.addField("rbWBSJ2",pas["WEBLib.StdCtrls"].$rtti.TRadioButton,4),t.addField("rbWBSJ3",pas["WEBLib.StdCtrls"].$rtti.TRadioButton,4),t.addField("edHausnummer",pas["WEBLib.StdCtrls"].$rtti.TEdit,4),t.addField("WebMessageDlg1",pas["WEBLib.Dialogs"].$rtti.TMessageDlg,4),t.addMethod("btSpeichernClick",0,[["Sender",pas.System.$rtti.TObject]],4),t.addMethod("WebMessageButtonClick",0,[["Sender",pas.System.$rtti.TObject]],4),t.addMethod("WebFormCreate",0,[["Sender",pas.System.$rtti.TObject]],4),t.addMethod("WebFormShow",0,[["Sender",pas.System.$rtti.TObject]],4)}))}),["mpoweb.ConnectionModule","mpoweb.Auth.Service"]),rtl.module("mpoView.FBErweitert",["System","SysUtils","Classes","JS","Web","XData.Web.Connection","XData.Web.Client","WEBLib.Graphics","WEBLib.Controls","WEBLib.Forms","WEBLib.Dialogs","WEBLib.StdCtrls","WEBLib.StdCtrls","WEBLib.Controls","WEBLib.ExtCtrls","WEBLib.WebCtrls","WEBLib.REST","WEBLib.JSON","mpoapi.ReturnTypes","mpoweb.ConnectionModule","mpoweb.App.Types"],(function(){"use strict";rtl.createClass(this,"TFViewFBErweitert",pas["WEBLib.Forms"].TForm,(function(){this.$init=function(){pas["WEBLib.Forms"].TForm.$init.call(this),this.pnlMessage=null,this.lbMessage=null,this.WebMessageButton=null,this.btSpeichern=null,this.cbDatenschutz=null,this.cbAngabenOK=null,this.rbFSGehaltJ=null,this.edTelefon=null,this.edTierRasse=null,this.rbFSInsolvN=null,this.rbTiereN=null,this.edBeruf=null,this.rbFSEidVN=null,this.rbTiereJ=null,this.rbFSInsolvJ=null,this.edReligion=null,this.edNachname=null,this.edArbeitgeber=null,this.rbFSRaeumungJ=null,this.edPersonenGesamt=null,this.edPersonenErwachsene=null,this.edVorname=null,this.edPersKinder=null,this.rbFSGehaltN=null,this.rbFSEidVJ=null,this.rbFSRaeumungN=null,this.edTiereAnzahl=null,this.edAnmerkungen=null,this.Client=null,this.edGebDat=null,this.edFSAuskunft=null,this.FMessage="",this.FFragebogen=null,this.SuccessProc=null},this.$final=function(){this.pnlMessage=void 0,this.lbMessage=void 0,this.WebMessageButton=void 0,this.btSpeichern=void 0,this.cbDatenschutz=void 0,this.cbAngabenOK=void 0,this.rbFSGehaltJ=void 0,this.edTelefon=void 0,this.edTierRasse=void 0,this.rbFSInsolvN=void 0,this.rbTiereN=void 0,this.edBeruf=void 0,this.rbFSEidVN=void 0,this.rbTiereJ=void 0,this.rbFSInsolvJ=void 0,this.edReligion=void 0,this.edNachname=void 0,this.edArbeitgeber=void 0,this.rbFSRaeumungJ=void 0,this.edPersonenGesamt=void 0,this.edPersonenErwachsene=void 0,this.edVorname=void 0,this.edPersKinder=void 0,this.rbFSGehaltN=void 0,this.rbFSEidVJ=void 0,this.rbFSRaeumungN=void 0,this.edTiereAnzahl=void 0,this.edAnmerkungen=void 0,this.Client=void 0,this.edGebDat=void 0,this.edFSAuskunft=void 0,this.FFragebogen=void 0,this.SuccessProc=void 0,pas["WEBLib.Forms"].TForm.$final.call(this)},this.btSpeichernClick=function(t){var e=this;this.FelderViewToObj(),this.FelderObjToView(),this.CheckFields(),""===this.FMessage?(this.HiddenNotification(),window.console.log("Fragebogen:"),window.console.log(this.FFragebogen),this.Client.RawInvoke$2("IMPOBewerberService.FBSelbstauskunftSet",[this.FFragebogen],(function(t){var i=null;i=rtl.as(pas["WEBLib.JSON"].TJSONObject.ParseJSONValue(t.GetResponseText()),pas["WEBLib.JSON"].TJSONObject),window.console.log(i),e.FMessage=rtl.as(i.GetValue$1("Meldung"),pas["WEBLib.JSON"].TJSONString).GetStrValue(),i.GetJSONValue("AllesOK")===pas["mpoapi.ReturnTypes"].cJBoolTrue?null!=e.SuccessProc&&e.SuccessProc():e.ShowNotification(e.FMessage+" "+pas.SysUtils.TimeToStr(pas.SysUtils.Now()))}),null)):this.ShowNotification(this.FMessage)},this.WebFormCreate=function(t){""!==this.FMessage?this.ShowNotification(this.FMessage):this.HiddenNotification()},this.WebFormShow=function(t){this.HoleSelbstauskunftDS(),""!==this.FMessage?this.ShowNotification(this.FMessage):this.HiddenNotification()},this.WebMessageButtonClick=function(t){this.HiddenNotification()},this.HiddenNotification=function(){this.pnlMessage.GetElementHandle().hidden=!0},this.ShowNotification=function(t){""!==t&&(this.lbMessage.SetCaption(t),this.pnlMessage.GetElementHandle().hidden=!1)},this.FBDeSer=function(t,e){var i=null;i=rtl.as(pas["WEBLib.JSON"].TJSONObject.ParseJSONValue(e),pas["WEBLib.JSON"].TJSONObject),window.console.log(i),t.Nachname=i.GetJSONValue("Nachname"),t.Vorname=rtl.as(i.GetValue$1("Vorname"),pas["WEBLib.JSON"].TJSONString).GetStrValue(),t.Religion=rtl.as(i.GetValue$1("Religion"),pas["WEBLib.JSON"].TJSONString).GetStrValue(),t.GebDat=rtl.as(i.GetValue$1("GebDat"),pas["WEBLib.JSON"].TJSONString).GetStrValue(),t.Beruf=rtl.as(i.GetValue$1("Beruf"),pas["WEBLib.JSON"].TJSONString).GetStrValue(),t.Telefon=rtl.as(i.GetValue$1("Telefon"),pas["WEBLib.JSON"].TJSONString).GetStrValue(),t.Arbeitgeber=rtl.as(i.GetValue$1("Arbeitgeber"),pas["WEBLib.JSON"].TJSONString).GetStrValue(),t.PersAnzGes=rtl.as(i.GetValue$1("PersAnzGes"),pas["WEBLib.JSON"].TJSONNumber).FInt,t.PersAnzErw=rtl.as(i.GetValue$1("PersAnzErw"),pas["WEBLib.JSON"].TJSONNumber).FInt,t.PersAnzKinder=rtl.as(i.GetValue$1("PersAnzKinder"),pas["WEBLib.JSON"].TJSONNumber).FInt,t.Tiere=i.GetJSONValue("Tiere")===pas["mpoapi.ReturnTypes"].cJBoolTrue,t.Tierrasse=rtl.as(i.GetValue$1("Tierrasse"),pas["WEBLib.JSON"].TJSONString).GetStrValue(),t.Tieranzahl=rtl.as(i.GetValue$1("Tieranzahl"),pas["WEBLib.JSON"].TJSONNumber).FInt,t.istFinPfaendung=i.GetJSONValue("istFinPfaendung")===pas["mpoapi.ReturnTypes"].cJBoolTrue,t.istFinEV=i.GetJSONValue("istFinEV")===pas["mpoapi.ReturnTypes"].cJBoolTrue,t.istFinInsolvenz=i.GetJSONValue("istFinInsolvenz")===pas["mpoapi.ReturnTypes"].cJBoolTrue,t.istFinRaeumung=i.GetJSONValue("istFinRaeumung")===pas["mpoapi.ReturnTypes"].cJBoolTrue,t.Auskunft=rtl.as(i.GetValue$1("Auskunft"),pas["WEBLib.JSON"].TJSONString).GetStrValue(),t.Anmerkungen=rtl.as(i.GetValue$1("Anmerkungen"),pas["WEBLib.JSON"].TJSONString).GetStrValue(),t.istDatenschutzOK=i.GetJSONValue("istDatenschutzOK")===pas["mpoapi.ReturnTypes"].cJBoolTrue,t.istAngabenOK=i.GetJSONValue("istAngabenOK")===pas["mpoapi.ReturnTypes"].cJBoolTrue},this.FelderObjToView=function(){this.edVorname.SetText(this.FFragebogen.Vorname),this.edNachname.SetText(this.FFragebogen.Nachname),this.edReligion.SetText(this.FFragebogen.Religion),this.edGebDat.SetText(this.FFragebogen.GebDat),this.edBeruf.SetText(this.FFragebogen.Beruf),this.edTelefon.SetText(this.FFragebogen.Telefon),this.edArbeitgeber.SetText(this.FFragebogen.Arbeitgeber),this.edPersonenGesamt.SetText(pas.SysUtils.TIntegerHelper.ToString$1.call({p:this.FFragebogen,get:function(){return this.p.PersAnzGes},set:function(t){this.p.PersAnzGes=t}})),this.edPersonenErwachsene.SetText(pas.SysUtils.TIntegerHelper.ToString$1.call({p:this.FFragebogen,get:function(){return this.p.PersAnzErw},set:function(t){this.p.PersAnzErw=t}})),this.edPersKinder.SetText(pas.SysUtils.TIntegerHelper.ToString$1.call({p:this.FFragebogen,get:function(){return this.p.PersAnzKinder},set:function(t){this.p.PersAnzKinder=t}})),this.rbTiereN.SetChecked(!this.FFragebogen.Tiere),this.rbTiereJ.SetChecked(this.FFragebogen.Tiere),this.edTierRasse.SetText(this.FFragebogen.Tierrasse),this.edTiereAnzahl.SetText(pas.SysUtils.TIntegerHelper.ToString$1.call({p:this.FFragebogen,get:function(){return this.p.Tieranzahl},set:function(t){this.p.Tieranzahl=t}})),this.rbFSGehaltJ.SetChecked(this.FFragebogen.istFinPfaendung),this.rbFSGehaltN.SetChecked(!this.FFragebogen.istFinPfaendung),this.rbFSEidVJ.SetChecked(this.FFragebogen.istFinEV),this.rbFSEidVN.SetChecked(!this.FFragebogen.istFinEV),this.rbFSInsolvJ.SetChecked(this.FFragebogen.istFinInsolvenz),this.rbFSInsolvN.SetChecked(!this.FFragebogen.istFinInsolvenz),this.rbFSRaeumungJ.SetChecked(this.FFragebogen.istFinRaeumung),this.rbFSRaeumungN.SetChecked(!this.FFragebogen.istFinRaeumung),this.edFSAuskunft.SetText(this.FFragebogen.Auskunft),this.edAnmerkungen.SetText(this.FFragebogen.Anmerkungen),this.cbAngabenOK.SetChecked(this.FFragebogen.istAngabenOK),this.cbDatenschutz.SetChecked(this.FFragebogen.istDatenschutzOK)},this.FelderViewToObj=function(){this.FFragebogen.Vorname=this.edVorname.GetText(),this.FFragebogen.Nachname=this.edNachname.GetText(),this.FFragebogen.Religion=this.edReligion.GetText(),this.FFragebogen.GebDat=this.edGebDat.GetText(),this.FFragebogen.Beruf=this.edBeruf.GetText(),this.FFragebogen.Telefon=this.edTelefon.GetText(),this.FFragebogen.Arbeitgeber=this.edArbeitgeber.GetText(),this.FFragebogen.PersAnzGes=pas.SysUtils.TStringHelper.ToInteger$1.call({p:this.edPersonenGesamt.GetText(),get:function(){return this.p},set:function(t){this.p=t}}),this.FFragebogen.PersAnzKinder=pas.SysUtils.TStringHelper.ToInteger$1.call({p:this.edPersKinder.GetText(),get:function(){return this.p},set:function(t){this.p=t}}),this.FFragebogen.PersAnzErw=pas.SysUtils.TStringHelper.ToInteger$1.call({p:this.edPersonenErwachsene.GetText(),get:function(){return this.p},set:function(t){this.p=t}}),this.FFragebogen.Tiere=this.rbTiereJ.GetChecked(),this.FFragebogen.Tierrasse=this.edTierRasse.GetText(),this.FFragebogen.Tieranzahl=pas.SysUtils.TStringHelper.ToInteger$1.call({p:this.edTiereAnzahl.GetText(),get:function(){return this.p},set:function(t){this.p=t}}),this.FFragebogen.istFinPfaendung=this.rbFSGehaltJ.GetChecked(),this.FFragebogen.istFinEV=this.rbFSEidVJ.GetChecked(),this.FFragebogen.istFinInsolvenz=this.rbFSInsolvJ.GetChecked(),this.FFragebogen.istFinRaeumung=this.rbFSRaeumungJ.GetChecked(),this.FFragebogen.Auskunft=this.edFSAuskunft.GetText(),this.FFragebogen.Anmerkungen=this.edAnmerkungen.GetText(),this.FFragebogen.istAngabenOK=this.cbAngabenOK.GetChecked(),this.FFragebogen.istDatenschutzOK=this.cbDatenschutz.GetChecked()},this.CheckFields=function(){this.FMessage="",this.cbDatenschutz.GetChecked()?rtl.asExt(document.getElementById(this.cbDatenschutz.GetID()),HTMLElement).classList.remove("is-invalid"):(this.FMessage=this.FMessage+"Zustimmung zum Datenschutz fehlt"+pas.System.sLineBreak,rtl.asExt(document.getElementById(this.cbDatenschutz.GetID()),HTMLElement).classList.add("is-invalid")),this.cbAngabenOK.GetChecked()?rtl.asExt(document.getElementById(this.cbDatenschutz.GetID()),HTMLElement).classList.remove("is-invalid"):(this.FMessage=this.FMessage+"Zustimmung zu den Vergabebedingungen fehlt"+pas.System.sLineBreak,rtl.asExt(document.getElementById(this.cbDatenschutz.GetID()),HTMLElement).classList.add("is-invalid"))},this.HoleSelbstauskunftDS=async function(){var t=null,e=null;this.FFragebogen=pas["mpoapi.ReturnTypes"].TmpoFBSelbstauskunftWeb.$create("Create"),window.console.log("Abfrage"),200===(t=await this.Client.RawInvokeAsync("IMPOBewerberService.FBSelbstauskunftGet",[])).GetStatusCode()&&(window.console.log("Text: "+t.GetResponseText()),e=rtl.as(pas["WEBLib.JSON"].TJSONObject.ParseJSONValue(t.GetResponseText()),pas["WEBLib.JSON"].TJSONObject),window.console.log("Daten: "+t.GetResponseText()),window.console.log(e),window.console.log("Nun: Einzelwerte..."),this.FBDeSer(this.FFragebogen,t.GetResponseText()),this.FelderObjToView())},this.LoadDFMValues=function(){pas["WEBLib.Forms"].TCustomForm.LoadDFMValues.call(this),this.pnlMessage=pas["WEBLib.ExtCtrls"].TPanel.$create("Create$2",["view.FBErweitert.message"]),this.lbMessage=pas["WEBLib.StdCtrls"].TLabel.$create("Create$2",["view.FBErweitert.message.label"]),this.WebMessageButton=pas["WEBLib.StdCtrls"].TButton.$create("Create$2",["view.FBErweitert.message.button"]),this.btSpeichern=pas["WEBLib.StdCtrls"].TButton.$create("Create$2",["view.FBErweitert.btSave"]),this.cbDatenschutz=pas["WEBLib.StdCtrls"].TCheckBox.$create("Create$2",["view.FBErweitert.cbDatenschutz"]),this.cbAngabenOK=pas["WEBLib.StdCtrls"].TCheckBox.$create("Create$2",["view.FBErweitert.cbVergabebedingungen"]),this.rbFSGehaltJ=pas["WEBLib.StdCtrls"].TRadioButton.$create("Create$2",["view.FBErweitert.rbFSGehaltJ"]),this.edTelefon=pas["WEBLib.StdCtrls"].TEdit.$create("Create$2",["view.FBErweitert.edTelefon"]),this.edTierRasse=pas["WEBLib.StdCtrls"].TEdit.$create("Create$2",["view.FBErweitert.edTierRasse"]),this.rbFSInsolvN=pas["WEBLib.StdCtrls"].TRadioButton.$create("Create$2",["view.FBErweitert.rbFSInsolvN"]),this.rbTiereN=pas["WEBLib.StdCtrls"].TRadioButton.$create("Create$2",["view.FBErweitert.rbTiereN"]),this.edBeruf=pas["WEBLib.StdCtrls"].TEdit.$create("Create$2",["view.FBErweitert.edBeruf"]),this.rbFSEidVN=pas["WEBLib.StdCtrls"].TRadioButton.$create("Create$2",["view.FBErweitert.rbgFSEidVN"]),this.rbTiereJ=pas["WEBLib.StdCtrls"].TRadioButton.$create("Create$2",["view.FBErweitert.rbTiereJ"]),this.rbFSInsolvJ=pas["WEBLib.StdCtrls"].TRadioButton.$create("Create$2",["view.FBErweitert.rbFSInsolvJ"]),this.edReligion=pas["WEBLib.StdCtrls"].TEdit.$create("Create$2",["view.FBErweitert.edReligion"]),this.edNachname=pas["WEBLib.StdCtrls"].TEdit.$create("Create$2",["view.FBErweitert.edNachname"]),this.edArbeitgeber=pas["WEBLib.StdCtrls"].TEdit.$create("Create$2",["view.FBErweitert.edArbeitgeber"]),this.rbFSRaeumungJ=pas["WEBLib.StdCtrls"].TRadioButton.$create("Create$2",["view.FBErweitert.rbFSRaeumungJ"]),this.edPersonenGesamt=pas["WEBLib.StdCtrls"].TSpinEdit.$create("Create$2",["view.FBErweitert.edPersonenGesamt"]),this.edPersonenErwachsene=pas["WEBLib.StdCtrls"].TSpinEdit.$create("Create$2",["view.FBErweitert.edPersonenErwachsene"]),this.edVorname=pas["WEBLib.StdCtrls"].TEdit.$create("Create$2",["view.FBErweitert.edVorname"]),this.edPersKinder=pas["WEBLib.StdCtrls"].TSpinEdit.$create("Create$2",["view.FBErweitert.edPersonenKinder"]),this.rbFSGehaltN=pas["WEBLib.StdCtrls"].TRadioButton.$create("Create$2",["view.FBErweitert.rbFSGehaltN"]),this.rbFSEidVJ=pas["WEBLib.StdCtrls"].TRadioButton.$create("Create$2",["view.FBErweitert.rbgFSEidVJ"]),this.rbFSRaeumungN=pas["WEBLib.StdCtrls"].TRadioButton.$create("Create$2",["view.FBErweitert.rbFSRaeumungN"]),this.edTiereAnzahl=pas["WEBLib.StdCtrls"].TSpinEdit.$create("Create$2",["view.FBErweitert.edTiereAnzahl"]),this.edAnmerkungen=pas["WEBLib.StdCtrls"].TMemo.$create("Create$2",["view.FBErweitert.edAnmerkungen"]),this.edGebDat=pas["WEBLib.StdCtrls"].TEdit.$create("Create$2",["view.FBErweitert.edGebDat"]),this.edFSAuskunft=pas["WEBLib.StdCtrls"].TEdit.$create("Create$2",["view.FBErweitert.edFSAuskunft"]),this.Client=pas["XData.Web.Client"].TXDataWebClient.$create("Create$1",[this]),this.pnlMessage.BeforeLoadDFMValues(),this.lbMessage.BeforeLoadDFMValues(),this.WebMessageButton.BeforeLoadDFMValues(),this.btSpeichern.BeforeLoadDFMValues(),this.cbDatenschutz.BeforeLoadDFMValues(),this.cbAngabenOK.BeforeLoadDFMValues(),this.rbFSGehaltJ.BeforeLoadDFMValues(),this.edTelefon.BeforeLoadDFMValues(),this.edTierRasse.BeforeLoadDFMValues(),this.rbFSInsolvN.BeforeLoadDFMValues(),this.rbTiereN.BeforeLoadDFMValues(),this.edBeruf.BeforeLoadDFMValues(),this.rbFSEidVN.BeforeLoadDFMValues(),this.rbTiereJ.BeforeLoadDFMValues(),this.rbFSInsolvJ.BeforeLoadDFMValues(),this.edReligion.BeforeLoadDFMValues(),this.edNachname.BeforeLoadDFMValues(),this.edArbeitgeber.BeforeLoadDFMValues(),this.rbFSRaeumungJ.BeforeLoadDFMValues(),this.edPersonenGesamt.BeforeLoadDFMValues(),this.edPersonenErwachsene.BeforeLoadDFMValues(),this.edVorname.BeforeLoadDFMValues(),this.edPersKinder.BeforeLoadDFMValues(),this.rbFSGehaltN.BeforeLoadDFMValues(),this.rbFSEidVJ.BeforeLoadDFMValues(),this.rbFSRaeumungN.BeforeLoadDFMValues(),this.edTiereAnzahl.BeforeLoadDFMValues(),this.edAnmerkungen.BeforeLoadDFMValues(),this.edGebDat.BeforeLoadDFMValues(),this.edFSAuskunft.BeforeLoadDFMValues(),this.Client.BeforeLoadDFMValues();try{this.SetName("FViewFBErweitert"),this.SetWidth(640),this.SetHeight(480),this.SetEvent(this,"OnCreate","WebFormCreate"),this.SetEvent(this,"OnShow","WebFormShow"),this.pnlMessage.SetParentComponent(this),this.pnlMessage.SetName("pnlMessage"),this.pnlMessage.SetLeft(8),this.pnlMessage.SetTop(0),this.pnlMessage.SetWidth(121),this.pnlMessage.SetHeight(33),this.pnlMessage.SetHeightStyle(2),this.pnlMessage.SetWidthStyle(2),this.pnlMessage.SetChildOrderEx(8),this.pnlMessage.SetElementFont(1),this.pnlMessage.SetElementPosition(2),this.lbMessage.SetParentComponent(this.pnlMessage),this.lbMessage.SetName("lbMessage"),this.lbMessage.SetLeft(16),this.lbMessage.SetTop(11),this.lbMessage.SetWidth(42),this.lbMessage.SetHeight(13),this.lbMessage.SetCaption("Message"),this.lbMessage.SetHeightPercent(100),this.lbMessage.SetWidthPercent(100),this.WebMessageButton.SetParentComponent(this.pnlMessage),this.WebMessageButton.SetName("WebMessageButton"),this.WebMessageButton.SetLeft(96),this.WebMessageButton.SetTop(3),this.WebMessageButton.SetWidth(22),this.WebMessageButton.SetHeight(25),this.WebMessageButton.SetCaption("x"),this.WebMessageButton.SetChildOrderEx(1),this.WebMessageButton.SetElementFont(1),this.WebMessageButton.SetElementPosition(2),this.WebMessageButton.SetHeightStyle(2),this.WebMessageButton.SetHeightPercent(100),this.WebMessageButton.SetWidthStyle(2),this.WebMessageButton.SetWidthPercent(100),this.SetEvent$1(this.WebMessageButton,this,"OnClick","WebMessageButtonClick"),this.btSpeichern.SetParentComponent(this),this.btSpeichern.SetName("btSpeichern"),this.btSpeichern.SetLeft(30),this.btSpeichern.SetTop(206),this.btSpeichern.SetWidth(96),this.btSpeichern.SetHeight(25),this.btSpeichern.SetCaption("Speichern"),this.btSpeichern.SetChildOrderEx(8),this.btSpeichern.SetElementFont(1),this.btSpeichern.SetElementPosition(2),this.btSpeichern.SetHeightStyle(2),this.btSpeichern.SetHeightPercent(100),this.btSpeichern.SetWidthStyle(2),this.btSpeichern.SetWidthPercent(100),this.SetEvent$1(this.btSpeichern,this,"OnClick","btSpeichernClick"),this.cbDatenschutz.SetParentComponent(this),this.cbDatenschutz.SetName("cbDatenschutz"),this.cbDatenschutz.SetLeft(101),this.cbDatenschutz.SetTop(340),this.cbDatenschutz.SetWidth(96),this.cbDatenschutz.SetHeight(25),this.cbDatenschutz.SetCaption("cbDatenschutz"),this.cbDatenschutz.SetChildOrderEx(11),this.cbDatenschutz.SetElementFont(1),this.cbDatenschutz.SetElementPosition(2),this.cbDatenschutz.SetHeightStyle(2),this.cbDatenschutz.SetHeightPercent(100),this.cbDatenschutz.SetWidthStyle(2),this.cbDatenschutz.SetWidthPercent(100),this.cbAngabenOK.SetParentComponent(this),this.cbAngabenOK.SetName("cbAngabenOK"),this.cbAngabenOK.SetLeft(101),this.cbAngabenOK.SetTop(371),this.cbAngabenOK.SetWidth(96),this.cbAngabenOK.SetHeight(25),this.cbAngabenOK.SetCaption("cbAngabenOK"),this.cbAngabenOK.SetChildOrderEx(20),this.cbAngabenOK.SetElementFont(1),this.cbAngabenOK.SetElementPosition(2),this.cbAngabenOK.SetHeightStyle(2),this.cbAngabenOK.SetHeightPercent(100),this.cbAngabenOK.SetWidthStyle(2),this.cbAngabenOK.SetWidthPercent(100),this.rbFSGehaltJ.SetParentComponent(this),this.rbFSGehaltJ.SetName("rbFSGehaltJ"),this.rbFSGehaltJ.SetLeft(456),this.rbFSGehaltJ.SetTop(277),this.rbFSGehaltJ.SetWidth(96),this.rbFSGehaltJ.SetHeight(25),this.rbFSGehaltJ.SetCaption("rbFSGehaltJ"),this.rbFSGehaltJ.SetChecked(!1),this.rbFSGehaltJ.SetChildOrderEx(4),this.rbFSGehaltJ.SetColor(-1),this.rbFSGehaltJ.SetElementFont(1),this.rbFSGehaltJ.SetElementPosition(2),this.rbFSGehaltJ.SetGroupName("rbFSGehalt"),this.rbFSGehaltJ.SetHeightStyle(2),this.rbFSGehaltJ.SetHeightPercent(100),this.rbFSGehaltJ.SetWidthStyle(2),this.rbFSGehaltJ.SetWidthPercent(100),this.edTelefon.SetParentComponent(this),this.edTelefon.SetName("edTelefon"),this.edTelefon.SetLeft(404),this.edTelefon.SetTop(0),this.edTelefon.SetWidth(96),this.edTelefon.SetHeight(25),this.edTelefon.SetChildOrderEx(6),this.edTelefon.SetElementFont(1),this.edTelefon.SetElementPosition(2),this.edTelefon.SetHeightStyle(2),this.edTelefon.SetHeightPercent(100),this.edTelefon.SetWidthStyle(2),this.edTelefon.SetWidthPercent(100),this.edTierRasse.SetParentComponent(this),this.edTierRasse.SetName("edTierRasse"),this.edTierRasse.SetLeft(104),this.edTierRasse.SetTop(264),this.edTierRasse.SetWidth(96),this.edTierRasse.SetHeight(25),this.edTierRasse.SetChildOrderEx(7),this.edTierRasse.SetElementFont(1),this.edTierRasse.SetElementPosition(2),this.edTierRasse.SetHeightStyle(2),this.edTierRasse.SetHeightPercent(100),this.edTierRasse.SetWidthStyle(2),this.edTierRasse.SetWidthPercent(100),this.rbFSInsolvN.SetParentComponent(this),this.rbFSInsolvN.SetName("rbFSInsolvN"),this.rbFSInsolvN.SetLeft(354),this.rbFSInsolvN.SetTop(246),this.rbFSInsolvN.SetWidth(96),this.rbFSInsolvN.SetHeight(25),this.rbFSInsolvN.SetCaption("rbFSInsolvN"),this.rbFSInsolvN.SetChecked(!0),this.rbFSInsolvN.SetChildOrderEx(8),this.rbFSInsolvN.SetColor(-1),this.rbFSInsolvN.SetElementFont(1),this.rbFSInsolvN.SetElementPosition(2),this.rbFSInsolvN.SetGroupName("rbFSInsolv"),this.rbFSInsolvN.SetHeightStyle(2),this.rbFSInsolvN.SetHeightPercent(100),this.rbFSInsolvN.SetWidthStyle(2),this.rbFSInsolvN.SetWidthPercent(100),this.rbTiereN.SetParentComponent(this),this.rbTiereN.SetName("rbTiereN"),this.rbTiereN.SetLeft(330),this.rbTiereN.SetTop(188),this.rbTiereN.SetWidth(96),this.rbTiereN.SetHeight(25),this.rbTiereN.SetCaption("rbTiereN"),this.rbTiereN.SetChecked(!0),this.rbTiereN.SetChildOrderEx(9),this.rbTiereN.SetColor(-1),this.rbTiereN.SetElementFont(1),this.rbTiereN.SetElementPosition(2),this.rbTiereN.SetGroupName("rbTiere"),this.rbTiereN.SetHeightStyle(2),this.rbTiereN.SetHeightPercent(100),this.rbTiereN.SetWidthStyle(2),this.rbTiereN.SetWidthPercent(100),this.edBeruf.SetParentComponent(this),this.edBeruf.SetName("edBeruf"),this.edBeruf.SetLeft(404),this.edBeruf.SetTop(30),this.edBeruf.SetWidth(96),this.edBeruf.SetHeight(25),this.edBeruf.SetChildOrderEx(10),this.edBeruf.SetElementFont(1),this.edBeruf.SetElementPosition(2),this.edBeruf.SetHeightStyle(2),this.edBeruf.SetHeightPercent(100),this.edBeruf.SetWidthStyle(2),this.edBeruf.SetWidthPercent(100),this.rbFSEidVN.SetParentComponent(this),this.rbFSEidVN.SetName("rbFSEidVN"),this.rbFSEidVN.SetLeft(176),this.rbFSEidVN.SetTop(175),this.rbFSEidVN.SetWidth(96),this.rbFSEidVN.SetHeight(25),this.rbFSEidVN.SetCaption("rbFSEidVN"),this.rbFSEidVN.SetChecked(!0),this.rbFSEidVN.SetChildOrderEx(11),this.rbFSEidVN.SetColor(-1),this.rbFSEidVN.SetElementFont(1),this.rbFSEidVN.SetElementPosition(2),this.rbFSEidVN.SetGroupName("rbgFSEidV"),this.rbFSEidVN.SetHeightStyle(2),this.rbFSEidVN.SetHeightPercent(100),this.rbFSEidVN.SetWidthStyle(2),this.rbFSEidVN.SetWidthPercent(100),this.rbTiereJ.SetParentComponent(this),this.rbTiereJ.SetName("rbTiereJ"),this.rbTiereJ.SetLeft(445),this.rbTiereJ.SetTop(188),this.rbTiereJ.SetWidth(96),this.rbTiereJ.SetHeight(25),this.rbTiereJ.SetCaption("rbTiereJ"),this.rbTiereJ.SetChecked(!1),this.rbTiereJ.SetChildOrderEx(12),this.rbTiereJ.SetColor(-1),this.rbTiereJ.SetElementFont(1),this.rbTiereJ.SetElementPosition(2),this.rbTiereJ.SetGroupName("rbTiere"),this.rbTiereJ.SetHeightStyle(2),this.rbTiereJ.SetHeightPercent(100),this.rbTiereJ.SetWidthStyle(2),this.rbTiereJ.SetWidthPercent(100),this.rbFSInsolvJ.SetParentComponent(this),this.rbFSInsolvJ.SetName("rbFSInsolvJ"),this.rbFSInsolvJ.SetLeft(456),this.rbFSInsolvJ.SetTop(246),this.rbFSInsolvJ.SetWidth(96),this.rbFSInsolvJ.SetHeight(25),this.rbFSInsolvJ.SetCaption("rbFSInsolvJ"),this.rbFSInsolvJ.SetChecked(!1),this.rbFSInsolvJ.SetChildOrderEx(13),this.rbFSInsolvJ.SetColor(-1),this.rbFSInsolvJ.SetElementFont(1),this.rbFSInsolvJ.SetElementPosition(2),this.rbFSInsolvJ.SetGroupName("rbFSInsolv"),this.rbFSInsolvJ.SetHeightStyle(2),this.rbFSInsolvJ.SetHeightPercent(100),this.rbFSInsolvJ.SetWidthStyle(2),this.rbFSInsolvJ.SetWidthPercent(100),this.edReligion.SetParentComponent(this),this.edReligion.SetName("edReligion"),this.edReligion.SetLeft(202),this.edReligion.SetTop(60),this.edReligion.SetWidth(96),this.edReligion.SetHeight(25),this.edReligion.SetChildOrderEx(14),this.edReligion.SetElementFont(1),this.edReligion.SetElementPosition(2),this.edReligion.SetHeightStyle(2),this.edReligion.SetHeightPercent(100),this.edReligion.SetWidthStyle(2),this.edReligion.SetWidthPercent(100),this.edNachname.SetParentComponent(this),this.edNachname.SetName("edNachname"),this.edNachname.SetLeft(303),this.edNachname.SetTop(60),this.edNachname.SetWidth(96),this.edNachname.SetHeight(25),this.edNachname.SetChildOrderEx(15),this.edNachname.SetElementFont(1),this.edNachname.SetElementPosition(2),this.edNachname.SetHeightStyle(2),this.edNachname.SetHeightPercent(100),this.edNachname.SetWidthStyle(2),this.edNachname.SetWidthPercent(100),this.edArbeitgeber.SetParentComponent(this),this.edArbeitgeber.SetName("edArbeitgeber"),this.edArbeitgeber.SetLeft(404),this.edArbeitgeber.SetTop(60),this.edArbeitgeber.SetWidth(96),this.edArbeitgeber.SetHeight(25),this.edArbeitgeber.SetChildOrderEx(16),this.edArbeitgeber.SetElementFont(1),this.edArbeitgeber.SetElementPosition(2),this.edArbeitgeber.SetHeightStyle(2),this.edArbeitgeber.SetHeightPercent(100),this.edArbeitgeber.SetWidthStyle(2),this.edArbeitgeber.SetWidthPercent(100),this.rbFSRaeumungJ.SetParentComponent(this),this.rbFSRaeumungJ.SetName("rbFSRaeumungJ"),this.rbFSRaeumungJ.SetLeft(354),this.rbFSRaeumungJ.SetTop(339),this.rbFSRaeumungJ.SetWidth(96),this.rbFSRaeumungJ.SetHeight(25),this.rbFSRaeumungJ.SetCaption("rbFSRaeumungJ"),this.rbFSRaeumungJ.SetChecked(!1),this.rbFSRaeumungJ.SetChildOrderEx(17),this.rbFSRaeumungJ.SetColor(-1),this.rbFSRaeumungJ.SetElementFont(1),this.rbFSRaeumungJ.SetElementPosition(2),this.rbFSRaeumungJ.SetGroupName("rbFSRaeumung"),this.rbFSRaeumungJ.SetHeightStyle(2),this.rbFSRaeumungJ.SetHeightPercent(100),this.rbFSRaeumungJ.SetWidthStyle(2),this.rbFSRaeumungJ.SetWidthPercent(100),this.edPersonenGesamt.SetParentComponent(this),this.edPersonenGesamt.SetName("edPersonenGesamt"),this.edPersonenGesamt.SetLeft(0),this.edPersonenGesamt.SetTop(90),this.edPersonenGesamt.SetWidth(96),this.edPersonenGesamt.SetHeight(25),this.edPersonenGesamt.SetHeightStyle(2),this.edPersonenGesamt.SetWidthStyle(2),this.edPersonenGesamt.FAutoSize=!1,this.edPersonenGesamt.SetBorderStyle(1),this.edPersonenGesamt.SetChildOrderEx(18),this.edPersonenGesamt.SetColor(16777215),this.edPersonenGesamt.SetElementFont(1),this.edPersonenGesamt.SetElementPosition(2),this.edPersonenGesamt.SetIncrement(1),this.edPersonenGesamt.SetMaxValue(100),this.edPersonenGesamt.SetMinValue(0),this.edPersonenGesamt.SetRole(""),this.edPersonenGesamt.SetValue(0),this.edPersonenErwachsene.SetParentComponent(this),this.edPersonenErwachsene.SetName("edPersonenErwachsene"),this.edPersonenErwachsene.SetLeft(101),this.edPersonenErwachsene.SetTop(90),this.edPersonenErwachsene.SetWidth(96),this.edPersonenErwachsene.SetHeight(25),this.edPersonenErwachsene.SetHeightStyle(2),this.edPersonenErwachsene.SetWidthStyle(2),this.edPersonenErwachsene.FAutoSize=!1,this.edPersonenErwachsene.SetBorderStyle(1),this.edPersonenErwachsene.SetChildOrderEx(19),this.edPersonenErwachsene.SetColor(16777215),this.edPersonenErwachsene.SetElementFont(1),this.edPersonenErwachsene.SetElementPosition(2),this.edPersonenErwachsene.SetIncrement(1),this.edPersonenErwachsene.SetMaxValue(100),this.edPersonenErwachsene.SetMinValue(0),this.edPersonenErwachsene.SetRole(""),this.edPersonenErwachsene.SetValue(0),this.edVorname.SetParentComponent(this),this.edVorname.SetName("edVorname"),this.edVorname.SetLeft(202),this.edVorname.SetTop(90),this.edVorname.SetWidth(96),this.edVorname.SetHeight(25),this.edVorname.SetChildOrderEx(20),this.edVorname.SetElementFont(1),this.edVorname.SetElementPosition(2),this.edVorname.SetHeightStyle(2),this.edVorname.SetHeightPercent(100),this.edVorname.SetWidthStyle(2),this.edVorname.SetWidthPercent(100),this.edPersKinder.SetParentComponent(this),this.edPersKinder.SetName("edPersKinder"),this.edPersKinder.SetLeft(303),this.edPersKinder.SetTop(90),this.edPersKinder.SetWidth(96),this.edPersKinder.SetHeight(25),this.edPersKinder.SetHeightStyle(2),this.edPersKinder.SetWidthStyle(2),this.edPersKinder.FAutoSize=!1,this.edPersKinder.SetBorderStyle(1),this.edPersKinder.SetChildOrderEx(21),this.edPersKinder.SetColor(16777215),this.edPersKinder.SetElementFont(1),this.edPersKinder.SetElementPosition(2),this.edPersKinder.SetIncrement(1),this.edPersKinder.SetMaxValue(100),this.edPersKinder.SetMinValue(0),this.edPersKinder.SetRole(""),this.edPersKinder.SetValue(0),this.rbFSGehaltN.SetParentComponent(this),this.rbFSGehaltN.SetName("rbFSGehaltN"),this.rbFSGehaltN.SetLeft(354),this.rbFSGehaltN.SetTop(277),this.rbFSGehaltN.SetWidth(96),this.rbFSGehaltN.SetHeight(25),this.rbFSGehaltN.SetCaption("rbFSGehaltN"),this.rbFSGehaltN.SetChecked(!0),this.rbFSGehaltN.SetChildOrderEx(22),this.rbFSGehaltN.SetColor(-1),this.rbFSGehaltN.SetElementFont(1),this.rbFSGehaltN.SetElementPosition(2),this.rbFSGehaltN.SetGroupName("rbFSGehalt"),this.rbFSGehaltN.SetHeightStyle(2),this.rbFSGehaltN.SetHeightPercent(100),this.rbFSGehaltN.SetWidthStyle(2),this.rbFSGehaltN.SetWidthPercent(100),this.rbFSEidVJ.SetParentComponent(this),this.rbFSEidVJ.SetName("rbFSEidVJ"),this.rbFSEidVJ.SetLeft(176),this.rbFSEidVJ.SetTop(206),this.rbFSEidVJ.SetWidth(96),this.rbFSEidVJ.SetHeight(25),this.rbFSEidVJ.SetCaption("rbFSEidVJ"),this.rbFSEidVJ.SetChecked(!1),this.rbFSEidVJ.SetChildOrderEx(24),this.rbFSEidVJ.SetColor(-1),this.rbFSEidVJ.SetElementFont(1),this.rbFSEidVJ.SetElementPosition(2),this.rbFSEidVJ.SetGroupName("rbgFSEidV"),this.rbFSEidVJ.SetHeightStyle(2),this.rbFSEidVJ.SetHeightPercent(100),this.rbFSEidVJ.SetWidthStyle(2),this.rbFSEidVJ.SetWidthPercent(100),this.rbFSRaeumungN.SetParentComponent(this),this.rbFSRaeumungN.SetName("rbFSRaeumungN"),this.rbFSRaeumungN.SetLeft(354),this.rbFSRaeumungN.SetTop(370),this.rbFSRaeumungN.SetWidth(96),this.rbFSRaeumungN.SetHeight(25),this.rbFSRaeumungN.SetCaption("rbFSRaeumungN"),this.rbFSRaeumungN.SetChecked(!0),this.rbFSRaeumungN.SetChildOrderEx(25),this.rbFSRaeumungN.SetColor(-1),this.rbFSRaeumungN.SetElementFont(1),this.rbFSRaeumungN.SetElementPosition(2),this.rbFSRaeumungN.SetGroupName("rbFSRaeumung"),this.rbFSRaeumungN.SetHeightStyle(2),this.rbFSRaeumungN.SetHeightPercent(100),this.rbFSRaeumungN.SetWidthStyle(2),this.rbFSRaeumungN.SetWidthPercent(100),this.edTiereAnzahl.SetParentComponent(this),this.edTiereAnzahl.SetName("edTiereAnzahl"),this.edTiereAnzahl.SetLeft(202),this.edTiereAnzahl.SetTop(120),this.edTiereAnzahl.SetWidth(96),this.edTiereAnzahl.SetHeight(25),this.edTiereAnzahl.SetHeightStyle(2),this.edTiereAnzahl.SetWidthStyle(2),this.edTiereAnzahl.FAutoSize=!1,this.edTiereAnzahl.SetBorderStyle(1),this.edTiereAnzahl.SetChildOrderEx(26),this.edTiereAnzahl.SetColor(16777215),this.edTiereAnzahl.SetElementFont(1),this.edTiereAnzahl.SetElementPosition(2),this.edTiereAnzahl.SetIncrement(1),this.edTiereAnzahl.SetMaxValue(100),this.edTiereAnzahl.SetMinValue(0),this.edTiereAnzahl.SetRole(""),this.edTiereAnzahl.SetValue(0),this.edAnmerkungen.SetParentComponent(this),this.edAnmerkungen.SetName("edAnmerkungen"),this.edAnmerkungen.SetLeft(405),this.edAnmerkungen.SetTop(108),this.edAnmerkungen.SetWidth(174),this.edAnmerkungen.SetHeight(61),this.edAnmerkungen.SetElementFont(1),this.edAnmerkungen.SetElementPosition(2),this.edAnmerkungen.SetHeightStyle(2),this.edAnmerkungen.SetHeightPercent(100),this.edAnmerkungen.SetSelLength(0),this.edAnmerkungen.SetSelStart(0),this.edAnmerkungen.SetWidthStyle(2),this.edAnmerkungen.SetWidthPercent(100),this.edGebDat.SetParentComponent(this),this.edGebDat.SetName("edGebDat"),this.edGebDat.SetLeft(202),this.edGebDat.SetTop(0),this.edGebDat.SetWidth(96),this.edGebDat.SetHeight(25),this.edGebDat.SetChildOrderEx(26),this.edGebDat.SetElementFont(1),this.edGebDat.SetElementPosition(2),this.edGebDat.SetHeightStyle(2),this.edGebDat.SetHeightPercent(100),this.edGebDat.SetWidthStyle(2),this.edGebDat.SetWidthPercent(100),this.edFSAuskunft.SetParentComponent(this),this.edFSAuskunft.SetName("edFSAuskunft"),this.edFSAuskunft.SetLeft(119),this.edFSAuskunft.SetTop(416),this.edFSAuskunft.SetWidth(96),this.edFSAuskunft.SetHeight(25),this.edFSAuskunft.SetChildOrderEx(27),this.edFSAuskunft.SetElementFont(1),this.edFSAuskunft.SetElementPosition(2),this.edFSAuskunft.SetHeightStyle(2),this.edFSAuskunft.SetHeightPercent(100),this.edFSAuskunft.SetWidthStyle(2),this.edFSAuskunft.SetWidthPercent(100),this.Client.SetParentComponent(this),this.Client.SetName("Client"),this.Client.SetConnection(pas["mpoweb.ConnectionModule"].DMConnection.ApiConnection),this.Client.SetLeft(32),this.Client.SetTop(56)}finally{this.pnlMessage.AfterLoadDFMValues(),this.lbMessage.AfterLoadDFMValues(),this.WebMessageButton.AfterLoadDFMValues(),this.btSpeichern.AfterLoadDFMValues(),this.cbDatenschutz.AfterLoadDFMValues(),this.cbAngabenOK.AfterLoadDFMValues(),this.rbFSGehaltJ.AfterLoadDFMValues(),this.edTelefon.AfterLoadDFMValues(),this.edTierRasse.AfterLoadDFMValues(),this.rbFSInsolvN.AfterLoadDFMValues(),this.rbTiereN.AfterLoadDFMValues(),this.edBeruf.AfterLoadDFMValues(),this.rbFSEidVN.AfterLoadDFMValues(),this.rbTiereJ.AfterLoadDFMValues(),this.rbFSInsolvJ.AfterLoadDFMValues(),this.edReligion.AfterLoadDFMValues(),this.edNachname.AfterLoadDFMValues(),this.edArbeitgeber.AfterLoadDFMValues(),this.rbFSRaeumungJ.AfterLoadDFMValues(),this.edPersonenGesamt.AfterLoadDFMValues(),this.edPersonenErwachsene.AfterLoadDFMValues(),this.edVorname.AfterLoadDFMValues(),this.edPersKinder.AfterLoadDFMValues(),this.rbFSGehaltN.AfterLoadDFMValues(),this.rbFSEidVJ.AfterLoadDFMValues(),this.rbFSRaeumungN.AfterLoadDFMValues(),this.edTiereAnzahl.AfterLoadDFMValues(),this.edAnmerkungen.AfterLoadDFMValues(),this.edGebDat.AfterLoadDFMValues(),this.edFSAuskunft.AfterLoadDFMValues(),this.Client.AfterLoadDFMValues()}},rtl.addIntf(this,pas["WEBLib.Controls"].IControl),rtl.addIntf(this,pas.System.IUnknown);var t=this.$rtti;t.addField("pnlMessage",pas["WEBLib.ExtCtrls"].$rtti.TPanel,4),t.addField("lbMessage",pas["WEBLib.StdCtrls"].$rtti.TLabel,4),t.addField("WebMessageButton",pas["WEBLib.StdCtrls"].$rtti.TButton,4),t.addField("btSpeichern",pas["WEBLib.StdCtrls"].$rtti.TButton,4),t.addField("cbDatenschutz",pas["WEBLib.StdCtrls"].$rtti.TCheckBox,4),t.addField("cbAngabenOK",pas["WEBLib.StdCtrls"].$rtti.TCheckBox,4),t.addField("rbFSGehaltJ",pas["WEBLib.StdCtrls"].$rtti.TRadioButton,4),t.addField("edTelefon",pas["WEBLib.StdCtrls"].$rtti.TEdit,4),t.addField("edTierRasse",pas["WEBLib.StdCtrls"].$rtti.TEdit,4),t.addField("rbFSInsolvN",pas["WEBLib.StdCtrls"].$rtti.TRadioButton,4),t.addField("rbTiereN",pas["WEBLib.StdCtrls"].$rtti.TRadioButton,4),t.addField("edBeruf",pas["WEBLib.StdCtrls"].$rtti.TEdit,4),t.addField("rbFSEidVN",pas["WEBLib.StdCtrls"].$rtti.TRadioButton,4),t.addField("rbTiereJ",pas["WEBLib.StdCtrls"].$rtti.TRadioButton,4),t.addField("rbFSInsolvJ",pas["WEBLib.StdCtrls"].$rtti.TRadioButton,4),t.addField("edReligion",pas["WEBLib.StdCtrls"].$rtti.TEdit,4),t.addField("edNachname",pas["WEBLib.StdCtrls"].$rtti.TEdit,4),t.addField("edArbeitgeber",pas["WEBLib.StdCtrls"].$rtti.TEdit,4),t.addField("rbFSRaeumungJ",pas["WEBLib.StdCtrls"].$rtti.TRadioButton,4),t.addField("edPersonenGesamt",pas["WEBLib.StdCtrls"].$rtti.TSpinEdit,4),t.addField("edPersonenErwachsene",pas["WEBLib.StdCtrls"].$rtti.TSpinEdit,4),t.addField("edVorname",pas["WEBLib.StdCtrls"].$rtti.TEdit,4),t.addField("edPersKinder",pas["WEBLib.StdCtrls"].$rtti.TSpinEdit,4),t.addField("rbFSGehaltN",pas["WEBLib.StdCtrls"].$rtti.TRadioButton,4),t.addField("rbFSEidVJ",pas["WEBLib.StdCtrls"].$rtti.TRadioButton,4),t.addField("rbFSRaeumungN",pas["WEBLib.StdCtrls"].$rtti.TRadioButton,4),t.addField("edTiereAnzahl",pas["WEBLib.StdCtrls"].$rtti.TSpinEdit,4),t.addField("edAnmerkungen",pas["WEBLib.StdCtrls"].$rtti.TMemo,4),t.addField("Client",pas["XData.Web.Client"].$rtti.TXDataWebClient,4),t.addField("edGebDat",pas["WEBLib.StdCtrls"].$rtti.TEdit,4),t.addField("edFSAuskunft",pas["WEBLib.StdCtrls"].$rtti.TEdit,4),t.addMethod("btSpeichernClick",0,[["Sender",pas.System.$rtti.TObject]],4),t.addMethod("WebFormCreate",0,[["Sender",pas.System.$rtti.TObject]],4),t.addMethod("WebFormShow",0,[["Sender",pas.System.$rtti.TObject]],4),t.addMethod("WebMessageButtonClick",0,[["Sender",pas.System.$rtti.TObject]],4)}))})),rtl.module("mpoWeb.Utils",["System","SysUtils","JS","Web"],(function(){"use strict";this.WebLOG=function(t){}})),rtl.module("mpoView.Start",["System","SysUtils","Classes","JS","Web","WEBLib.Graphics","WEBLib.Controls","WEBLib.Forms","WEBLib.Dialogs","WEBLib.Controls","WEBLib.StdCtrls","WEBLib.StdCtrls","WEBLib.WebCtrls","WEBLib.ExtCtrls","XData.Web.Connection","XData.Web.Client","mpoapi.ReturnTypes","mpoweb.App.Types","WEBLib.Storage","WEBLib.REST","WEBLib.JSON","WEBLib.ComCtrls","WEBLib.Lists","DB","WEBLib.Grids","mpoWeb.Utils"],(function(){"use strict";rtl.createClass(this,"TFViewStart",pas["WEBLib.Forms"].TForm,(function(){this.$init=function(){pas["WEBLib.Forms"].TForm.$init.call(this),this.WebLabel1=null,this.edFeldHinweise=null,this.rbTauschWunsch=null,this.rbStudent=null,this.rbMietWunsch=null,this.Client=null,this.WebTimerSave=null,this.edFeld02AngeboteGrid=null,this.pnlMessage=null,this.lbMessage=null,this.WebMessageButton=null,this.WebHTMLDiv1=null,this.WebHTMLDiv2=null,this.WebHTMLDiv3=null,this.WebHTMLDiv4=null,this.tblDownloads=null,this.tblUploads=null,this.tblBewerbungen=null,this.rbOhneSuche=null,this.WebMessageDlg1=null,this.WebTimerStartFB=null,this.FMessage="",this.FFBStartseite=null,this.FFBStartseiteListen=null,this.FMenuClick=!1,this.SuccessProc=null,this.OnShowOhneSuche=null,this.OnShowSucheFBTausch=null,this.OnShowSucheFBWunsch=null,this.OnShowSucheFBStudent=null,this.OnShowFBDetail=null,this.OnShowFBSuche=null,this.OnShowFBTauschwunsch=null,this.OnShowFBStudenten=null},this.$final=function(){this.WebLabel1=void 0,this.edFeldHinweise=void 0,this.rbTauschWunsch=void 0,this.rbStudent=void 0,this.rbMietWunsch=void 0,this.Client=void 0,this.WebTimerSave=void 0,this.edFeld02AngeboteGrid=void 0,this.pnlMessage=void 0,this.lbMessage=void 0,this.WebMessageButton=void 0,this.WebHTMLDiv1=void 0,this.WebHTMLDiv2=void 0,this.WebHTMLDiv3=void 0,this.WebHTMLDiv4=void 0,this.tblDownloads=void 0,this.tblUploads=void 0,this.tblBewerbungen=void 0,this.rbOhneSuche=void 0,this.WebMessageDlg1=void 0,this.WebTimerStartFB=void 0,this.FFBStartseite=void 0,this.FFBStartseiteListen=void 0,this.SuccessProc=void 0,this.OnShowOhneSuche=void 0,this.OnShowSucheFBTausch=void 0,this.OnShowSucheFBWunsch=void 0,this.OnShowSucheFBStudent=void 0,this.OnShowFBDetail=void 0,this.OnShowFBSuche=void 0,this.OnShowFBTauschwunsch=void 0,this.OnShowFBStudenten=void 0,pas["WEBLib.Forms"].TForm.$final.call(this)},this.rbMietWunschClick=function(t){this.FMenuClick=!0,this.WebTimerSave.SetEnabled(!0),this.CheckSuchButtons()},this.rbStudentClick=function(t){this.FMenuClick=!0,this.WebTimerSave.SetEnabled(!0),this.CheckSuchButtons()},this.rbTauschWunschClick=function(t){this.FMenuClick=!0,this.WebTimerSave.SetEnabled(!0),this.CheckSuchButtons()},this.WebFormCreate=function(t){this.FMenuClick=!1,this.WebTimerSave.SetEnabled(!1),this.HiddenNotification()},this.WebFormShow=function(t){try{this.HoleFragebogenStartseite(),this.HoleListenStartseite()}finally{""!==this.FMessage?this.ShowNotification(this.FMessage):this.HiddenNotification()}},this.edFeld02AngeboteGridItemClick=function(t,e){for(var i,s,n=0,r=null,a=null,o=0,l=this.edFeld02AngeboteGrid.FItems.GetCount()-1;o<=l;o++)n=o,this.edFeld02AngeboteGrid.FItems.GetItem$1(n).SetActive(!1),this.edFeld02AngeboteGrid.FItems.GetItem$1(n).Collapse();if(pas["WEBLib.Lists"].TListItem.isPrototypeOf(e.FCollection.Owner())){if(rtl.as(e.FCollection.Owner(),pas["WEBLib.Lists"].TListItem).SetActive(!0),rtl.as(e.FCollection.Owner(),pas["WEBLib.Lists"].TListItem).Expand(),pas["WEBLib.Lists"].TListItem.isPrototypeOf(e.FCollection.Owner()))for(var h=0,d=e.FCollection.GetCount()-1;h<=d;h++)n=h,rtl.as(e.FCollection.GetItem(n),pas["WEBLib.Lists"].TListItem).SetActive(!1)}else e.SetActive(!0);e.Expand(),i=pas.System.Trunc(e.FTag/10),s=e.FTag-10*i,null!=this.FFBStartseiteListen&&2===s&&this.FFBStartseiteListen.ObjektAngebote.FLength>0&&this.FFBStartseiteListen.ObjektAngebote.GetItem(i).istMitLink&&((r=pas["mpoapi.ReturnTypes"].TmpoDownloadRequest.$create("Create")).aDocType=1,r.aDocID=this.FFBStartseiteListen.ObjektAngebote.GetItem(i).id_Objekt,pas["mpoWeb.Utils"].WebLOG(this.FFBStartseiteListen),this.StarteDownloadlink(r)),null!=this.FFBStartseiteListen&&3===s&&this.FFBStartseiteListen.ObjektAngebote.FLength>0&&((a=pas["mpoapi.ReturnTypes"].TmpoBewerbungStarten.$create("Create")).aAngebotID=this.FFBStartseiteListen.ObjektAngebote.GetItem(i).id_Angebot,this.BewerbungStarten(a))},this.MsgDlgBewerbungstornoButtonClick=function(t){},this.rbOhneSucheClick=async function(t){6===await this.WebMessageDlg1.ShowDialog$2("Soll die Wohnungsanfrage wirklich gelöscht werden?",3,rtl.createSet(0,1))&&(await this.WebMessageDlg1.ShowDialog$2("Ihr Löschauftrag wurde gespeichert.",2,rtl.createSet(2)),this.FMenuClick=!1,this.CheckSuchButtons(),this.WebTimerSave.SetEnabled(!0))},this.tblBewerbungenClickCell=async function(t,e,i){var s=null;i-=this.tblBewerbungen.FPaging.FSize*this.tblBewerbungen.FPaging.FActivePage,6===await pas["WEBLib.Dialogs"].MessageDlgAsync("Soll die Bewerbung "+pas.SysUtils.QuotedStr(this.FFBStartseiteListen.ObjektBewerbungen.GetItem(i).Bezeichnung,"'")+" gelöscht werden?",3,rtl.createSet(0,1))&&((s=pas["mpoapi.ReturnTypes"].TmpoBewerbungEnde.$create("Create")).aAngebotID=this.FFBStartseiteListen.ObjektBewerbungen.GetItem(i).id_Angebot,this.BewerbungBeenden(s),null!=this.SuccessProc&&this.SuccessProc())},this.tblDownloadsClickCell=function(t,e,i){var s=null;null!=this.FFBStartseiteListen&&null!=this.FFBStartseiteListen.BewerberDownloads&&((s=pas["mpoapi.ReturnTypes"].TmpoDownloadRequest.$create("Create")).aDocType=2,s.aDocID=this.FFBStartseiteListen.BewerberDownloads.GetItem(i).Bezeichnung),pas["mpoWeb.Utils"].WebLOG("Download für ROW "+pas.SysUtils.TIntegerHelper.ToString$1.call({get:function(){return i},set:function(t){i=t}})+": "+s.aDocID),this.StarteDownloadFile(s)},this.WebTimerSaveTimer=function(t){this.WebTimerSave.SetEnabled(!1),this.FBStartSeiteSpeichern()},this.HoleFragebogenStartseite=async function(){var t=null,e=null;this.FFBStartseite=pas["mpoapi.ReturnTypes"].TmpoStartseiteWeb.$create("Create$1"),pas["mpoWeb.Utils"].WebLOG("Abfrage"),200===(t=await this.Client.RawInvokeAsync("IMPOBewerberService.FBStartseiteGet",[])).GetStatusCode()?(pas["mpoWeb.Utils"].WebLOG("Text: "+t.GetResponseText()),e=rtl.as(pas["WEBLib.JSON"].TJSONObject.ParseJSONValue(t.GetResponseText()),pas["WEBLib.JSON"].TJSONObject),pas["mpoWeb.Utils"].WebLOG("Daten: "+t.GetResponseText()),pas["mpoWeb.Utils"].WebLOG(e),pas["mpoWeb.Utils"].WebLOG("Nun: Einzelwerte..."),this.FBDeSerFragebogen(t.GetResponseText()),this.FelderObjToFragebogenView()):pas["mpoWeb.Utils"].WebLOG("LClientResponse.StatusCode = "+pas.SysUtils.TIntegerHelper.ToString$1.call({p:t.GetStatusCode(),get:function(){return this.p},set:function(t){this.p=t}}))},this.HoleListenStartseite=async function(){var t=null,e=null;this.FFBStartseiteListen=pas["mpoapi.ReturnTypes"].TmpoStartseiteListenWeb.$create("Create$1"),pas["mpoWeb.Utils"].WebLOG("Abfrage"),200===(t=await this.Client.RawInvokeAsync("IMPOBewerberService.FBStartseiteListenGet",[])).GetStatusCode()?(pas["mpoWeb.Utils"].WebLOG("Text: "+t.GetResponseText()),e=rtl.as(pas["WEBLib.JSON"].TJSONObject.ParseJSONValue(t.GetResponseText()),pas["WEBLib.JSON"].TJSONObject),pas["mpoWeb.Utils"].WebLOG("Daten: "+t.GetResponseText()),pas["mpoWeb.Utils"].WebLOG(e),pas["mpoWeb.Utils"].WebLOG("Nun: Einzelwerte..."),this.FBDeSerListen(t.GetResponseText()),this.FelderObjToListenView()):pas["mpoWeb.Utils"].WebLOG("LClientResponse.StatusCode = "+pas.SysUtils.TIntegerHelper.ToString$1.call({p:t.GetStatusCode(),get:function(){return this.p},set:function(t){this.p=t}}))},this.StarteDownloadlink=async function(t){var e=null,i=null,s=null;s=pas["mpoapi.ReturnTypes"].TmpoDownloadLink.$create("Create"),pas["mpoWeb.Utils"].WebLOG("StarteRequest:"),200===(e=await this.Client.RawInvokeAsync("IMPOBewerberService.GetDownloadAngebot",[t])).GetStatusCode()&&(i=e.GetResultAsObject(),pas["mpoWeb.Utils"].WebLOG(e),pas["mpoWeb.Utils"].WebLOG("Objekt:"),pas["mpoWeb.Utils"].WebLOG(i),s.Link=""+i.Link,s.DownloadKey=""+i.DownloadKey,pas["mpoWeb.Utils"].WebLOG("Link:"+pas.SysUtils.QuotedStr(s.Link,"'")),pas.SysUtils.TStringHelper.GetLength.call({p:s,get:function(){return this.p.Link},set:function(t){this.p.Link=t}})>0?(pas["mpoWeb.Utils"].WebLOG("Starte Link: "+pas.SysUtils.QuotedStr(s.Link,"'")),pas["WEBLib.Forms"].Application.Navigate(s.Link,1)):(pas["mpoWeb.Utils"].WebLOG("Starte Dokument: "+pas.SysUtils.QuotedStr(s.DownloadKey,"'")),pas["WEBLib.Forms"].Application.Navigate(pas["mpoweb.ConnectionModule"].DMConnection.URL_DownloadUrl+s.DownloadKey,0)))},this.BewerbungStarten=async function(t){var e=null,i=null,s=null;if(pas["mpoWeb.Utils"].WebLOG("StarteRequest:"),200===(e=await this.Client.RawInvokeAsync("IMPOBewerberService.BewerbungStarten",[t])).GetStatusCode())try{s=pas["mpoapi.ReturnTypes"].TmpoFragebogenResult.$create("Create"),i=rtl.as(pas["WEBLib.JSON"].TJSONObject.ParseJSONValue(e.GetResponseText()),pas["WEBLib.JSON"].TJSONObject),pas["mpoWeb.Utils"].WebLOG(e),s.AllesOK=i.GetJSONValue("AllesOK")===pas["mpoapi.ReturnTypes"].cJBoolTrue,s.Meldung=rtl.as(i.GetValue$1("Meldung"),pas["WEBLib.JSON"].TJSONString).GetStrValue(),s.AllesOK?(pas["mpoWeb.Utils"].WebLOG("AllesOK! "+s.Meldung),pas["WEBLib.Dialogs"].ShowMessage("Ihre Bewerbung ist bei uns eingegangen."+pas.System.sLineBreak+"Nach Vergabe der Wohnung werden sie von uns benachrichtigt.")):(pas["mpoWeb.Utils"].WebLOG("Nicht OK! "+s.Meldung),pas["WEBLib.Dialogs"].ShowMessage("Die Bewerbung konnte nicht versendet werden"))}finally{s=rtl.freeLoc(s),null!=this.SuccessProc&&this.SuccessProc()}},this.BewerbungBeenden=async function(t){var e=null,i=null,s=null;if(pas["mpoWeb.Utils"].WebLOG("StarteRequest: Bewerbung beenden"),200===(e=await this.Client.RawInvokeAsync("IMPOBewerberService.BewerbungBeenden",[t])).GetStatusCode()){s=pas["mpoapi.ReturnTypes"].TmpoFragebogenResult.$create("Create");try{i=rtl.as(pas["WEBLib.JSON"].TJSONObject.ParseJSONValue(e.GetResponseText()),pas["WEBLib.JSON"].TJSONObject),pas["mpoWeb.Utils"].WebLOG(e),s.AllesOK=i.GetJSONValue("AllesOK")===pas["mpoapi.ReturnTypes"].cJBoolTrue,s.Meldung=rtl.as(i.GetValue$1("Meldung"),pas["WEBLib.JSON"].TJSONString).GetStrValue(),s.AllesOK?pas["mpoWeb.Utils"].WebLOG("AllesOK! "+s.Meldung):pas["mpoWeb.Utils"].WebLOG("Nicht OK! "+s.Meldung)}finally{s=rtl.freeLoc(s)}}},this.StarteDownloadFile=async function(t){var e=null,i=null,s=null;s=pas["mpoapi.ReturnTypes"].TmpoDownloadLink.$create("Create"),pas["mpoWeb.Utils"].WebLOG("StarteRequest:"),200===(e=await this.Client.RawInvokeAsync("IMPOBewerberService.GetDownloadFile",[t])).GetStatusCode()&&(i=e.GetResultAsObject(),pas["mpoWeb.Utils"].WebLOG(e),pas["mpoWeb.Utils"].WebLOG("Objekt:"),pas["mpoWeb.Utils"].WebLOG(i),s.Link=""+i.Link,s.DownloadKey=""+i.DownloadKey,pas["mpoWeb.Utils"].WebLOG("Link:"+pas.SysUtils.QuotedStr(s.Link,"'")),pas.SysUtils.TStringHelper.GetLength.call({p:s,get:function(){return this.p.Link},set:function(t){this.p.Link=t}})>0?(pas["mpoWeb.Utils"].WebLOG("Starte Link: "+pas.SysUtils.QuotedStr(s.Link,"'")),pas["WEBLib.Forms"].Application.Navigate(s.Link,1)):(pas["mpoWeb.Utils"].WebLOG("Starte Dokument: "+pas.SysUtils.QuotedStr(s.DownloadKey,"'")),pas["WEBLib.Forms"].Application.Navigate(pas["mpoweb.ConnectionModule"].DMConnection.URL_DownloadUrl+s.DownloadKey,0)))},this.ShowNotification=function(t){""!==t&&(this.lbMessage.SetCaption(t),this.pnlMessage.GetElementHandle().hidden=!1)},this.HiddenNotification=function(){this.pnlMessage.GetElementHandle().hidden=!0},this.FBDeSerFragebogen=function(t){var e=null;e=rtl.as(pas["WEBLib.JSON"].TJSONObject.ParseJSONValue(t),pas["WEBLib.JSON"].TJSONObject),pas["mpoWeb.Utils"].WebLOG(e),this.FFBStartseite.istStudent=e.GetJSONValue("istStudent")===pas["mpoapi.ReturnTypes"].cJBoolTrue,this.FFBStartseite.istTauschWunsch=e.GetJSONValue("istTauschWunsch")===pas["mpoapi.ReturnTypes"].cJBoolTrue,this.FFBStartseite.istWohnungssuche=e.GetJSONValue("istWohnungssuche")===pas["mpoapi.ReturnTypes"].cJBoolTrue,this.FFBStartseite.istOhneSuche=e.GetJSONValue("istOhneSuche")===pas["mpoapi.ReturnTypes"].cJBoolTrue,this.FFBStartseite.Hinweistext=e.GetJSONValue("Hinweistext"),this.FFBStartseite.Angebotstext=e.GetJSONValue("Angebotstext")},this.FBDeSerListen=function(t){var e=null,i=null,s=null,n=null,r=0,a=null,o=null,l=null;e=rtl.as(pas["WEBLib.JSON"].TJSONObject.ParseJSONValue(t),pas["WEBLib.JSON"].TJSONObject),pas["mpoWeb.Utils"].WebLOG(e);for(var h=0,d=(null!=(i=e.GetValue$1("ObjektAngebote"))?i.GetCount():0)-1;h<=d;h++)r=h,s=pas["mpoapi.ReturnTypes"].TmpoObjektAngebote.$create("Create"),n=rtl.as(i.GetItem(r),pas["WEBLib.JSON"].TJSONObject),s.id_Angebot=rtl.guidrToStr(pas.SysUtils.StringToGUID(n.GetValue$1("id_Angebot").GetStrValue())),s.id_Objekt=rtl.guidrToStr(pas.SysUtils.StringToGUID(n.GetValue$1("id_Objekt").GetStrValue())),s.Bezeichnung=n.GetValue$1("Bezeichnung").GetStrValue(),s.Beschreibung=n.GetValue$1("Beschreibung").GetStrValue(),s.istMitLink=n.GetJSONValue("istMitLink")===pas["mpoapi.ReturnTypes"].cJBoolTrue,this.FFBStartseiteListen.ObjektAngebote.Add(s);for(var u=0,c=(null!=(i=e.GetValue$1("ObjektBewerbungen"))?i.GetCount():0)-1;u<=c;u++)r=u,a=pas["mpoapi.ReturnTypes"].TmpoObjektAngebotBewerbung.$create("Create"),n=rtl.as(i.GetItem(r),pas["WEBLib.JSON"].TJSONObject),a.id_Angebot=rtl.guidrToStr(pas.SysUtils.StringToGUID(n.GetValue$1("id_Angebot").GetStrValue())),a.Bezeichnung=n.GetValue$1("Bezeichnung").GetStrValue(),this.FFBStartseiteListen.ObjektBewerbungen.Add(a);for(var F=0,p=(null!=(i=e.GetValue$1("BewerberDownloads"))?i.GetCount():0)-1;F<=p;F++)r=F,o=pas["mpoapi.ReturnTypes"].TmpoBewerberDownload.$create("Create"),n=rtl.as(i.GetItem(r),pas["WEBLib.JSON"].TJSONObject),o.Bezeichnung=n.GetValue$1("Bezeichnung").GetStrValue(),this.FFBStartseiteListen.BewerberDownloads.Add(o);for(var S=0,m=(null!=(i=e.GetValue$1("BewerberUploads"))?i.GetCount():0)-1;S<=m;S++)r=S,l=pas["mpoapi.ReturnTypes"].TmpoBewerberUpload.$create("Create"),n=rtl.as(i.GetItem(r),pas["WEBLib.JSON"].TJSONObject),l.Bezeichnung=n.GetValue$1("Bezeichnung").GetStrValue(),this.FFBStartseiteListen.BewerberUploads.Add(l)},this.FelderObjToFragebogenView=function(){this.rbTauschWunsch.SetChecked(this.FFBStartseite.istTauschWunsch),this.rbStudent.SetChecked(this.FFBStartseite.istStudent),this.rbMietWunsch.SetChecked(this.FFBStartseite.istWohnungssuche),this.rbOhneSuche.SetChecked(this.FFBStartseite.istOhneSuche),this.edFeldHinweise.Clear(),this.edFeldHinweise.FLines.Add(this.FFBStartseite.Hinweistext),this.FFBStartseite.Angebotstext.length>0&&this.edFeldHinweise.FLines.Add(this.FFBStartseite.Angebotstext)},this.FelderObjToListenView=function(){if(null!=this.FFBStartseiteListen)for(var t=0,e=this.FFBStartseiteListen.ObjektAngebote.FLength-1;t<=e;t++)t;this.ShowAngebote(),this.ShowBewerbungen(),this.ShowBewerberDownloads(),this.ShowBewerberUploads()},this.FelderViewToObj=function(){this.FFBStartseite.istTauschWunsch=this.rbTauschWunsch.GetChecked(),this.FFBStartseite.istStudent=this.rbStudent.GetChecked(),this.FFBStartseite.istWohnungssuche=this.rbMietWunsch.GetChecked(),this.FFBStartseite.istOhneSuche=this.rbOhneSuche.GetChecked()},this.FBStartSeiteSpeichern=function(){var t=this;this.FelderViewToObj(),this.FelderObjToFragebogenView(),this.CheckFields(),""===this.FMessage?(this.HiddenNotification(),pas["mpoWeb.Utils"].WebLOG("Fragebogen:"),pas["mpoWeb.Utils"].WebLOG(this.FFBStartseite),this.Client.RawInvoke$2("IMPOBewerberService.FBStartseiteSet",[this.FFBStartseite],(function(e){var i=null;i=rtl.as(pas["WEBLib.JSON"].TJSONObject.ParseJSONValue(e.GetResponseText()),pas["WEBLib.JSON"].TJSONObject),pas["mpoWeb.Utils"].WebLOG(i),t.FMessage=rtl.as(i.GetValue$1("Meldung"),pas["WEBLib.JSON"].TJSONString).GetStrValue(),i.GetJSONValue("AllesOK")===pas["mpoapi.ReturnTypes"].cJBoolTrue?t.CheckShowFB():t.ShowNotification(t.FMessage+" "+pas.SysUtils.TimeToStr(pas.SysUtils.Now()))}),null)):this.ShowNotification(this.FMessage)},this.CheckFields=function(){this.FMessage=""},this.ShowAngebote=function(){var t=null,e=0,i=null;if(this.edFeld02AngeboteGrid.FItems.Clear(),this.edFeld02AngeboteGrid.SetListStyle(4),this.edFeld02AngeboteGrid.FDefaultItemLinkClassName="",this.edFeld02AngeboteGrid.FDefaultItemClassName="list-group-item d-flex justify-content-between align-items-center",this.edFeld02AngeboteGrid.FItems.Clear(),null!=this.FFBStartseiteListen&&null!=this.FFBStartseiteListen.ObjektAngebote)for(var s=0,n=this.FFBStartseiteListen.ObjektAngebote.FLength-1;s<=n;s++)e=s,(t=this.edFeld02AngeboteGrid.FItems.Add$1()).SetText(this.FFBStartseiteListen.ObjektAngebote.GetItem(e).Bezeichnung),t.FTag=10*e,t.SetActive(!0),t.SetAutoCollaps(!0),(i=t.FItems.Add$1()).FTag=10*e+1,i.SetText("Beschreibung:"+pas.System.sLineBreak+this.FFBStartseiteListen.ObjektAngebote.GetItem(e).Beschreibung),i.FItemClassName="list-group-item list-group-item-action d-flex justify-content-between",(i=t.FItems.Add$1()).FTag=10*e+2,i.FItemClassName="list-group-item link-primary",this.FFBStartseiteListen.ObjektAngebote.GetItem(e).istMitLink?i.SetText('<i class="fa fa-file-pdf-o" aria-hidden="true"></i> Datenblatt: Hier klicken. '):i.SetText("--"),(i=t.FItems.Add$1()).FTag=10*e+3,i.FItemClassName="list-group-item link-primary",i.SetText('<i class="fa fa-file" aria-hidden="true"></i>   <b>Zur Bewerbung:</b> Hier klicken. ')},this.ShowBewerbungen=function(){var t=0;if(this.tblBewerbungen.SetRowCount(0),this.tblBewerbungen.SetColCount(1),this.tblBewerbungen.FHeader.SetVisible(!1),this.tblBewerbungen.FFooter.SetVisible(!1),this.tblBewerbungen.SetRowHeader(!1),this.tblBewerbungen.SetColHeader(!1),null!=this.FFBStartseiteListen&&null!=this.FFBStartseiteListen.ObjektBewerbungen){this.tblBewerbungen.SetRowCount(this.FFBStartseiteListen.ObjektBewerbungen.FLength);for(var e=0,i=this.FFBStartseiteListen.ObjektBewerbungen.FLength-1;e<=i;e++)t=e,this.tblBewerbungen.SetCells(0,t,this.FFBStartseiteListen.ObjektBewerbungen.GetItem(t).Bezeichnung);this.FFBStartseiteListen.ObjektBewerbungen.FLength>0&&null!=this.OnShowFBDetail&&this.OnShowFBDetail()}},this.ShowBewerberDownloads=function(){var t=0;if(this.tblDownloads.SetRowCount(0),null!=this.FFBStartseiteListen&&null!=this.FFBStartseiteListen.BewerberDownloads){this.tblDownloads.SetRowCount(this.FFBStartseiteListen.BewerberDownloads.FLength);for(var e=0,i=this.FFBStartseiteListen.BewerberDownloads.FLength-1;e<=i;e++)t=e,this.tblDownloads.SetCells(0,t,this.FFBStartseiteListen.BewerberDownloads.GetItem(t).Bezeichnung)}},this.ShowBewerberUploads=function(){var t=0;if(this.tblUploads.SetRowCount(0),null!=this.FFBStartseiteListen&&null!=this.FFBStartseiteListen.BewerberUploads){this.tblUploads.SetRowCount(this.FFBStartseiteListen.BewerberUploads.FLength);for(var e=0,i=this.FFBStartseiteListen.BewerberUploads.FLength-1;e<=i;e++)t=e,this.tblUploads.SetCells(0,t,this.FFBStartseiteListen.BewerberUploads.GetItem(t).Bezeichnung)}},this.CheckSuchButtons=function(){this.rbOhneSuche.GetChecked()&&null!=this.OnShowOhneSuche&&this.OnShowOhneSuche(),this.rbStudent.GetChecked()&&null!=this.OnShowSucheFBStudent&&this.OnShowSucheFBStudent(),this.rbMietWunsch.GetChecked()&&null!=this.OnShowSucheFBWunsch&&this.OnShowSucheFBWunsch(),this.rbTauschWunsch.GetChecked()&&null!=this.OnShowSucheFBTausch&&this.OnShowSucheFBTausch()},this.CheckShowFB=function(){this.FMenuClick&&(this.rbMietWunsch.GetChecked()&&null!=this.OnShowFBSuche?this.OnShowFBSuche():this.rbTauschWunsch.GetChecked()&&null!=this.OnShowFBTauschwunsch?this.OnShowFBTauschwunsch():this.rbStudent.GetChecked()&&null!=this.OnShowFBStudenten&&this.OnShowFBStudenten())},this.LoadDFMValues=function(){pas["WEBLib.Forms"].TCustomForm.LoadDFMValues.call(this),this.WebLabel1=pas["WEBLib.StdCtrls"].TLabel.$create("Create$2",["view.start.title"]),this.edFeldHinweise=pas["WEBLib.StdCtrls"].TMemo.$create("Create$2",["view.Start.form.ed.L.Hinweise.Text"]),this.rbTauschWunsch=pas["WEBLib.StdCtrls"].TRadioButton.$create("Create$2",["view.Start.form.rbWunschTausch"]),this.rbStudent=pas["WEBLib.StdCtrls"].TRadioButton.$create("Create$2",["view.Start.form.rbWunschStudent"]),this.rbMietWunsch=pas["WEBLib.StdCtrls"].TRadioButton.$create("Create$2",["view.Start.form.rbWunschMieten"]),this.edFeld02AngeboteGrid=pas["WEBLib.Lists"].TListControl.$create("Create$2",["view.Start.form.ed.L.Angebote.Panel"]),this.pnlMessage=pas["WEBLib.ExtCtrls"].TPanel.$create("Create$2",["view.Start.message"]),this.lbMessage=pas["WEBLib.StdCtrls"].TLabel.$create("Create$2",["view.Start.message.label"]),this.WebMessageButton=pas["WEBLib.StdCtrls"].TButton.$create("Create$2",["view.Start.message.button"]),this.WebHTMLDiv1=pas["WEBLib.WebCtrls"].THTMLDiv.$create("Create$2",["view.Start.form.ed.L.Uploads.Panel"]),this.WebHTMLDiv2=pas["WEBLib.WebCtrls"].THTMLDiv.$create("Create$2",["view.Start.form.ed.L.Dokumente.Panel"]),this.WebHTMLDiv3=pas["WEBLib.WebCtrls"].THTMLDiv.$create("Create$2",["view.Start.form.ed.L.Hinweise.Panel"]),this.WebHTMLDiv4=pas["WEBLib.WebCtrls"].THTMLDiv.$create("Create$2",["view.Start.form.ed.L.Bewerbung.Panel"]),this.tblBewerbungen=pas["WEBLib.Grids"].TTableControl.$create("Create$2",["view.Start.form.ed.L.Bewerbung.Tabelle"]),this.tblDownloads=pas["WEBLib.Grids"].TTableControl.$create("Create$2",["view.Start.form.ed.L.Download.Tabelle"]),this.tblUploads=pas["WEBLib.Grids"].TTableControl.$create("Create$2",["view.Start.form.ed.L.Upload.Tabelle"]),this.rbOhneSuche=pas["WEBLib.StdCtrls"].TRadioButton.$create("Create$2",["view.Start.form.rbOhneSuche"]),this.WebMessageDlg1=pas["WEBLib.Dialogs"].TMessageDlg.$create("Create$1",[this]),this.Client=pas["XData.Web.Client"].TXDataWebClient.$create("Create$1",[this]),this.WebTimerSave=pas["WEBLib.ExtCtrls"].TTimer.$create("Create$1",[this]),this.WebTimerStartFB=pas["WEBLib.ExtCtrls"].TTimer.$create("Create$1",[this]),this.WebLabel1.BeforeLoadDFMValues(),this.edFeldHinweise.BeforeLoadDFMValues(),this.rbTauschWunsch.BeforeLoadDFMValues(),this.rbStudent.BeforeLoadDFMValues(),this.rbMietWunsch.BeforeLoadDFMValues(),this.edFeld02AngeboteGrid.BeforeLoadDFMValues(),this.pnlMessage.BeforeLoadDFMValues(),this.lbMessage.BeforeLoadDFMValues(),this.WebMessageButton.BeforeLoadDFMValues(),this.WebHTMLDiv1.BeforeLoadDFMValues(),this.WebHTMLDiv2.BeforeLoadDFMValues(),this.WebHTMLDiv3.BeforeLoadDFMValues(),this.WebHTMLDiv4.BeforeLoadDFMValues(),this.tblBewerbungen.BeforeLoadDFMValues(),this.tblDownloads.BeforeLoadDFMValues(),this.tblUploads.BeforeLoadDFMValues(),this.rbOhneSuche.BeforeLoadDFMValues(),this.WebMessageDlg1.BeforeLoadDFMValues(),this.Client.BeforeLoadDFMValues(),this.WebTimerSave.BeforeLoadDFMValues(),this.WebTimerStartFB.BeforeLoadDFMValues();try{this.SetName("FViewStart"),this.SetWidth(640),this.SetHeight(699),this.SetCSSLibrary(1),this.SetElementFont(1),this.SetEvent(this,"OnCreate","WebFormCreate"),this.SetEvent(this,"OnShow","WebFormShow"),this.WebLabel1.SetParentComponent(this),this.WebLabel1.SetName("WebLabel1"),this.WebLabel1.SetLeft(176),this.WebLabel1.SetTop(184),this.WebLabel1.SetWidth(136),this.WebLabel1.SetHeight(13),this.WebLabel1.SetCaption("Übersicht für die Bewerbung"),this.WebLabel1.SetElementFont(1),this.WebLabel1.SetElementPosition(2),this.WebLabel1.SetHeightStyle(2),this.WebLabel1.SetHeightPercent(100),this.WebLabel1.SetWidthStyle(2),this.WebLabel1.SetWidthPercent(100),this.edFeldHinweise.SetParentComponent(this),this.edFeldHinweise.SetName("edFeldHinweise"),this.edFeldHinweise.SetLeft(334),this.edFeldHinweise.SetTop(31),this.edFeldHinweise.SetWidth(227),this.edFeldHinweise.SetHeight(58),this.edFeldHinweise.SetElementFont(1),this.edFeldHinweise.SetElementPosition(2),this.edFeldHinweise.SetHeightStyle(2),this.edFeldHinweise.SetHeightPercent(100),this.edFeldHinweise.SetReadOnly(!0),this.edFeldHinweise.SetSelLength(0),this.edFeldHinweise.SetSelStart(0),this.edFeldHinweise.SetWidthStyle(2),this.edFeldHinweise.SetWidthPercent(100),this.rbTauschWunsch.SetParentComponent(this),this.rbTauschWunsch.SetName("rbTauschWunsch"),this.rbTauschWunsch.SetLeft(201),this.rbTauschWunsch.SetTop(0),this.rbTauschWunsch.SetWidth(96),this.rbTauschWunsch.SetHeight(25),this.rbTauschWunsch.SetCaption("rbTauschWunsch"),this.rbTauschWunsch.SetChecked(!1),this.rbTauschWunsch.SetChildOrderEx(7),this.rbTauschWunsch.SetColor(-1),this.rbTauschWunsch.SetElementFont(1),this.rbTauschWunsch.SetElementPosition(2),this.rbTauschWunsch.SetGroupName("rbWunsch"),this.rbTauschWunsch.SetHeightStyle(2),this.rbTauschWunsch.SetHeightPercent(100),this.rbTauschWunsch.SetWidthStyle(2),this.rbTauschWunsch.SetWidthPercent(100),this.SetEvent$1(this.rbTauschWunsch,this,"OnClick","rbTauschWunschClick"),this.rbStudent.SetParentComponent(this),this.rbStudent.SetName("rbStudent"),this.rbStudent.SetLeft(303),this.rbStudent.SetTop(0),this.rbStudent.SetWidth(96),this.rbStudent.SetHeight(25),this.rbStudent.SetCaption("rbStudent"),this.rbStudent.SetChecked(!1),this.rbStudent.SetChildOrderEx(8),this.rbStudent.SetColor(-1),this.rbStudent.SetElementFont(1),this.rbStudent.SetElementPosition(2),this.rbStudent.SetGroupName("rbWunsch"),this.rbStudent.SetHeightStyle(2),this.rbStudent.SetHeightPercent(100),this.rbStudent.SetWidthStyle(2),this.rbStudent.SetWidthPercent(100),this.SetEvent$1(this.rbStudent,this,"OnClick","rbStudentClick"),this.rbMietWunsch.SetParentComponent(this),this.rbMietWunsch.SetName("rbMietWunsch"),this.rbMietWunsch.SetLeft(405),this.rbMietWunsch.SetTop(0),this.rbMietWunsch.SetWidth(96),this.rbMietWunsch.SetHeight(25),this.rbMietWunsch.SetCaption("rbMietWunsch"),this.rbMietWunsch.SetChecked(!1),this.rbMietWunsch.SetChildOrderEx(9),this.rbMietWunsch.SetColor(-1),this.rbMietWunsch.SetElementFont(1),this.rbMietWunsch.SetElementPosition(2),this.rbMietWunsch.SetGroupName("rbWunsch"),this.rbMietWunsch.SetHeightStyle(2),this.rbMietWunsch.SetHeightPercent(100),this.rbMietWunsch.SetWidthStyle(2),this.rbMietWunsch.SetWidthPercent(100),this.SetEvent$1(this.rbMietWunsch,this,"OnClick","rbMietWunschClick"),this.edFeld02AngeboteGrid.SetParentComponent(this),this.edFeld02AngeboteGrid.SetName("edFeld02AngeboteGrid"),this.edFeld02AngeboteGrid.SetLeft(264),this.edFeld02AngeboteGrid.SetTop(360),this.edFeld02AngeboteGrid.SetWidth(321),this.edFeld02AngeboteGrid.SetHeight(81),this.edFeld02AngeboteGrid.SetHeightStyle(2),this.edFeld02AngeboteGrid.SetWidthStyle(2),this.edFeld02AngeboteGrid.SetHeightPercent(100),this.edFeld02AngeboteGrid.SetWidthPercent(100),this.edFeld02AngeboteGrid.SetChildOrderEx(10),this.edFeld02AngeboteGrid.SetElementFont(1),this.edFeld02AngeboteGrid.SetElementPosition(2),this.edFeld02AngeboteGrid.SetElementListClassName("active"),this.edFeld02AngeboteGrid.FItems.Clear(),this.edFeld02AngeboteGrid.FItems.Add$1().SetText("Item 0"),this.edFeld02AngeboteGrid.FItems.Add$1().SetText("Item 1"),this.edFeld02AngeboteGrid.FItems.Add$1().SetText("Item 2"),this.SetEvent$1(this.edFeld02AngeboteGrid,this,"OnItemClick","edFeld02AngeboteGridItemClick"),this.pnlMessage.SetParentComponent(this),this.pnlMessage.SetName("pnlMessage"),this.pnlMessage.SetLeft(32),this.pnlMessage.SetTop(144),this.pnlMessage.SetWidth(121),this.pnlMessage.SetHeight(33),this.pnlMessage.SetHeightStyle(2),this.pnlMessage.SetWidthStyle(2),this.pnlMessage.SetChildOrderEx(8),this.pnlMessage.SetElementFont(1),this.pnlMessage.SetElementPosition(2),this.lbMessage.SetParentComponent(this.pnlMessage),this.lbMessage.SetName("lbMessage"),this.lbMessage.SetLeft(16),this.lbMessage.SetTop(17),this.lbMessage.SetWidth(42),this.lbMessage.SetHeight(13),this.lbMessage.SetCaption("Message"),this.lbMessage.SetHeightPercent(100),this.lbMessage.SetWidthPercent(100),this.WebMessageButton.SetParentComponent(this.pnlMessage),this.WebMessageButton.SetName("WebMessageButton"),this.WebMessageButton.SetLeft(96),this.WebMessageButton.SetTop(3),this.WebMessageButton.SetWidth(22),this.WebMessageButton.SetHeight(25),this.WebMessageButton.SetCaption("x"),this.WebMessageButton.SetChildOrderEx(1),this.WebMessageButton.SetElementFont(1),this.WebMessageButton.SetElementPosition(2),this.WebMessageButton.SetHeightStyle(2),this.WebMessageButton.SetHeightPercent(100),this.WebMessageButton.SetWidthStyle(2),this.WebMessageButton.SetWidthPercent(100),this.WebHTMLDiv1.SetParentComponent(this),this.WebHTMLDiv1.SetName("WebHTMLDiv1"),this.WebHTMLDiv1.SetLeft(505),this.WebHTMLDiv1.SetTop(141),this.WebHTMLDiv1.SetWidth(96),this.WebHTMLDiv1.SetHeight(25),this.WebHTMLDiv1.SetHeightStyle(2),this.WebHTMLDiv1.SetWidthStyle(2),this.WebHTMLDiv1.SetChildOrderEx(10),this.WebHTMLDiv1.SetElementPosition(2),this.WebHTMLDiv1.SetElementFont(1),this.WebHTMLDiv1.SetRole(""),this.WebHTMLDiv2.SetParentComponent(this),this.WebHTMLDiv2.SetName("WebHTMLDiv2"),this.WebHTMLDiv2.SetLeft(505),this.WebHTMLDiv2.SetTop(172),this.WebHTMLDiv2.SetWidth(96),this.WebHTMLDiv2.SetHeight(25),this.WebHTMLDiv2.SetHeightStyle(2),this.WebHTMLDiv2.SetWidthStyle(2),this.WebHTMLDiv2.SetChildOrderEx(11),this.WebHTMLDiv2.SetElementPosition(2),this.WebHTMLDiv2.SetElementFont(1),this.WebHTMLDiv2.SetRole(""),this.WebHTMLDiv3.SetParentComponent(this),this.WebHTMLDiv3.SetName("WebHTMLDiv3"),this.WebHTMLDiv3.SetLeft(505),this.WebHTMLDiv3.SetTop(203),this.WebHTMLDiv3.SetWidth(96),this.WebHTMLDiv3.SetHeight(25),this.WebHTMLDiv3.SetHeightStyle(2),this.WebHTMLDiv3.SetWidthStyle(2),this.WebHTMLDiv3.SetChildOrderEx(12),this.WebHTMLDiv3.SetElementPosition(2),this.WebHTMLDiv3.SetElementFont(1),this.WebHTMLDiv3.SetRole(""),this.WebHTMLDiv4.SetParentComponent(this),this.WebHTMLDiv4.SetName("WebHTMLDiv4"),this.WebHTMLDiv4.SetLeft(505),this.WebHTMLDiv4.SetTop(234),this.WebHTMLDiv4.SetWidth(96),this.WebHTMLDiv4.SetHeight(25),this.WebHTMLDiv4.SetHeightStyle(2),this.WebHTMLDiv4.SetWidthStyle(2),this.WebHTMLDiv4.SetChildOrderEx(13),this.WebHTMLDiv4.SetElementPosition(2),this.WebHTMLDiv4.SetElementFont(1),this.WebHTMLDiv4.SetRole(""),this.tblBewerbungen.SetParentComponent(this),this.tblBewerbungen.SetName("tblBewerbungen"),this.tblBewerbungen.SetLeft(32),this.tblBewerbungen.SetTop(472),this.tblBewerbungen.SetWidth(300),this.tblBewerbungen.SetHeight(33),this.tblBewerbungen.SetBorderColor(12632256),this.tblBewerbungen.SetChildOrderEx(14),this.tblBewerbungen.SetColHeader(!1),this.tblBewerbungen.SetElementFont(1),this.tblBewerbungen.SetElementHeaderClassName("thead-light"),this.tblBewerbungen.SetElementTableClassName("table table-striped table-bordered  table-hover"),this.tblBewerbungen.FFooter.FButtonActiveElementClassName="btn btn-primary",this.tblBewerbungen.FFooter.FButtonElementClassName="btn btn-light",this.tblBewerbungen.FFooter.FDropDownElementClassName="form-control",this.tblBewerbungen.FFooter.FInputElementClassName="form-control",this.tblBewerbungen.FFooter.FLinkActiveElementClassName="link-primary",this.tblBewerbungen.FFooter.FLinkElementClassName="link-secondary",this.tblBewerbungen.FFooter.FListElementClassName="pagination",this.tblBewerbungen.FFooter.FListItemElementClassName="page-item",this.tblBewerbungen.FFooter.FListLinkElementClassName="page-link",this.tblBewerbungen.FFooter.SetCaption("FooterCaption"),this.tblBewerbungen.FHeader.FButtonActiveElementClassName="btn btn-primary",this.tblBewerbungen.FHeader.FButtonElementClassName="btn btn-light",this.tblBewerbungen.FHeader.FDropDownElementClassName="form-control",this.tblBewerbungen.FHeader.FInputElementClassName="form-control",this.tblBewerbungen.FHeader.FLinkActiveElementClassName="link-primary",this.tblBewerbungen.FHeader.FLinkElementClassName="link-secondary",this.tblBewerbungen.FHeader.FListElementClassName="pagination",this.tblBewerbungen.FHeader.FListItemElementClassName="page-item",this.tblBewerbungen.FHeader.FListLinkElementClassName="page-link",this.tblBewerbungen.FHeader.SetCaption("HeaderCaption"),this.tblBewerbungen.SetRowHeader(!1),this.SetEvent$1(this.tblBewerbungen,this,"OnClickCell","tblBewerbungenClickCell"),this.tblBewerbungen.SetRowCount(5),this.tblDownloads.SetParentComponent(this),this.tblDownloads.SetName("tblDownloads"),this.tblDownloads.SetLeft(32),this.tblDownloads.SetTop(520),this.tblDownloads.SetWidth(300),this.tblDownloads.SetHeight(33),this.tblDownloads.SetBorderColor(12632256),this.tblDownloads.SetChildOrderEx(14),this.tblDownloads.SetColHeader(!1),this.tblDownloads.SetElementFont(1),this.tblDownloads.SetElementHeaderClassName("thead-light"),this.tblDownloads.SetElementTableClassName("table table-striped table-bordered  table-hover"),this.tblDownloads.FFooter.FButtonActiveElementClassName="btn btn-primary",this.tblDownloads.FFooter.FButtonElementClassName="btn btn-light",this.tblDownloads.FFooter.FDropDownElementClassName="form-control",this.tblDownloads.FFooter.FInputElementClassName="form-control",this.tblDownloads.FFooter.FLinkActiveElementClassName="link-primary",this.tblDownloads.FFooter.FLinkElementClassName="link-secondary",this.tblDownloads.FFooter.FListElementClassName="pagination",this.tblDownloads.FFooter.FListItemElementClassName="page-item",this.tblDownloads.FFooter.FListLinkElementClassName="page-link",this.tblDownloads.FHeader.FButtonActiveElementClassName="btn btn-primary",this.tblDownloads.FHeader.FButtonElementClassName="btn btn-light",this.tblDownloads.FHeader.FDropDownElementClassName="form-control",this.tblDownloads.FHeader.FInputElementClassName="form-control",this.tblDownloads.FHeader.FLinkActiveElementClassName="link-primary",this.tblDownloads.FHeader.FLinkElementClassName="link-secondary",this.tblDownloads.FHeader.FListElementClassName="pagination",this.tblDownloads.FHeader.FListItemElementClassName="page-item",this.tblDownloads.FHeader.FListLinkElementClassName="page-link",this.tblDownloads.SetRowHeader(!1),this.SetEvent$1(this.tblDownloads,this,"OnClickCell","tblDownloadsClickCell"),this.tblDownloads.SetColCount(2),this.tblDownloads.SetRowCount(0),this.tblUploads.SetParentComponent(this),this.tblUploads.SetName("tblUploads"),this.tblUploads.SetLeft(32),this.tblUploads.SetTop(559),this.tblUploads.SetWidth(300),this.tblUploads.SetHeight(49),this.tblUploads.SetBorderColor(12632256),this.tblUploads.SetChildOrderEx(13),this.tblUploads.SetColHeader(!1),this.tblUploads.SetElementFont(1),this.tblUploads.SetElementHeaderClassName("thead-light"),this.tblUploads.SetElementTableClassName("table table-striped table-bordered  table-hover"),this.tblUploads.FFooter.FButtonActiveElementClassName="btn btn-primary",this.tblUploads.FFooter.FButtonElementClassName="btn btn-light",this.tblUploads.FFooter.FDropDownElementClassName="form-control",this.tblUploads.FFooter.FInputElementClassName="form-control",this.tblUploads.FFooter.FLinkActiveElementClassName="link-primary",this.tblUploads.FFooter.FLinkElementClassName="link-secondary",this.tblUploads.FFooter.FListElementClassName="pagination",this.tblUploads.FFooter.FListItemElementClassName="page-item",this.tblUploads.FFooter.FListLinkElementClassName="page-link",this.tblUploads.FHeader.FButtonActiveElementClassName="btn btn-primary",this.tblUploads.FHeader.FButtonElementClassName="btn btn-light",this.tblUploads.FHeader.FDropDownElementClassName="form-control",this.tblUploads.FHeader.FInputElementClassName="form-control",this.tblUploads.FHeader.FLinkActiveElementClassName="link-primary",this.tblUploads.FHeader.FLinkElementClassName="link-secondary",this.tblUploads.FHeader.FListElementClassName="pagination",this.tblUploads.FHeader.FListItemElementClassName="page-item",this.tblUploads.FHeader.FListLinkElementClassName="page-link",this.tblUploads.SetRowHeader(!1),this.tblUploads.SetColCount(2),this.tblUploads.SetRowCount(0),this.rbOhneSuche.SetParentComponent(this),this.rbOhneSuche.SetName("rbOhneSuche"),this.rbOhneSuche.SetLeft(201),this.rbOhneSuche.SetTop(40),this.rbOhneSuche.SetWidth(96),this.rbOhneSuche.SetHeight(25),this.rbOhneSuche.SetCaption("rbOhneSuche"),this.rbOhneSuche.SetChecked(!1),this.rbOhneSuche.SetChildOrderEx(7),this.rbOhneSuche.SetColor(-1),this.rbOhneSuche.SetElementClassName("custom-control custom-radio"),this.rbOhneSuche.FElementButtonClassName="custom-control-input",this.rbOhneSuche.FElementLabelClassName="custom-control-label",this.rbOhneSuche.SetElementFont(1),this.rbOhneSuche.SetElementPosition(2),this.rbOhneSuche.SetGroupName("rbWunsch"),this.rbOhneSuche.SetHeightStyle(2),this.rbOhneSuche.SetHeightPercent(100),this.rbOhneSuche.SetWidthStyle(2),this.rbOhneSuche.SetWidthPercent(100),this.SetEvent$1(this.rbOhneSuche,this,"OnClick","rbOhneSucheClick"),this.WebMessageDlg1.SetParentComponent(this),this.WebMessageDlg1.SetName("WebMessageDlg1"),this.WebMessageDlg1.SetLeft(32),this.WebMessageDlg1.SetTop(272),this.WebMessageDlg1.SetWidth(24),this.WebMessageDlg1.SetHeight(24),this.WebMessageDlg1.FButtons={},this.WebMessageDlg1.FOpacity=.2,this.WebMessageDlg1.FTitle="GBWMPO Bewerbung",this.WebMessageDlg1.FElementButtonClassName="btn",this.WebMessageDlg1.FElementDialogClassName="shadow-lg p-3 mb-5 bg-white rounded",this.WebMessageDlg1.FElementTitleClassName="text-body",this.WebMessageDlg1.FElementContentClassName="text-body",this.Client.SetParentComponent(this),this.Client.SetName("Client"),this.Client.SetConnection(pas["mpoweb.ConnectionModule"].DMConnection.ApiConnection),this.Client.SetLeft(8),this.Client.SetTop(48),this.WebTimerSave.SetParentComponent(this),this.WebTimerSave.SetName("WebTimerSave"),this.WebTimerSave.SetEnabled(!1),this.WebTimerSave.SetInterval(10),this.SetEvent$1(this.WebTimerSave,this,"OnTimer","WebTimerSaveTimer"),this.WebTimerSave.SetLeft(304),this.WebTimerSave.SetTop(224),this.WebTimerStartFB.SetParentComponent(this),this.WebTimerStartFB.SetName("WebTimerStartFB"),this.WebTimerStartFB.SetEnabled(!1),this.WebTimerStartFB.SetInterval(10),this.WebTimerStartFB.SetLeft(296),this.WebTimerStartFB.SetTop(272)}finally{this.WebLabel1.AfterLoadDFMValues(),this.edFeldHinweise.AfterLoadDFMValues(),this.rbTauschWunsch.AfterLoadDFMValues(),this.rbStudent.AfterLoadDFMValues(),this.rbMietWunsch.AfterLoadDFMValues(),this.edFeld02AngeboteGrid.AfterLoadDFMValues(),this.pnlMessage.AfterLoadDFMValues(),this.lbMessage.AfterLoadDFMValues(),this.WebMessageButton.AfterLoadDFMValues(),this.WebHTMLDiv1.AfterLoadDFMValues(),this.WebHTMLDiv2.AfterLoadDFMValues(),this.WebHTMLDiv3.AfterLoadDFMValues(),this.WebHTMLDiv4.AfterLoadDFMValues(),this.tblBewerbungen.AfterLoadDFMValues(),this.tblDownloads.AfterLoadDFMValues(),this.tblUploads.AfterLoadDFMValues(),this.rbOhneSuche.AfterLoadDFMValues(),this.WebMessageDlg1.AfterLoadDFMValues(),this.Client.AfterLoadDFMValues(),this.WebTimerSave.AfterLoadDFMValues(),this.WebTimerStartFB.AfterLoadDFMValues()}},rtl.addIntf(this,pas["WEBLib.Controls"].IControl),rtl.addIntf(this,pas.System.IUnknown);var t=this.$rtti;t.addField("WebLabel1",pas["WEBLib.StdCtrls"].$rtti.TLabel,4),t.addField("edFeldHinweise",pas["WEBLib.StdCtrls"].$rtti.TMemo,4),t.addField("rbTauschWunsch",pas["WEBLib.StdCtrls"].$rtti.TRadioButton,4),t.addField("rbStudent",pas["WEBLib.StdCtrls"].$rtti.TRadioButton,4),t.addField("rbMietWunsch",pas["WEBLib.StdCtrls"].$rtti.TRadioButton,4),t.addField("Client",pas["XData.Web.Client"].$rtti.TXDataWebClient,4),t.addField("WebTimerSave",pas["WEBLib.ExtCtrls"].$rtti.TTimer,4),t.addField("edFeld02AngeboteGrid",pas["WEBLib.Lists"].$rtti.TListControl,4),t.addField("pnlMessage",pas["WEBLib.ExtCtrls"].$rtti.TPanel,4),t.addField("lbMessage",pas["WEBLib.StdCtrls"].$rtti.TLabel,4),t.addField("WebMessageButton",pas["WEBLib.StdCtrls"].$rtti.TButton,4),t.addField("WebHTMLDiv1",pas["WEBLib.WebCtrls"].$rtti.THTMLDiv,4),t.addField("WebHTMLDiv2",pas["WEBLib.WebCtrls"].$rtti.THTMLDiv,4),t.addField("WebHTMLDiv3",pas["WEBLib.WebCtrls"].$rtti.THTMLDiv,4),t.addField("WebHTMLDiv4",pas["WEBLib.WebCtrls"].$rtti.THTMLDiv,4),t.addField("tblDownloads",pas["WEBLib.Grids"].$rtti.TTableControl,4),t.addField("tblUploads",pas["WEBLib.Grids"].$rtti.TTableControl,4),t.addField("tblBewerbungen",pas["WEBLib.Grids"].$rtti.TTableControl,4),t.addField("rbOhneSuche",pas["WEBLib.StdCtrls"].$rtti.TRadioButton,4),t.addField("WebMessageDlg1",pas["WEBLib.Dialogs"].$rtti.TMessageDlg,4),t.addField("WebTimerStartFB",pas["WEBLib.ExtCtrls"].$rtti.TTimer,4),t.addMethod("rbMietWunschClick",0,[["Sender",pas.System.$rtti.TObject]],4),t.addMethod("rbStudentClick",0,[["Sender",pas.System.$rtti.TObject]],4),t.addMethod("rbTauschWunschClick",0,[["Sender",pas.System.$rtti.TObject]],4),t.addMethod("WebFormCreate",0,[["Sender",pas.System.$rtti.TObject]],4),t.addMethod("WebFormShow",0,[["Sender",pas.System.$rtti.TObject]],4),t.addMethod("edFeld02AngeboteGridItemClick",0,[["Sender",pas.System.$rtti.TObject],["AListItem",pas["WEBLib.Lists"].$rtti.TListItem]],4),t.addMethod("MsgDlgBewerbungstornoButtonClick",0,[["Sender",pas.System.$rtti.TObject]],4),t.addMethod("rbOhneSucheClick",0,[["Sender",pas.System.$rtti.TObject]],4,null,16,{attr:[pas.JS.AsyncAttribute,"Create"]}),t.addMethod("tblBewerbungenClickCell",0,[["Sender",pas.System.$rtti.TObject],["ACol",rtl.longint],["ARow",rtl.longint]],4,null,16,{attr:[pas.JS.AsyncAttribute,"Create"]}),t.addMethod("tblDownloadsClickCell",0,[["Sender",pas.System.$rtti.TObject],["ACol",rtl.longint],["ARow",rtl.longint]],4),t.addMethod("WebTimerSaveTimer",0,[["Sender",pas.System.$rtti.TObject]],4)}))}),["mpoweb.ConnectionModule","mpoweb.Auth.Service"]),rtl.module("mpoView.Main",["System","SysUtils","Classes","WEBLib.Graphics","WEBLib.Forms","WEBLib.Dialogs","WEBLib.Controls","WEBLib.Forms","WEBLib.Controls","WEBLib.ExtCtrls","WEBLib.StdCtrls","WEBLib.StdCtrls","mpoweb.App.Types","mpoweb.ConnectionModule","WEBLib.Lists","WEBLib.WebCtrls","mpoView.TauschWunsch","mpoView.Studentenwohnheim"],(function(){"use strict";var t=this;rtl.createClass(this,"TFViewMain",pas["WEBLib.Forms"].TForm,(function(){this.$init=function(){pas["WEBLib.Forms"].TForm.$init.call(this),this.HostPanel=null,this.wlStart=null,this.wlFB=null,this.wlFBDetail=null,this.wlUpload=null,this.WebLinkLabel6=null,this.WebLinkLabel7=null,this.lbUsername=null,this.wlKontakt=null,this.wlTauschWunsch=null,this.wlStudentenwohnheim=null,this.FChildForm=null,this.FLogoutProc=null,this.FShowFBTausch=!1,this.FShowFBStudent=!1,this.FShowFBSuche=!1,this.FShowFBDetail=!1},this.$final=function(){this.HostPanel=void 0,this.wlStart=void 0,this.wlFB=void 0,this.wlFBDetail=void 0,this.wlUpload=void 0,this.WebLinkLabel6=void 0,this.WebLinkLabel7=void 0,this.lbUsername=void 0,this.wlKontakt=void 0,this.wlTauschWunsch=void 0,this.wlStudentenwohnheim=void 0,this.FChildForm=void 0,this.FLogoutProc=void 0,pas["WEBLib.Forms"].TForm.$final.call(this)},this.WebFormCreate=function(t){this.FShowFBDetail=!1,this.FShowFBTausch=!1,this.FShowFBStudent=!1,this.FShowFBSuche=!1,this.MenueUpdate(),this.lbUsername.SetCaption(pas.JS.ToString(pas["mpoweb.Auth.Service"].AuthService().TokenPayload().user)),this.FChildForm=null,this.ShowForm(pas["mpoView.Start"].TFViewStart)},this.WebFormShow=function(t){},this.wlStudentenwohnheimClick=function(t){this.ShowCrudForm(pas["mpoView.Studentenwohnheim"].TFViewFBStudentenwohnheim)},this.wlStartClick=function(t){this.ShowForm(pas["mpoView.Start"].TFViewStart)},this.wlFBClick=function(t){this.ShowCrudForm(pas["mpoView.Fragebogen"].TFViewFB)},this.wlFBDetailClick=function(t){this.ShowCrudForm(pas["mpoView.FBErweitert"].TFViewFBErweitert)},this.wlUploadClick=function(t){this.ShowCrudForm(pas["mpoView.Upload"].TFViewUpload)},this.WebLinkLabel6Click=function(t){this.FLogoutProc("")},this.WebLinkLabel7Click=function(t){this.ShowForm(pas["mpoView.UserProfile"].TFViewUserProfile)},this.wlKontaktClick=function(t){this.ShowCrudForm(pas["mpoView.Kontakt"].TFViewKontakt)},this.wlTauschWunschClick=function(t){this.ShowCrudForm(pas["mpoView.TauschWunsch"].TFViewFBTauschWunsch)},this.ShowForm=function(t){var e=this;null!=this.FChildForm&&rtl.free(this,"FChildForm"),this.FChildForm=t.$create("CreateNew$4",[this.HostPanel.GetID(),function(t){e.FChildForm.SetVisible(!0),null!=e.FChildForm&&(pas["mpoView.Studentenwohnheim"].TFViewFBStudentenwohnheim.isPrototypeOf(e.FChildForm)?rtl.as(e.FChildForm,pas["mpoView.Studentenwohnheim"].TFViewFBStudentenwohnheim).SuccessProc=rtl.createCallback(e,"ShowStart"):pas["mpoView.FBErweitert"].TFViewFBErweitert.isPrototypeOf(e.FChildForm)?rtl.as(e.FChildForm,pas["mpoView.FBErweitert"].TFViewFBErweitert).SuccessProc=rtl.createCallback(e,"ShowStart"):pas["mpoView.Start"].TFViewStart.isPrototypeOf(e.FChildForm)?(rtl.as(e.FChildForm,pas["mpoView.Start"].TFViewStart).SuccessProc=rtl.createCallback(e,"ShowStart"),rtl.as(e.FChildForm,pas["mpoView.Start"].TFViewStart).OnShowOhneSuche=rtl.createCallback(e,"ShowMenueOhne"),rtl.as(e.FChildForm,pas["mpoView.Start"].TFViewStart).OnShowSucheFBTausch=rtl.createCallback(e,"ShowMenueTauschwunsch"),rtl.as(e.FChildForm,pas["mpoView.Start"].TFViewStart).OnShowSucheFBWunsch=rtl.createCallback(e,"ShowMenueSuche"),rtl.as(e.FChildForm,pas["mpoView.Start"].TFViewStart).OnShowSucheFBStudent=rtl.createCallback(e,"ShowMenueStudenten"),rtl.as(e.FChildForm,pas["mpoView.Start"].TFViewStart).OnShowFBDetail=rtl.createCallback(e,"ShowMenueDetailFB"),rtl.as(e.FChildForm,pas["mpoView.Start"].TFViewStart).OnShowFBSuche=rtl.createCallback(e,"ShowFBSuche"),rtl.as(e.FChildForm,pas["mpoView.Start"].TFViewStart).OnShowFBTauschwunsch=rtl.createCallback(e,"ShowFBTauschwunsch"),rtl.as(e.FChildForm,pas["mpoView.Start"].TFViewStart).OnShowFBStudenten=rtl.createCallback(e,"ShowFBStudenten")):pas["mpoView.Fragebogen"].TFViewFB.isPrototypeOf(e.FChildForm)?rtl.as(e.FChildForm,pas["mpoView.Fragebogen"].TFViewFB).SuccessProc=rtl.createCallback(e,"ShowStart"):pas["mpoView.TauschWunsch"].TFViewFBTauschWunsch.isPrototypeOf(e.FChildForm)?rtl.as(e.FChildForm,pas["mpoView.TauschWunsch"].TFViewFBTauschWunsch).SuccessProc=rtl.createCallback(e,"ShowStart"):(pas["mpoView.Studentenwohnheim"].TFViewFBStudentenwohnheim.isPrototypeOf(e.FChildForm)||pas["mpoView.Studentenwohnheim"].TFViewFBStudentenwohnheim.isPrototypeOf(e.FChildForm)||pas["mpoView.Studentenwohnheim"].TFViewFBStudentenwohnheim.isPrototypeOf(e.FChildForm))&&(rtl.as(e.FChildForm,pas["mpoView.Studentenwohnheim"].TFViewFBStudentenwohnheim).SuccessProc=rtl.createCallback(e,"ShowStart")))}])},this.ShowCrudForm=function(t){this.ShowForm(t)},this.ShowMenueOhne=function(){this.FShowFBTausch=!1,this.FShowFBStudent=!1,this.FShowFBSuche=!1,this.MenueUpdate()},this.ShowMenueSuche=function(){this.FShowFBTausch=!1,this.FShowFBStudent=!1,this.FShowFBSuche=!0,this.MenueUpdate()},this.ShowMenueTauschwunsch=function(){this.FShowFBTausch=!0,this.FShowFBStudent=!1,this.FShowFBSuche=!1,this.MenueUpdate()},this.ShowMenueStudenten=function(){this.FShowFBTausch=!1,this.FShowFBStudent=!0,this.FShowFBSuche=!1,this.MenueUpdate()},this.ShowMenueDetailFB=function(){this.FShowFBDetail=!0,this.MenueUpdate()},this.ShowFBSuche=function(){this.ShowCrudForm(pas["mpoView.Fragebogen"].TFViewFB)},this.ShowFBTauschwunsch=function(){this.ShowCrudForm(pas["mpoView.TauschWunsch"].TFViewFBTauschWunsch)},this.ShowFBStudenten=function(){this.ShowCrudForm(pas["mpoView.Studentenwohnheim"].TFViewFBStudentenwohnheim)},this.ShowStart=function(){this.ShowForm(pas["mpoView.Start"].TFViewStart)},this.MenueUpdate=function(){this.wlTauschWunsch.SetVisible(this.FShowFBTausch),this.wlFB.SetVisible(this.FShowFBSuche),this.wlStudentenwohnheim.SetVisible(this.FShowFBStudent),this.wlFBDetail.SetVisible(this.FShowFBDetail&&(this.FShowFBTausch||this.FShowFBSuche))},this.Display=function(e){null!=t.FViewMain&&rtl.free(t,"FViewMain"),t.FViewMain=t.TFViewMain.$create("CreateNew$2"),t.FViewMain.FLogoutProc=e},this.LoadDFMValues=function(){pas["WEBLib.Forms"].TCustomForm.LoadDFMValues.call(this),this.wlStart=pas["WEBLib.ExtCtrls"].TLinkLabel.$create("Create$2",["main.menu.Start"]),this.wlFB=pas["WEBLib.ExtCtrls"].TLinkLabel.$create("Create$2",["main.menu.Fragebogen"]),this.wlFBDetail=pas["WEBLib.ExtCtrls"].TLinkLabel.$create("Create$2",["main.menu.Auskunft"]),this.wlUpload=pas["WEBLib.ExtCtrls"].TLinkLabel.$create("Create$2",["main.menu.Upload"]),this.WebLinkLabel6=pas["WEBLib.ExtCtrls"].TLinkLabel.$create("Create$2",["main.menu.logout"]),this.WebLinkLabel7=pas["WEBLib.ExtCtrls"].TLinkLabel.$create("Create$2",["main.menu.userprofile"]),this.lbUsername=pas["WEBLib.StdCtrls"].TLabel.$create("Create$2",["view.main.username"]),this.wlKontakt=pas["WEBLib.ExtCtrls"].TLinkLabel.$create("Create$2",["main.menu.Kontakt"]),this.wlTauschWunsch=pas["WEBLib.ExtCtrls"].TLinkLabel.$create("Create$2",["main.menu.TauschWunsch"]),this.wlStudentenwohnheim=pas["WEBLib.ExtCtrls"].TLinkLabel.$create("Create$2",["main.menu.Studentenwohnheim"]),this.HostPanel=pas["WEBLib.ExtCtrls"].TPanel.$create("Create$2",["main.webpanel"]),this.wlStart.BeforeLoadDFMValues(),this.wlFB.BeforeLoadDFMValues(),this.wlFBDetail.BeforeLoadDFMValues(),this.wlUpload.BeforeLoadDFMValues(),this.WebLinkLabel6.BeforeLoadDFMValues(),this.WebLinkLabel7.BeforeLoadDFMValues(),this.lbUsername.BeforeLoadDFMValues(),this.wlKontakt.BeforeLoadDFMValues(),this.wlTauschWunsch.BeforeLoadDFMValues(),this.wlStudentenwohnheim.BeforeLoadDFMValues(),this.HostPanel.BeforeLoadDFMValues();try{this.SetName("FViewMain"),this.SetWidth(640),this.SetHeight(480),this.FFont.FCharset=1,this.FFont.SetColor(65793),this.FFont.SetHeight(-11),this.FFont.SetName("Tahoma"),this.FFont.SetStyle({}),this.SetParentFont(!1),this.SetEvent(this,"OnCreate","WebFormCreate"),this.SetEvent(this,"OnShow","WebFormShow"),this.wlStart.SetParentComponent(this),this.wlStart.SetName("wlStart"),this.wlStart.SetLeft(24),this.wlStart.SetTop(92),this.wlStart.SetWidth(24),this.wlStart.SetHeight(13),this.wlStart.SetElementFont(1),this.wlStart.SetHeightPercent$1(100),this.wlStart.SetWidthPercent$1(100),this.SetEvent$1(this.wlStart,this,"OnClick","wlStartClick"),this.wlStart.SetCaption("Start"),this.wlFB.SetParentComponent(this),this.wlFB.SetName("wlFB"),this.wlFB.SetLeft(24),this.wlFB.SetTop(111),this.wlFB.SetWidth(58),this.wlFB.SetHeight(13),this.wlFB.SetElementFont(1),this.wlFB.SetHeightPercent$1(100),this.wlFB.SetWidthPercent$1(100),this.SetEvent$1(this.wlFB,this,"OnClick","wlFBClick"),this.wlFB.SetCaption("Fragebogen"),this.wlFBDetail.SetParentComponent(this),this.wlFBDetail.SetName("wlFBDetail"),this.wlFBDetail.SetLeft(24),this.wlFBDetail.SetTop(130),this.wlFBDetail.SetWidth(71),this.wlFBDetail.SetHeight(13),this.wlFBDetail.SetElementFont(1),this.wlFBDetail.SetHeightPercent$1(100),this.wlFBDetail.SetWidthPercent$1(100),this.SetEvent$1(this.wlFBDetail,this,"OnClick","wlFBDetailClick"),this.wlFBDetail.SetCaption("Selbstauskunft"),this.wlUpload.SetParentComponent(this),this.wlUpload.SetName("wlUpload"),this.wlUpload.SetLeft(24),this.wlUpload.SetTop(187),this.wlUpload.SetWidth(33),this.wlUpload.SetHeight(13),this.wlUpload.SetElementFont(1),this.wlUpload.SetHeightPercent$1(100),this.wlUpload.SetWidthPercent$1(100),this.SetEvent$1(this.wlUpload,this,"OnClick","wlUploadClick"),this.wlUpload.SetCaption("Upload"),this.WebLinkLabel6.SetParentComponent(this),this.WebLinkLabel6.SetName("WebLinkLabel6"),this.WebLinkLabel6.SetLeft(551),this.WebLinkLabel6.SetTop(46),this.WebLinkLabel6.SetWidth(33),this.WebLinkLabel6.SetHeight(13),this.WebLinkLabel6.SetHeightPercent$1(100),this.WebLinkLabel6.SetWidthPercent$1(100),this.SetEvent$1(this.WebLinkLabel6,this,"OnClick","WebLinkLabel6Click"),this.WebLinkLabel6.SetCaption("Logout"),this.WebLinkLabel7.SetParentComponent(this),this.WebLinkLabel7.SetName("WebLinkLabel7"),this.WebLinkLabel7.SetLeft(529),this.WebLinkLabel7.SetTop(27),this.WebLinkLabel7.SetWidth(67),this.WebLinkLabel7.SetHeight(13),this.WebLinkLabel7.SetHeightPercent$1(100),this.WebLinkLabel7.SetWidthPercent$1(100),this.SetEvent$1(this.WebLinkLabel7,this,"OnClick","WebLinkLabel7Click"),this.WebLinkLabel7.SetCaption("Benutzerprofil"),this.lbUsername.SetParentComponent(this),this.lbUsername.SetName("lbUsername"),this.lbUsername.SetLeft(528),this.lbUsername.SetTop(8),this.lbUsername.SetWidth(56),this.lbUsername.SetHeight(13),this.lbUsername.SetCaption("lbUsername"),this.lbUsername.SetHeightPercent(100),this.lbUsername.SetTransparent(!1),this.lbUsername.SetWidthPercent(100),this.wlKontakt.SetParentComponent(this),this.wlKontakt.SetName("wlKontakt"),this.wlKontakt.SetLeft(25),this.wlKontakt.SetTop(206),this.wlKontakt.SetWidth(37),this.wlKontakt.SetHeight(13),this.wlKontakt.SetElementFont(1),this.wlKontakt.SetHeightStyle$1(2),this.wlKontakt.SetWidthStyle$1(2),this.wlKontakt.SetHeightPercent$1(100),this.wlKontakt.SetWidthPercent$1(100),this.SetEvent$1(this.wlKontakt,this,"OnClick","wlKontaktClick"),this.wlKontakt.SetCaption("Kontakt"),this.wlTauschWunsch.SetParentComponent(this),this.wlTauschWunsch.SetName("wlTauschWunsch"),this.wlTauschWunsch.SetLeft(24),this.wlTauschWunsch.SetTop(168),this.wlTauschWunsch.SetWidth(70),this.wlTauschWunsch.SetHeight(13),this.wlTauschWunsch.SetElementFont(1),this.wlTauschWunsch.SetHeightStyle$1(2),this.wlTauschWunsch.SetWidthStyle$1(2),this.wlTauschWunsch.SetHeightPercent$1(100),this.wlTauschWunsch.SetWidthPercent$1(100),this.SetEvent$1(this.wlTauschWunsch,this,"OnClick","wlTauschWunschClick"),this.wlTauschWunsch.SetCaption("Tauschwunsch"),this.wlStudentenwohnheim.SetParentComponent(this),this.wlStudentenwohnheim.SetName("wlStudentenwohnheim"),this.wlStudentenwohnheim.SetLeft(23),this.wlStudentenwohnheim.SetTop(149),this.wlStudentenwohnheim.SetWidth(98),this.wlStudentenwohnheim.SetHeight(13),this.wlStudentenwohnheim.SetElementFont(1),this.wlStudentenwohnheim.SetHeightStyle$1(2),this.wlStudentenwohnheim.SetWidthStyle$1(2),this.wlStudentenwohnheim.SetHeightPercent$1(100),this.wlStudentenwohnheim.SetWidthPercent$1(100),this.SetEvent$1(this.wlStudentenwohnheim,this,"OnClick","wlStudentenwohnheimClick"),this.wlStudentenwohnheim.SetCaption("Studentenwohnheim"),this.HostPanel.SetParentComponent(this),this.HostPanel.SetName("HostPanel"),this.HostPanel.SetLeft(136),this.HostPanel.SetTop(92),this.HostPanel.SetWidth(471),this.HostPanel.SetHeight(369)}finally{this.wlStart.AfterLoadDFMValues(),this.wlFB.AfterLoadDFMValues(),this.wlFBDetail.AfterLoadDFMValues(),this.wlUpload.AfterLoadDFMValues(),this.WebLinkLabel6.AfterLoadDFMValues(),this.WebLinkLabel7.AfterLoadDFMValues(),this.lbUsername.AfterLoadDFMValues(),this.wlKontakt.AfterLoadDFMValues(),this.wlTauschWunsch.AfterLoadDFMValues(),this.wlStudentenwohnheim.AfterLoadDFMValues(),this.HostPanel.AfterLoadDFMValues()}},rtl.addIntf(this,pas["WEBLib.Controls"].IControl),rtl.addIntf(this,pas.System.IUnknown);var e=this.$rtti;e.addField("HostPanel",pas["WEBLib.ExtCtrls"].$rtti.TPanel,4),e.addField("wlStart",pas["WEBLib.ExtCtrls"].$rtti.TLinkLabel,4),e.addField("wlFB",pas["WEBLib.ExtCtrls"].$rtti.TLinkLabel,4),e.addField("wlFBDetail",pas["WEBLib.ExtCtrls"].$rtti.TLinkLabel,4),e.addField("wlUpload",pas["WEBLib.ExtCtrls"].$rtti.TLinkLabel,4),e.addField("WebLinkLabel6",pas["WEBLib.ExtCtrls"].$rtti.TLinkLabel,4),e.addField("WebLinkLabel7",pas["WEBLib.ExtCtrls"].$rtti.TLinkLabel,4),e.addField("lbUsername",pas["WEBLib.StdCtrls"].$rtti.TLabel,4),e.addField("wlKontakt",pas["WEBLib.ExtCtrls"].$rtti.TLinkLabel,4),e.addField("wlTauschWunsch",pas["WEBLib.ExtCtrls"].$rtti.TLinkLabel,4),e.addField("wlStudentenwohnheim",pas["WEBLib.ExtCtrls"].$rtti.TLinkLabel,4),e.addMethod("WebFormCreate",0,[["Sender",pas.System.$rtti.TObject]],4),e.addMethod("WebFormShow",0,[["Sender",pas.System.$rtti.TObject]],4),e.addMethod("wlStudentenwohnheimClick",0,[["Sender",pas.System.$rtti.TObject]],4),e.addMethod("wlStartClick",0,[["Sender",pas.System.$rtti.TObject]],4),e.addMethod("wlFBClick",0,[["Sender",pas.System.$rtti.TObject]],4),e.addMethod("wlFBDetailClick",0,[["Sender",pas.System.$rtti.TObject]],4),e.addMethod("wlUploadClick",0,[["Sender",pas.System.$rtti.TObject]],4),e.addMethod("WebLinkLabel6Click",0,[["Sender",pas.System.$rtti.TObject]],4),e.addMethod("WebLinkLabel7Click",0,[["Sender",pas.System.$rtti.TObject]],4),e.addMethod("wlKontaktClick",0,[["Sender",pas.System.$rtti.TObject]],4),e.addMethod("wlTauschWunschClick",0,[["Sender",pas.System.$rtti.TObject]],4)})),this.FViewMain=null}),["JS","mpoweb.Auth.Service","mpoView.Login","mpoView.UserProfile","mpoView.Kontakt","mpoView.Upload","mpoView.Fragebogen","mpoView.FBErweitert","mpoView.Start"]),rtl.module("program",["System","WEBLib.Forms","SysUtils","mpoweb.ConnectionModule","mpoView.ErrorPage","mpoweb.Auth.Service","mpoweb.App.Config","mpoweb.App.Types","mpoView.Login","mpoView.Main","mpoView.UserProfile","mpoView.LoginNew","mpoapi.ReturnTypes","mpoView.LoginPW","mpoView.FBErweitert","mpoView.Fragebogen","mpoView.Upload","mpoView.Kontakt","mpoView.Start","mpoView.TauschWunsch","mpoView.Studentenwohnheim","mpowep.model.webclient.root","mpoWeb.Utils"],(function(){"use strict";var t=this;this.DisplayMainView=function(){function e(){null!=pas["mpoView.Login"].FViewLogin&&rtl.free(pas["mpoView.Login"],"FViewLogin"),pas["mpoView.Main"].TFViewMain.Display(t.DisplayLoginView)}pas["mpoweb.ConnectionModule"].DMConnection.ApiConnection.GetConnected()?e():pas["mpoweb.ConnectionModule"].DMConnection.ApiConnection.Open(e,null)},this.DisplayLoginView=function(e){pas["mpoweb.Auth.Service"].AuthService().Logout(),pas["mpoweb.ConnectionModule"].DMConnection.ApiConnection.SetConnected(!1),null!=pas["mpoView.Main"].FViewMain&&rtl.free(pas["mpoView.Main"],"FViewMain"),pas["mpoView.Login"].TFViewLogin.Display$2(t.DisplayMainView,t.DisplayLoginNewView,t.DisplayLoginPWView,e)},this.DisplayLoginNewOK=function(){t.DisplayLoginView("")},this.DisplayLoginNewView=function(){pas["mpoweb.Auth.Service"].AuthService().Logout(),pas["mpoweb.ConnectionModule"].DMConnection.ApiConnection.SetConnected(!1),null!=pas["mpoView.Main"].FViewMain&&rtl.free(pas["mpoView.Main"],"FViewMain"),pas["mpoView.LoginNew"].TFViewLoginNew.Display(t.DisplayLoginNewOK)},this.DisplayLoginPWView=function(){pas["mpoweb.Auth.Service"].AuthService().Logout(),pas["mpoweb.ConnectionModule"].DMConnection.ApiConnection.SetConnected(!1),null!=pas["mpoView.Main"].FViewMain&&rtl.free(pas["mpoView.Main"],"FViewMain"),pas["mpoView.LoginPW"].TFViewLoginPW.Display(t.DisplayLoginNewOK)},this.UnauthorizedAccessProc=function(e){t.DisplayLoginView(e)},this.StartApplication=function(){!pas["mpoweb.Auth.Service"].AuthService().Authenticated()||pas["mpoweb.Auth.Service"].AuthService().TokenExpired()?t.DisplayLoginView(""):t.DisplayMainView()},t.$main=function(){pas["WEBLib.Forms"].Application.Initialize(),pas["WEBLib.Forms"].Application.FMainFormOnTaskBar=!0,pas["WEBLib.Forms"].Application.FThemeColor=6076508,pas["WEBLib.Forms"].Application.CreateFormDirect$2(pas["mpoweb.ConnectionModule"].TDMConnection,{p:pas["mpoweb.ConnectionModule"],get:function(){return this.p.DMConnection},set:function(t){this.p.DMConnection=t}}),pas["WEBLib.Forms"].Application.Run(),pas["mpoweb.ConnectionModule"].DMConnection.InitApp(t.StartApplication,t.UnauthorizedAccessProc)}}));