auto open an ole based item

From: Nicolas DEZAIRE <ndezaire_at_theleme.com>
Date: Thu, 25 Nov 1999 17:49:19 +0100
Message-ID: <383D688F.FDCC0036_at_theleme.com>

I've got a based item. It's an OLE item (word document). When i double-click on it, it lauch Word and that's OK. But i'd like to automate that.
Wouldn't it be something like that ?

declare
  anItem OLE2.OBJ_TYPE;
  item_id item;

begin
  item_id := Find_Item('DOC');
  Forms_OLE.Activate_Server(item_id);
  anItem := FORMS_OLE.Get_Interface_Pointer(item_id);   OLE2.Invoke(anItem, 'AppActivate');
  OLE2.Invoke(anItem, 'AppShow');
end;

Thanks

nico Received on Thu Nov 25 1999 - 17:49:19 CET