如何正確配置跨平臺的Delphi XE2項目？

Question

現在我有2個平臺（Mac和Win32）和2個配置（Debug ans Release）。整個事情是在SVN下。

這裏是生成輸出佈局：

.\App\$(Platform)\$(Config) 

的代碼被分爲幾個文件夾和設在這裏：

.\Code\MyProject.dpr 
.\Code\Common\ 
.\Code\Forms\ 
.\Code\Source\ 

常見的數據文件的位置：

.\Data\ custom data files (dlls, textures, models, etc.) 

這計劃雖然存在一些缺陷，但我不知道如何讓它變得更好。我想在Data文件夾下的SVN中只有一組數據文件，但我需要將它複製到.\App\$(Platform)\$(Config)路徑上自動生成（注意，某些數據文件對於這兩種平臺都是通用的，但有些不是）。有沒有辦法設置構建過程來複制文件，就像使用Deployment和PAServer一樣？或者我可以設置數據文件的路徑爲..\..\Data，但這看起來很奇怪。

也許還有一些其他選項我不知道，或者項目佈局可能完全改變？你將如何設置項目結構並構建跨平臺編譯？

Answer 1

使用Post Build操作。

從項目選項|建立活動|發佈構建事件|命令

在

1. Creating Build Events

2. Pre and Post-Build Automation in Delphi

Answer 2

好進一步閱讀，這是一個老帖子，但是這是我在Delphi做（和Visual Studio中類似）來解決這個問題，即在不同的文件夾中有不同的平臺/配置輸出可執行文件，而是一組常見的數據。我有一個功能去掉「sub」文件夾部分，然後我的應用程序可以隨時訪問這些文件夾根目錄中的常用數據（在你的情況下。\ App）。當然，您可以根據需要添加其他平臺並配置到ProjectPath功能：

uses System.StrUtils; 
... 
function ProjectPath : string; 
// Removes sub-folders created by the Delphi IDE, so the executable can refer to the source folder, 
// rather than to where the executable is. 
// Excludes trailiong path delimiter 
begin 
    Result := ExtractFilePath (Application.ExeName); 
    Result := System.StrUtils.ReplaceText (Result, '\Win32' , ''); // ReplaceText is case insensitive 
    Result := System.StrUtils.ReplaceText (Result, '\Win64' , ''); 
    Result := System.StrUtils.ReplaceText (Result, '\Debug' , ''); 
    Result := System.StrUtils.ReplaceText (Result, '\Release', ''); 
    Result := ExcludeTrailingPathDelimiter (Result); 
end; 
... 
ConnectionString := 'Database=' + ProjectPath +'\DATAFILE.DAT;etc.';