请教通才：在vb里面的CreateObject，对应了delphi的什么语句？

Question

vb里面有句是:
Dim swApp as Object
Set swApp = CreateObject("SldWorks.Application")Dim Model as Object
Set Model = swApp.ActiveDoc这几句到了Delphi中，应该变成什么样子呢？？？？

Answer 1

var
  swApp, Model: Variant;
begin
  swApp := CreateOleObject('SldWorks.Application');
  Model := swApp.ActiveDoc;
end;

Answer 2

对了，上面要先 uses ComObj;  才能用CreateOleObject函数。

Answer 3

就是引用 ComObj 单元。