这个接口怎么使用，各位大侠请进！(100分)

我想使用接口IStockDriver2中的一个方法，但是却不知道怎么使用接口，这个接口的
定义如下：
IStockDriver2 = interface(IDispatch)
['{7EC46973-C25F-42E3-B22E-806D3FC5C20E}']
function Get_EnableNewFormat: Integer
safecall;
procedure Set_EnableNewFormat(pVal: Integer)
safecall
//这是我想调用的方法；
property EnableNewFormat: Integer read Get_EnableNewFormat write Set_EnableNewFormat;
end;
现在有VB的例子，但是我确不会改成delphi的；
在VB中是这么写的：
Dim OneHis As New StockHisData
Dim OneMin As New StockMinData
Dim OneStk As New StockReport
Dim StkReport2 As IStockReport2

Private Sub Form_Load()
Dim StkDrv2 As IStockDriver2
Set StkDrv2 = m_stkdrv.Object //这一句用delphi该怎么写？？？
（m_stkdrv 是 StockDriver对象）；
StkDrv2.EnableNewFormat = True
Set StkDrv2 = Nothing
Set StkReport2 = OneStk

哪位大侠知道，请赐教！！多谢！

如果这样写：
stkDrv2:=m_stkdrv;
StkReport2:=OneStk;
就出错：
[Error] Unit1.pas(77): Incompatible types: 'IStockDriver2' and 'TStockDriver'
[Error] Unit1.pas(78): Incompatible types: 'IStockReport' and 'IStockReport2'

该怎么办呀？

这是不是通视卡的驱动？
在这个通视给出的TLB中，有一个关键方法未定义。你自己从通视主页上拉一个最新的驱动。
安装后，在DELPHI中自己把这个接口重新安装一下，可以得到一个完全的TLB（自己要修改
某些方法）。
这个接口我用过，现在已经删除。是完全可实现的。
IStockDriver2　类是自己从stock.DLL中找到的,
DEMO中的TLB是没有这个类的。重新生成一个吧！

to netameng:
就是通视的驱动。我用的是2001-12-3更新的驱动。
但我已经重新生成新的stock_TLB.pas了，只是不知道怎么调用接口里的方法，
不知道你是不是有好的方法？

这个问题已经过了时效了，谢谢netameng。