线程中能否用ole 来控制EXCel?

Question

我想要创一个线程，利用ole来控制EXCEL,查找EXCEL中所有的表（有许多表），看是否存在字符串为'TMEMU'的字段。
如果写？
线程的哈？需要代码？

Answer 1

...
Type
  TMyExcelThread = class(TThread)
    private
      //私有参数
    protected
      //线程执行过程
      procedure Execute;override;
    public
      Constructor Create(CreateSuspended: Boolean {其它参数});
  end;
implementation
uses
  ActiveX;constructor TMyExcelThread.Create(CreateSuspended: Boolean{其它参数});
begin
  Inherited Create(true);
  //私有变量初始化，以及其它参数处理，包括转储
  if CreateSuspended  then
    Resume;
end;procedure TMyExcelThread.Execute ;
begin
  CoInitializeEx(nil, COINIT_MULTITHREADED);//初始化COM环境
  try
    //这里操作Excel  finally
    CoUninitialize;//COM环境空间清理
  end;end;