From 5ce2086aeec8b01664839c8c859b9c6bc00f66dd Mon Sep 17 00:00:00 2001
From: marco <marco@freepascal.org>
Date: Sun, 13 Jan 2008 20:12:25 +0000
Subject: [PATCH]  * iobjectsafety

git-svn-id: trunk@9744 -
---
 packages/winunits-base/src/activex.pp | 7 +++++++
 1 file changed, 7 insertions(+)

diff --git a/packages/winunits-base/src/activex.pp b/packages/winunits-base/src/activex.pp
index 1f00e1c734..8684f9cff6 100644
--- a/packages/winunits-base/src/activex.pp
+++ b/packages/winunits-base/src/activex.pp
@@ -2846,6 +2846,13 @@ type
   POleInPlaceFrameInfo = ^TOleInPlaceFrameInfo;
   OLEINPLACEFRAMEINFO = tagOIFI;
 
+{ ObjSafe.idl}
+  IObjectSafety = interface(IUnknown)
+    ['{CB5BDC81-93C1-11cf-8F20-00805F2CD064}']             
+    function GetInterfaceSafetyOptions(const riid:Tiid; out pdwsupportedoptions: dword;out pdwenabledoptions: dword):HRESULT;
+    function SetInterfaceSafetyOptions(const riid:Tiid; const dwoptionsetmask: dword;const dwenabledoptions : dword):HRESULT;
+    end;
+
 { ole2.h }
 
   type