Otra de Visual Basic a Delphi.

[torito]

Hola amigos foreros, nuevamente yo peliandome con pasar programas a Delphi, me encuentro en la siguiente cuestión tengo este codigo en visual Basic, bueno es de esta función donde se toman los parametros para otra

Private Sub WebLink1_Request(ByVal arguments As Object, ByVal values As Object)
...strCMD = FindArgValue("cmd", arguments, values)... End Sub

Public Function FindArgValue(str As String, args As Object, ByVal values As Object) As String
'
' This function finds the specifed argument and its corresponding value.
'
FindArgValue = ""
Dim value As Integer
value = args.Find(str, 0)
If value > -1 Then
FindArgValue = values.Item(value)
End If
End Function

y yo en Delphi me encontre que cambia un poco:


procedure TForm1.WebLink1Request(ASender: TObject; const arguments,
values: IDispatch);


alguien me pudiera auxiliar para poder pasar esta funcion a delphi??
muchas gracias

[torito]

o alguien me pudiera decir si arguments lo pudiera tomar como un objetos Tstrings??? gracias

[torito]

ya lo solucione, solo tuve que trabajar con mismo objetos.... preo de todas formas muchas gracias a los que me leyeron... saludos amigos foreros