AXScript.pas,从官方站点找到的IActivsScript接口[1]

[入库:2005年8月18日] [更新:2007年3月24日]

本文简介:选择自 scriptbaby 的 blog

{unti axscript v.1.0 05/28/97 - converted header file for microsoft activescript.

original conversion of the activescript header by david zajac (dzajac@hiwaay.net)
for delphi 2.x.

modified by brian dupras (bdupras@dimensional.com) for delphi 3.0 using interfaces
instead of classes (which was necessary for d2).

this unit is released to the public.  no warrenty or guarentee of *anything*
is expressed or implied.  use this code at your own risk - any damage is your
own fault for trusting me.  if you find any error in this code, fix it.  if
you're nice, let me know about the error so i can fix it, too.

this code has to date (may 28, 1997) only been tested for creating a host for
activescript.  i have not tried creating a scripting engine with it (and probably
never will).  but i've been able to host both ms jscript and ms vbscript.

good luck,
    brian dupras  5/28/97

----------------------------------------------------------------------------------

ahh..updates.  i've updated this unit slilghtly, and created a helper unit called
(and aptly so) axscripthelp.  the only major additions were those to support
ms ie4.  the other updates to this unit were minor - a few slight type differences
and some parameter name changes.  mostly cosmetic stuff.

again, good luck,

brian 7/6/97


by the way, jscript, vbscript and activescript are registered trademarks of
microsoft corporation.


----------------------------------------------------------------------------------
more updates still.  thank you gary warren king for noticing that i'm an idiot.

the identifiers : scriptthreadid_current, scriptthreadid_base, and
scriptthreadid_all were originally thought to be c++ macros.  upon second look,
however, they're not macros, they're #define constants that typcast the values
-1, -2, and -3 to the #typdef scriptthreadid.  looking into another's activescript
conversion confirmed this, so the change has been made and duely noted.

we'll call this version 1.1 of the activscp.h conversion. 

brian dupras  8/26/97


p.s.  at the time of this writing, a slightly older demo using this header is
available at the delphi super page.  the url is
http://sunsite.icm.edu.pl/delphi/, and the file is axscpd1.zip.  it can be
found under delphi 3, apps with sources.  i plan to pust axscpd2.zip real soon
now, so get that one if it's there.
}


unit axscript;

interface

uses
  windows, activex;


const
  //category ids
  catid_activescript:tguid=              '{f0b7a1a1-9847-11cf-8f20-00805f2cd064}';
  catid_activescriptparse:tguid=         '{f0b7a1a2-9847-11cf-8f20-00805f2cd064}';

  //interface ids
  iid_iactivescriptsite:tguid=           '{db01a1e3-a42b-11cf-8f20-00805f2cd064}';
  iid_iactivescriptsitewindow:tguid=     '{d10f6761-83e9-11cf-8f20-00805f2cd064}';
  iid_iactivescript:tguid=               '{bb1a2ae1-a4f9-11cf-8f20-00805f2cd064}';
  iid_iactivescriptparse:tguid=          '{bb1a2ae2-a4f9-11cf-8f20-00805f2cd064}';
  iid_iactivescriptparseprocedure:tguid= '{1cff0050-6fdd-11d0-9328-00a0c90dcaa9}';
  iid_iactivescripterror:tguid=          '{eae1ba61-a4ed-11cf-8f20-00805f2cd064}';


   // constants used by activex scripting:
   scriptitem_isvisible     = $00000002;
   scriptitem_issource      = $00000004;
   scriptitem_globalmembers = $00000008;
   scriptitem_ispersistent  = $00000040;

本文关键:AXScript.pas,从官方站点找到的IActivsScript接口
  相关方案
Google
 

本站最佳浏览方式为 分辨率 1024x768 IE 6.0(或更高版本的 IE浏览器)

go top