* temporarly disabled GetInterface(iidstr: .... to keep fpc compiling

git-svn-id: trunk@12691 -

rtl/inc/objpas.inc

@@ -676,10 +676,10 @@
           Result := getcorbainterfacebyentry(self, getinterfaceentrybystr(iidstr), obj);
         end;
 
-      function TObject.getinterface(const iidstr : string;out obj) : boolean;
+      {function TObject.getinterface(const iidstr : string;out obj) : boolean;
         begin
           Result := getinterfacebystr(iidstr,obj);
-        end;
+        end;}
 
       class function TObject.getinterfaceentry(const iid : tguid) : pinterfaceentry;
         var

rtl/inc/objpash.inc

@@ -209,7 +209,7 @@
 
           { interface functions }
           function GetInterface(const iid : tguid; out obj) : boolean;
-          function GetInterface(const iidstr : string;out obj) : boolean;
+          //function GetInterface(const iidstr : string;out obj) : boolean;
           function GetInterfaceByStr(const iidstr : string; out obj) : boolean;
           class function GetInterfaceEntry(const iid : tguid) : pinterfaceentry;
           class function GetInterfaceEntryByStr(const iidstr : string) : pinterfaceentry;