请问哪位大虾作过FLASHGET的扩展程序？200分求教。 (200分)

下面是FLASHGET的VB例子中，对AddUrlList使用的例子，
Private Sub Command2_Click(COM AddUrlList)
Dim objfg As New JetCarNetscape
Dim pList(4)

pList(0) = "http://www.amazesoft.com"
pList(1) = "http://www.amazesoft.com/fgf087.zip"
pList(2) = "FlashGet 0.87"
pList(3) = "http://www.amazesoft.com/doc.zip"
pList(4) = "FlashGet Documentation"

objfg.AddUrlList pList
End Sub
在DELPHI中，导出TLB后，发现AddUrlList的调用定义如下：
AddUrlList(var pList: OleVariant);
请问PLIST怎么赋值？
下面这些方法又怎么使用？
function AddUrlEx(const pUrl: WideString; const pInfo: WideString; const pReferer: WideString;
const pSaveTo: WideString; uFlags: Integer): WordBool;
function AddUrlListEx(var pList: OleVariant; const pSaveTo: WideString; uFlags: Integer): Integer;
希望有高手来提点一下，谢谢！

UP

关注

up too

up again

function AddUrlEx(const pUrl: WideString; const pInfo: WideString; const pReferer: WideString;
const pSaveTo: WideString; uFlags: Integer): WordBool;
function AddUrlListEx(var pList: OleVariant; const pSaveTo: WideString; uFlags: Integer): Integer;

顶