这几行VB代码如何编写为delphi

Question

'以下为新添加的代码，,用于新格式接收
    Dim StkDrv2 As IStockDriver2  '定义为
    Set StkDrv2 = m_stkdrv.Object ' 使用新接口,m_stkdrv是一个Tstockdriver类组件，他采用IStockDriver接口
    StkDrv2.EnableNewFormat = True          ' 启用新格式，不能退出老格式
    Set StkDrv2 = Nothing ' 释放接口

Answer 1

var StkDrv2:IStockDriver2;
begin
 StkDrv2:=m_stkdrv.Object;
 StkDrv2.EnableNewFormat:=True;
 StkDrv2:=nil;
end;