VarArrayCreate在DELPHI6中编译出错。(50分)

procedure TfrmMain.ShowHtml(Browser:TWebBrowser;content: string);
var
; ; vv: Variant;
; ; HTMLDocument: IHTMLDocument2;

begin
; ; ; ; vv := VarArrayCreate([0, 0], varVariant);
; ; ; ; vv[0] := content;
; ; ; ; HTMLDocument := browser.Document as IHTMLDocument2;
; ; ; ; HTMLDocument.write(PSafeArray(TVarData(vv).VArray));
; ; ; ; HTMLDocument.charset := 'gb2312';
; ; ; ; HTMLDocument.close;

end;
其中：vv := VarArrayCreate([0, 0], varVariant);在DELPHI6中编译出错。
提示：[Error] main.pas(498): Undeclared identifier: 'VarArrayCreate'
请各位前辈指正。

uses 里面有没有 System ？

大皮，应该看一下是否有 uses Variants 吧？

非常感谢beta, 按您的方法问题已解决。

不客气：－）

我没有d6，所以不知道他在那里：）