<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>