其實經過修正source code再產生新的.dcu檔,並覆蓋原始同名的檔案即可解決這個問題,步驟如下:
- Delphi 版本 7.0
- 需修正的檔案\Delphi7\Source\Rtl\Common\IniFiles.pas
- 需更新的檔案\Delphi7\Lib\IniFiles.dcu
- File -> New -> Application
- Project -> Add to Project -> 選取 \Delphi7\Source\Rtl\Common\IniFiles.pas
- 找到下列下列程式碼並自行修正buffer size
procedure TIniFile.ReadSection(const Section: string; Strings: TStrings);
const
BufSize = 16384; //<-預設為16k - 儲存檔案,File -> Save
- 設定Compiler參數,Project -> Options -> Compiler -> 取消Debugging群組所有的選項
- 產生IniFiles.dcu檔,Project -> Compile Project or Ctrl + F9
- 將\Delphi7\Source\Rtl\Common\IniFiles.dcu覆蓋原檔\Delphi7\Lib\IniFiles.dcu即更新完成
沒有留言:
張貼留言