carlosmoralesm
30-06-2004, 22:17:37
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.
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.