当使用Delphi调用Delphi编写的Com组件时，如果遇到“找不到成员”错误的解决方法

 procedure TForm1.Button2Click(Sender: TObject);
var
  A_Com:Variant;
begin
A_Com := CreateOleObject('Test.VH');
A_Com.ShowText('Text');
end; 

这执行会报“找不到成员”的错误

只要将A_Com.ShowText('Text');改成A_Com.ShowText['Text'];

就可以了