Ayuda en traducir de C a Delphi
 

Hola a todos

quisiera ver si alguien me puede ayudar a traducir el siguiente codigo de C a delphi o si me puede decir si la parte de la trduccion esta correcta.

Gracias de Antemano.

struct pattern
{
unsigned bit_length;
unsigned length;
char r_flag;
unsigned char *bytes;
struct pattern *next;
};
typedef struct pattern pattern;
struct command
{
unsigned char *name;
struct pattern *pattern;
struct command *next;
};
typedef struct command command;
struct remote
{
unsigned char *name;
unsigned long carrier_freq;
unsigned bit_time;
struct command *command;
struct remote *next;
};
typedef struct remote remote;

struct remote* CreateRemote(unsigned char *RemoteName, unsigned long Carrier, unsigned long BitRate);


Traduccion


type
pattern= record
bit_length : DWORD;
length : DWORD;
r_flag :CHAR;
bytes : BYTE;
end;

type
command=record
name : CHAR;
pattern : pointer;
end;

type
remote = record
name : CHAR;
carrier_freq : Longint;
bit_time : WORD;
command: pointer;
end;


Gracias nuevamente.

Para traducir Headers de C, te recomiendo probar esta herramienta que funciona muy bien: Dr.Bob's HeadConv - C DLL Header Converter v4.20

Saludos!

Por favor... si quieres que la gente se lea el código, usa las etiquetas [delphi] o [code], así da dolor de cabeza ;)