<div dir="ltr"><div>I'm try learn about APIOffline and I need applicationCache method from <br></div><div>window class....but it has not that....so I written something as a draft ....I'm not sure....:-(...:here  I go:</div><div><br></div><div>(* in order to give support to method window.applicationOffline *)<br>TJSnsrefcnt                   = integer;<br>TJSnsISupports                = class;<br>TJSnsIDOMOfflineResourcesList = class;<br><br>TJSnsIDOMEventListenerEvent = TJSEvent;<br><br>TJSnsIDOMEventListener    = reference to function(aEvent: TJSnsIDOMEventListenerEvent):Boolean;<br>TJSnsVoidIDOMEventHandler = reference to procedure(aUrl: TJSDOMString);<br><br>TJSnsIDOMOfflineResourcesList = class external name 'nsIDOMOfflineResourcesList'(TJSnsISupport)<br>private<br> fmozItems      : TJSnsIDOMOfflineResourseList; external name 'mozItems';<br> fmozLength     : longint; external name 'mozLength';<br> fonerror       : TJSnsIDOMEventListener; external name 'onerror';<br> fonnoupdate    : TJSnsIDOMEventListener; external name 'onnoupdate';<br> fonprogress    : TJSnsIDOMEventListener; external name 'onprogress';<br> fonupdateready : TJSnsIDOMEventListener; external name 'onupdateready';<br> foncached      : TJSnsIDOMEventListener; external name 'oncached';<br> fstatus        : word;  external name 'status';<br>public<br> const<br>  UNCACHED    = 0;<br>  IDLE        = 1;<br>  CHECKIG     = 2;<br>  DOWNLOADING = 3;<br>  UPDATEREADY = 4;<br>  OBSOLETE    = 5;<br>public  <br> procedure addEventListener(aname : string; aListener : TJSnsIDOMEventHandler);<br> procedure addEventListener(aname : string; aListener : TJSRawEventHandler);<br> <br> function mozHasItem(aUrl: TJSDOMString): Boolean;<br> function mozItem(aIndex: longint): TJSDOMString;<br> procedure mozaAdd(aUrl: TJSDOMString);<br> procedure mozRemove(aUrl: TJSDOMString);<br> procedure swapCache;<br> procedure update;<br> <br> property mozItems  : TJSnsIDOMOfflineResourseList read fmozItems;<br> property mozLength : word  read fmozLength ; <br> property status    : word  read fstatus;<br><br>end;<br><br>TJSnsISupports = class external name 'nsISupport'<br>public<br>  function AddRef: TJSnsrefcnt; ??<br>  procedure QueryInterface(aUuid: TJSnsIIDRef?; aParams: array of JSValue);<br>  function Release: TJSnsrefcnt;<br>end;<br><br>(* in window class .....*)<br>function applicationCache: TJSnsIDOMOfflineResourceList;</div><div><br></div><div>.......question is......is it ok?<br></div><div>-- <br><div dir="ltr" class="gmail_signature" data-smartmail="gmail_signature"><div dir="ltr"><pre style="color:rgb(0,0,0);font-variant:normal;letter-spacing:normal;line-height:normal;text-align:start;text-indent:0px;text-transform:none;word-spacing:0px">MSc. Ing. Pedro Pablo Oviedo Vera
Dirección Técnica y Desarrollo
Empresa de Proyectos e Ingeniería del
Ministerio de la Agricultura.ENPA.
Boyeros y Conill, Piso 10 Edif MINAG
Telef. 884 7197
SIP:23000116</pre></div></div></div></div>