Como invocar DLL COM feita em VB no Delphi

Olá,

não sou desenvolvedor Delphi e na empresa que trabalho temos componente em Visual Basic para realizar autenticação do usuário.

Temos um sistema em Delphi feito por um cliente que precisa consumir nossa dll e o analista está com dificuldades.

Alguém poderia me ajudar a converter esse código para Delphi?

Desde já agradeço.

Dim obj as Object

Dim codigoRetornoLogin As Integer

Dim mensagemLogin As String

'Instanciar objeto COM

Set obj = CreateObject("DB_Seguranca.GER_SEG")

'Preencher Módulo, login e senha

obj.modulo = "CONTRAT"

obj.usuario.User_ID = txtLogin.Text

obj.usuario.Senha = txtSenha.Text

'Validar login

codigoRetornoLogin = obj.Valida_acesso()

'Se retorno for <> 0, significa login é inválido

If (codigoRetornoLogin <> 0) Then

'Obtém a mensagem de erro para exibição ao usuário

mensagemLogin = obj.ObterMensagemLogin(codigoRetornoLogin)

'Mata objeto COM da memória

Set obj = Nothing

'Exibe mensagem de negócio ao usuário

MsgBox mensagemLogin

Exit Sub

End If

Set obj = Nothing

'Usuario autenticado com sucesso

'Segue a vida...