求懂VB和delphi的高手指点

Public Function ExeRecordset(ByVal sql As String, m_con As ADODB.Connection, Optional nCursorLocation As CursorLocationEnum = adUseClient, Optional nCursorType As CursorTypeEnum = adOpenDynamic, Optional nLockType As LockTypeEnum = adLockOptimistic) As ADODB.Recordset
  Dim mRs As ADODB.Recordset
  Set mRs = New ADODB.Recordset
  mRs.CursorLocation = nCursorLocation
  mRs.Open sql, m_con, nCursorType, nLockType
  Set ExeRecordset = mRs
End Function

这个函数翻译成delphi该怎么写...求教;

没人回答一下吗...

真心求教...定义中的Optional nCursorLocation As CursorLocationEnum = adUseClient, Optional nCursorType As CursorTypeEnum = adOpenDynamic, Optional nLockType As LockTypeEnum = adLockOptimistic 这一段我不知道在delphi中该怎么写,作为可选返回参数来说这些有写的必要吗?
这是段运行查询，返回记录集的代码.