Component技术主要内容为：Component体、Component Manager(CM)和客户程序(Client)。关于Component技术的完整介绍可参见Apple的官方文档：http://developer.apple.com/documentation/mac/MoreToolbox/MoreToolbox-333.html，它是Inside Macintosh一书的一个章节。 每个Component相当于一个组件类，而具体的使用必须对Component进行实例化，通过所谓Component Instance实现各种功能。一般而言，CM根据Client要求打开一个Component，就等于创建一个该Component的实例，这也被称创建一个该Component的连接(Connection)。对于这两者都有相应的变量类型予以标识。
Component的相对应标识是component identifier，句柄名称为Component：
TYPE
{component identifier}
Component = ^ComponentRecord;
ComponentRecord =
RECORD
data: ARRAY[0..0] OF LongInt;
END; Component Instance对应标识就是Component Instance，句柄名称为ComponentInstance：
TYPE
{component instance}
ComponentInstance = ^ComponentInstanceRecord;
ComponentInstanceRecord =
RECORD
data: ARRAY[0..0] OF LongInt;
END; 上述两者在对Component及其实例的各种操作中要频繁用到。 对于Component，其描述子(Description)是一个非常重要的结构：
TYPE ComponentDescription =
RECORD
componentType: OSType; {type}
componentSubType: OSType; {subtype}
componentManufacturer: {manufacturer}
OSType;
componentFlags: LongInt; {control flags}
componentFlagsMask: LongInt; {mask for control }
{ flags}
END; 这里采用了Pascal语言是因为Component技术是继承于Mac OS 9这样的早期版本，从而保留了当时的传统。其中componentType和componentSubType是Component的类型和字类型标识，均为4字节变量，可表达一个4字母缩写。componentFlags是自定义的Component标记，前8位为系统定义保留，后24位留给Component创建者定义。componentFlagMask仅用在搜索中，是在对CM中注册的Component的列表进行搜索时的敏感标记指定。一般Client通过指定该结构使用诸如FindNextComponent之类的函数就能找到需要的Component。 Component体的主框架为一个入口函数，它一般由后面将论述的Component Manager调用。其定义一般是：
FUNCTION %ComponentEntryName%(params: ComponentParameters; storage: Handle): ComponentResult; 这里的Handle是一个分配给当前Component实例的全局存储空间的句柄。 ComponentParameters是入口函数调用的具体参数。ComponentResult是返回值，一般包含错误信息，几乎所有的和Component相关的函数定义或系统调用都采用这个返回类型。如后面所述，一切Component的功能都在入口函数里的分支调用中完成，所以该参数就指明了这种功能需求，它就是由所谓Request Code达成的，后面还要具体论述。其结构如下： TYPE ComponentParameters =
PACKED RECORD
flags: Char; {reserved}
paramSize: Char; {size of parameters}
what: Integer; {request code}
params: ARRAY[0..0] OF LongInt; {actual parameters}
END; 这里的paramSize指明了params数组单元的个数，params就是具体分支调用Component子程序的参数。在Component的入口函数里，典型的分支就是： CASE (params.what) OF
k%ComponentRequestName1%Select:
EntryFuncName := CallComponentFunction(params,
ComponentRoutine(@%Subroutine1%));
k%ComponentRequestName2%Select:
EntryFuncName := CallComponentFunctionWithStorage
(storage, params,
ComponentRoutine(@%Subroutine2%));
...
END; 可见，在入口函数中根据每个Request，调用不同的子程序，而调用的方法是通过CallComponentFunction或CallComponentFunctionWithStorage（子程序需要全局区的句柄以操作全局变量）。 对于Client（一般指应用程序），并不能直接调用这些分支子程序，甚至也不能调用入口。但功能的确是依据Request对应实现的。它通过定义这些功能的接口(Interface)完成。显然这种接口是语言相关的。在Mac Component的介绍中提供了一种内嵌汇编的方案，即接口函数的实现是一段短小的汇编或机器代码。忽略代码的具体内容，我们以一个名为OvalDrawer的Component中的一个功能为例来看分支子程序和与之对应的接口的关系：
分支子程序：
FUNCTION OvalSetup (globals: GlobalsHandle;
boundsRect: Rect): ComponentResult; 接口：
FUNCTION DrawerSetup (myInstance: ComponentInstance;
VAR r: Rect): ComponentResult; 并且我们在看一下在入口函数中的相应Request分支响应的情形：
kDrawerSetupSelect:
OvalDrawer := CallComponentFunctionWithStorage
(storage, params,
ComponentRoutine(@OvalSetup)); 注意其中类型为Rect的参数就是这种功能调用的主参数。对于接口，很显然第一个参数指明了Component实例，它由后面叙述的打开Component操作得到；对于分支子程序，第一个参数就是全局数据区句柄，这和分支调用中使用CallComponnetFunctionWithStorage相吻合。
其实Component功能调用的一般过程就是：Client调用的接口函数触发CM，CM将接口函数参数结构化到params中传入Component的入口，在其中CallComponentFunction系统调用中params又恢复成分支调用子程序的参数并由子程序实现功能。
除了如上所述Client能打开Component并调用其功能外，Component也能调用另一个Component的功能。这一般有两种方法：一是和Client一样的方法，这样Component就成为Client；二是通过捕获(Capture)另一个Component或/且设置该Component的一个实例为目标(Target)，用DelegateComponentCall调用这个被捕获或标的的Component的功能。 （未完待续）
|
