请教高手如何把C结构体转换成delphi的记录类型??并如何赋初值和读各项的值和释放一结构体变量???
typedef struct _MyData
{
char name[20];
int age;
char* detail;}MyData;MyData *pMyData;pMyData = new MyData;
memset(pMyData->name,0,sizeof(pMyData->name));
strcpy(pMyData->name,"zhang san";
pMyData->age = 11;pMyData->detail = new char[15];
memset(pMyData->detail,0,sizeof(pMyData->detail));
strcpy(pMyData->detail,"1234556");请问如何将上述C代码转换成DELPH代码????
typedef struct _MyData
{
char name[20];
int age;
char* detail;}MyData;MyData *pMyData;pMyData = new MyData;
memset(pMyData->name,0,sizeof(pMyData->name));
strcpy(pMyData->name,"zhang san";
pMyData->age = 11;pMyData->detail = new char[15];
memset(pMyData->detail,0,sizeof(pMyData->detail));
strcpy(pMyData->detail,"1234556");请问如何将上述C代码转换成DELPH代码????
解决方案 »
- 怎么计算出两个日期段之间的所有日期,分不多,不好意思
- 第 1 行: ',' 附近有语法错误
- 使控件支持鼠标滚轴消息 TScrollBox的BUG
- 如果取值
- 怎样在combobox中实现OnMouseUp事件?
- 怎么使memo中不能输入汉字?
- 大哥们:魔鬼式课程设计,小女子再遇难题,请大哥哥们帮帮忙!!!!
- Delphi与数据库
- 怪问题:为何在公司内部不能访问服务器的WEB主页,而在其他地方可以访问?
- 挖掘使程序自启动的各种方法!我已知道修改注册表各Autoexec.bat,有别的方法的,进来说一声!
- 将带有条形码的纸扫描保存成bmp图后,怎样识别条形码?
- Delphi可不可以在build的时候运行用户自己定义的一些脚本?
type
_MyData = record
name: array [0..19] of char;
age: integer;
detail: array of char;
end;
TMyData = ^_MyData;...var
pMyData: TMyData;
begin
new(pMyData);
fillchar(pMyData^.name, sizeof(pMyData^.name), 0);
strcopy(pMyData^.name, 'zhang san');
pMyData^.age := 11; SetLength(pMyData^.detail,15);
fillchar(pMyData^.detail[0], Length(pMyData^.detail), 0);
strcopy(@pMyData^.detail[0], '1234556'); //释放
//C Code:delete[] pMyData->detail;
SetLength(pMyData^.detail, 0);
//C Code:pMyData->detail = NULL;
pMyData^.detail := Nil;
//C Code:delete pMyData;
Dispose(pMyData);