Funcion en DLL pasar de C++ a Delphi

[Neftali [Germán.Estévez]]

No soy especialista en C++.
Lo mueve al foro correspondiente a ver si alguien con más conocimientos te puede ayudar.

De todas formas un primer intento del que no te puedes fiar sería:

Código Delphi [-]
type
  PTcp = ^Tcp;
  PAPIDEVICE = ^APIDEVICE;
  PMELDEVICEDATA = ^MELDEVICEDATA;

  Tcp = record
    IPAddr: array [0..15] of Char;
    lPortNo: Integer;
    dummy: array [0..11] of Char;
  end;

  APIDEVICE = record
    ValueTcp: Tcp;
  end;

  MELDEVICEDATA = record
    dwDeviceType: Integer;
    uniDeviceInfo: APIDEVICE;
  end;