Cómo se declara y usa el tipo "Enumeration" en Delphi

[cesarsoftware]

Holaaa, se puede pasar?

Siguiendo con la conversión y vuestra estimable ayuda....para convertir una definición de funcion

Basic

Public Declare Function ReadVar Lib "NETCOM" (ByVal hPort As Integer, ByVal variable As String, ByVal value As String) As Integer

C

Código PHP:

int __stdcall ReadVar(HPORT_T hPort, char* variable, char* value); 


Delphi?

Código Delphi [-]
function ReadVar(hPort: integer; variable: string; var value: string): integer; cdecl; stdcall; external 'Netcom.dll';

No me da error, pero no me llega la variable, supongo que hay lio entre CHAR* y STRING

Una ayudita please

PD: hace tiempo que quiero "regalar" a la comunidad una utilidad (Delphi) para hacer PING a multiples destinos con thread, vamos, para hacer "un analizador de red", pero solose "pegar" código, si me echais otra mano os la paso, va muy bien y la uso mucho.


Gracias de antemano