請問： 我利用delphi 4 和 7 編譯以下的程式，為何產生的binary檔案大小不ㄧ樣， delphi 4 為 12 byte，delphi 7 為 16 byte(中間多了4個byte)，請問這是 作業系統的問題(delphi 4/ NT 4.0, delphi 7/ windows server 2003)還是 delphi本身的問題?該如何解決? 謝謝。 原始碼： TCustomer = record v1 : integer; v2 : double; end; procedure TForm1.Button1Click(Sender: TObject); var tempfile: file of Tcustomer; customer : TCustomer; begin customer.v1:= 1; customer.v2:= 1.0; assignfile(tempfile,'d:\tempfile.bin'); rewrite(tempfile); write(tempfile,customer); closefile(tempfile); close; end; 結果： delphi 4 01 00 00 00 00 00 00 00 00 00 F0 3F delphi 7 01 00 00 00 1D 07 01 A7 00 00 00 00 00 00 F0 3F 請問1D 07 01 A7 是什麼阿? 發表人 - honder 於 2005/03/15 11:50:24

这是Compiler优化的结果.    可以改成:

TCustomer = packed record
  v1 : integer;
  v2 : double;
end;

或者改变Delphi7中Compiler的选项, [Project]->[Options]->[Compiler]->[Code Generation]->[Record field alignment]: 选1 發表人 - yyu10 於 2005/03/15 12:30:38

謝謝你，yyu10。    

引言: 这是Compiler优化的结果. 可以改成:

TCustomer = packed record
  v1 : integer;
  v2 : double;
end;

或者改变Delphi7中Compiler的选项, [Project]->[Options]->[Compiler]->[Code Generation]->[Record field alignment]: 选1 發表人 - yyu10 於 2005/03/15 12:30:38