Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Varios
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Grupo de Teaming del ClubDelphi

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 08-10-2019
Avatar de TOPX
TOPX TOPX is offline
Miembro
 
Registrado: may 2008
Ubicación: Bogotá
Posts: 527
Poder: 17
TOPX Va camino a la fama
Hola,

Por ahí hay una documentación de la estructura que pide esa DLL. Dice así:
Código:
struct SSP_COMMAND
{
SSP_FULL_KEY Key;
unsigned long BaudRate;
unsigned long Timeout;
unsigned char PortNumber;
unsigned char SSPAddress;
unsigned char RetryLevel;
unsigned char EncryptionStatus;
unsigned char CommandDataLength;
unsigned char CommandData[255];
unsigned char ResponseStatus;
unsigned char ResponseDataLength;
unsigned char ResponseData[255];
unsigned char IgnoreError;
};
Pero la está declarando así:
Código Delphi [-]
TSSP_COMMAND = record
  Key: TSSP_FULL_KEY;
  BaudRate: LongInt;
  Timeout: LongInt;
  PortNumber: Byte;
  SSPAddress: Byte;
  RetryLevel: Byte;
  EncryptionStatus: Byte;
  CommandDataLength: Byte;
  CommandData: Array[0..255-1] of Byte;
  ResponseStatus: Byte;
  ResponseDataLength: Byte;
  ResponseData: Array[0..255-1] of Byte;
  IgnoreError: Byte;
end {SSP_COMMAND};

De manera que todos esos tipos de dato están mal, parece que hubiera copiado y pegado de un código Java.

Supongo que debe definir si estará usando Int32 ó Int64, y los arrays deben ser de Char (o usar un alias apropiado dentro de Delphi). Pero ya está en sus manos, usando el SDK y su propio entorno de trabajo.

-
__________________
"constructive mind, destructive thoughts"

Última edición por TOPX fecha: 08-10-2019 a las 15:16:00. Razón: Link a la documentación
Responder Con Cita
  #2  
Antiguo 08-10-2019
Avatar de Neftali [Germán.Estévez]
Neftali [Germán.Estévez] Neftali [Germán.Estévez] is offline
[becario]
 
Registrado: jul 2004
Ubicación: Barcelona - España
Posts: 18.286
Poder: 10
Neftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en bruto
Cita:
Empezado por TOPX Ver Mensaje
Por ahí hay una documentación de la estructura que pide esa DLL. Dice así:

Yo mismo le pasé esa estructura.
Porque en "otro sitio" encontré algo como esto:


Código:
Public Type SSP_COMMAND
  Key As SSP_FULL_KEY
  BaudRate As Long
  Timeout As Long
  PortNumber As Byte
  sspAddress As Byte
  RetryLevel As Byte
  EncryptionStatus As Byte
  CommandDataLength As Byte
  CommandData(254) As Byte  
  ResponseStatus As Byte
  ResponseDataLength As Byte
  ResponseData(254) As Byte
End Type

En el mismo ZIP (que hay en el link) que ha enviado Diego, hay varias versiones de la misma DLL, cada una con cabeceras distintas.

Y sobre ninguna de ellas he encontrado documentación.


Por lo tanto es como dar palos de ciego.
__________________
Germán Estévez => Web/Blog
Guía de estilo, Guía alternativa
Utiliza TAG's en tus mensajes.
Contactar con el Clubdelphi

P.D: Más tiempo dedicado a la pregunta=Mejores respuestas.
Responder Con Cita
Respuesta



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Llamar a funcion sin definir todos los parametros oscarac OOP 20 23-03-2011 23:10:54
Funcion de IAppServer con parametros out delphijm Providers 2 02-03-2011 13:21:59
funcion con parametros out comba Internet 2 20-10-2010 16:45:11
¿Una función en Delphi, puede devolver varios parámetros? socger Varios 6 27-02-2009 18:00:07
Que hace esta función en VB? mqm Varios 1 15-10-2007 20:30:15


La franja horaria es GMT +2. Ahora son las 19:38:39.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi