5,388
社区成员
发帖
与我相关
我的任务
分享关于指针变量...
各位高手帮帮忙，有下面一段用C++ Builder编写的程序，
struct DataFileHead
{
...
unsigned short int ParNum;
...
}a;
float *ParValue;
FILE *DataIn;
...
ParValue=new float[a.ParNum];
...
fread(ParValue,sizeof(float), a.ParNum,DataIn);
小弟如何把它改写为用Delphi 来写，在此谢了。
struct DataFileHead
{
...
unsigned short int ParNum;
...
}a;
float *ParValue;
FILE *DataIn;
...
ParValue=new float[a.ParNum];
...
fread(ParValue,sizeof(float), a.ParNum,DataIn);
小弟如何把它改写为用Delphi 来写，在此谢了。
...全文
请发表友善的回复…
发表回复
ma369 2003-07-01
- 打赏
- 举报
关键是Delphi没有fread函数.
hkbarton 2003-06-28
- 打赏
- 举报
如果delphi也有这个函数的话
就
：fread(ParValue,sizeof(real), a.ParNum,DataIn);
就
：fread(ParValue,sizeof(real), a.ParNum,DataIn);
ma369 2003-06-28
- 打赏
- 举报
to hkbarton(宁静至远||淡泊明志) :
fread(ParValue,sizeof(float), a.ParNum,DataIn);
是从文件datain中a.parnum个sizeof(float)大小的parvalue值,
parvalue为a.parnum维的实数数组.
fread(ParValue,sizeof(float), a.ParNum,DataIn);
是从文件datain中a.parnum个sizeof(float)大小的parvalue值,
parvalue为a.parnum维的实数数组.
hkbarton 2003-06-28
- 打赏
- 举报
type
DataFileHead = record
...
ParNum:Shortint;
...
end;
var
a = DataFileHead;
ParValue:^real;
DataIn:^FILE;
...
//getmem(ParValue,sizeof(pointer));
ParValue:=@a.ParNum;//不知道这里是不是这个意思
...
fread(ParValue,sizeof(float), a.ParNum,DataIn);//不知道是什么意思
DataFileHead = record
...
ParNum:Shortint;
...
end;
var
a = DataFileHead;
ParValue:^real;
DataIn:^FILE;
...
//getmem(ParValue,sizeof(pointer));
ParValue:=@a.ParNum;//不知道这里是不是这个意思
...
fread(ParValue,sizeof(float), a.ParNum,DataIn);//不知道是什么意思
ma369 2003-06-28
- 打赏
- 举报
没人来,自己up
ma369 2003-06-28
- 打赏
- 举报
没人来,自己up
