Delphi 调用COM时 如果遇到无效的参数条目解决办法

如果在delphi中调用com，而com下的函数的入参为空的话，使用的时候，不用加最后的括号

例如：

在uses中添加Comobj

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls, Comobj;

调用无入参函数不加括号GetVersion

procedure TForm1.Button1Click(Sender: TObject);

var
s:string;
x:integer;
imcom: Variant;
arrValue: string;
begin
    s:= '你确定此操作吗？';
    x:=MessageBox(0, '你确定此操作吗？', '询问',MB_OKCANCEL);
    imcom := CreateOleObject('XXXXX.XXXXX.1');
    arrValue := imcom.GetVersion;//结果正确。
    MessageBox(0, Pansichar(arrValue), '询问',MB_OKCANCEL);
end;

end.