烦，给分...

[ma369]

各位高手帮帮忙，有下面一段用C++ Builder编写的程序，如何把它改写为
用Delphi 来写，小弟在此谢了。
struct DataFileHead
{
...
unsigned short int ParNum;
...
}a;

float *ParValue;
FILE *DataIn;

fread(ParValue,sizeof(float), a.ParNum,DataIn);

[ma369]

程序少了一句.

struct DataFileHead
{
...
unsigned short int ParNum;
...
}a;

float *ParValue;
FILE *DataIn;

...
ParValue=new float[FormMain->a.ParNum];
...

fread(ParValue,sizeof(float), a.ParNum,DataIn);

[qiume]

C++的struct对应DELPHI的Record

[qiume]

给你个使用record的Demo:
type
TMonth = (Jan, Feb, Mar, Apr, May, Jun, Jul, Aug, Sep, Oct, Nov, Dec);
TDate = record
D: 1..31;
M: TMonth;
Y: 1900..1999;
end;
const
SomeDay: TDate = (D: 2; M: Dec; Y: 1960);

[ma369]

谢了，问题已解决。