如何將TParams類型轉爲Variant?[轉]

如何將TParams類型轉爲Variant?
InParam :TParams;
提供的函數爲
function ExecProc(const ProcName: AnsiString; const InParam: Variant): Integer;

如果直接調用
ExecProc('SP_Name', InParam)
編譯通不過
如何將InParam轉爲Variant?

在線等!



------解決思路----------------------
delphi中Variant也是一種數據類型 Tparams 繼承自tcollection 是個集合類 繼承自tojbect 他們之間的轉換 是沒辦法的。

除非你按照execproc 中variants參數類型解析InParam 組合成所需信息 
------解決思路----------------------
PackageParams應該可以,試試,看它的函數是否會出錯。 
------解決思路----------------------
找源碼啊,DBClient單元PackageParams聲明下面就是UnpackParams
function PackageParams(Params: TParams; Types: TParamTypes = AllParamTypes): OleVariant;
procedure UnpackParams(const Source: OleVariant; Dest: TParams);

 

http://www.myexception.cn/delphi/264838.html

發表評論
所有評論
還沒有人評論,想成為第一個評論的人麼? 請在上方評論欄輸入並且點擊發布.
相關文章