Ver Mensaje Individual
  #6  
Antiguo 21-11-2018
Avatar de cesarsoftware
cesarsoftware cesarsoftware is offline
Miembro
 
Registrado: nov 2006
Posts: 241
Reputación: 18
cesarsoftware Va por buen camino
Holaaa, se puede pasar?

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

Basic
Código:
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 hPortcharvariablecharvalue); 
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
__________________
Disfruta de la vida ahora, vas a estar muerto mucho tiempo.

Última edición por ecfisa fecha: 21-11-2018 a las 17:12:19. Razón: Agregar etiquetas al código
Responder Con Cita