Browse Source

pastojs: fixed ComIntfInstance is/as IntfType using QueryInterface

git-svn-id: trunk@42771 -
Mattias Gaertner 6 years ago
parent
commit
c38c3bc12d
1 changed files with 13 additions and 1 deletions
  1. 13 1
      utils/pas2js/dist/rtl.js

+ 13 - 1
utils/pas2js/dist/rtl.js

@@ -627,7 +627,7 @@ var rtl = {
   },
 
   queryIntfIsT: function(obj,intftype){
-    var i = rtl.queryIntfG(obj,intftype.$guid);
+    var i = rtl.getIntfG(obj,intftype.$guid);
     if (!i) return false;
     if (i.$kind === 'com') i._Release();
     return true;
@@ -639,6 +639,18 @@ var rtl = {
     rtl.raiseEInvalidCast();
   },
 
+  intfIsIntfT: function(intf,intftype){
+    return (intf!==null) && rtl.queryIntfIsT(intf.$o,intftype);
+  },
+
+  intfAsIntfT: function (intf,intftype){
+    if (intf){
+      var i = rtl.getIntfG(intf.$o,intftype.$guid);
+      if (i!==null) return i;
+    }
+    rtl.raiseEInvalidCast();
+  },
+
   intfIsClass: function(intf,classtype){
     return (intf!=null) && (rtl.is(intf.$o,classtype));
   },