我用一个线程来写数据库，在线程的EXECUTE中引用窗体单元的一个PROCEDURE，这时候发现用ADODATASET 写数据库，在OPEN时说我没有调用Coi

我用一个线程来写数据库，在线程的EXECUTE中引用窗体单元的一个PROCEDURE，这时候发现用ADODATASET 写数据库，在OPEN时说我没有调用Cointialize,怎么办？ (30分)<br />我是在一个FORM里创建了一个线程，线程中引用了FORM的PROCDURE，到ADODATASET查询就报错

Instances of a structured type hold more than one value. Structured types
include sets, arrays, records, and files as well as class, class-reference,
and interface types. Except for sets, which hold ordinal values only,
structured types can contain other structured types; a type can have unlimited
levels of structuring.
By default, the values in a structured type are aligned on word or double-word
boundaries for faster access. When you declare a structured type, you can
include the reserved word packed to implement compressed data storage. For
example,

type TNumbers = packed array[1..100] of Real;

Using packed slows data access and, in the case of a character array, affects
type compatibility. For more information, see Memory management.

有会说中文的吗

那你就 uses comobj;
Cointialize(nil) 啦

多人接受答案了。