aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authoreddie-0815 <eddie-0815@b956fd51-792f-4845-bead-9b4dfca2ff2c>2008-01-09 21:05:38 +0000
committereddie-0815 <eddie-0815@b956fd51-792f-4845-bead-9b4dfca2ff2c>2008-01-09 21:05:38 +0000
commit49d52afc94a97f808adc246247989244ef2071ff (patch)
tree18ab65ce24aa1ae8170d6e88011a44fa005708da
parent77f3d0dcae9fe77a8d3cef1825756741b6d269ee (diff)
downloadusdx-49d52afc94a97f808adc246247989244ef2071ff.tar.gz
usdx-49d52afc94a97f808adc246247989244ef2071ff.tar.xz
usdx-49d52afc94a97f808adc246247989244ef2071ff.zip
Added the new GetxxxxPath functions for OS X.
git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@764 b956fd51-792f-4845-bead-9b4dfca2ff2c
-rw-r--r--Game/Code/Classes/UPlatformMacOSX.pas21
1 files changed, 19 insertions, 2 deletions
diff --git a/Game/Code/Classes/UPlatformMacOSX.pas b/Game/Code/Classes/UPlatformMacOSX.pas
index 4e0c9061..ff369049 100644
--- a/Game/Code/Classes/UPlatformMacOSX.pas
+++ b/Game/Code/Classes/UPlatformMacOSX.pas
@@ -16,7 +16,9 @@ type
private
public
Function DirectoryFindFiles(Dir, Filter : WideString; ReturnAllSubDirs : Boolean) : TDirectoryEntryArray; override;
- function GetGamePath: WideString; override;
+ function GetLogPath : WideString; override;
+ function GetGameSharedPath : WideString; override;
+ function GetGameUserPath : WideString; override;
end;
implementation
@@ -26,7 +28,7 @@ uses SysUtils, baseunix;
// Mac applications are packaged in directories.
// We have to cut the last two directories
// to get the application directory.
-Function TPlatformMacOSX.GetGamePath : WideString;
+Function GetBundlePath : WideString;
var
x,
i : integer;
@@ -41,6 +43,21 @@ begin
end;
end;
+function TPlatformMacOSX.GetLogPath : WideString;
+begin
+ Result := GetBundlePath;
+end;
+
+function TPlatformMacOSX.GetGameSharedPath : WideString;
+begin
+ Result := GetBundlePath;
+end;
+
+function TPlatformMacOSX.GetGameUserPath : WideString;
+begin
+ Result := GetBundlePath;
+end;
+
Function TPlatformMacOSX.DirectoryFindFiles(Dir, Filter : WideString; ReturnAllSubDirs : Boolean) : TDirectoryEntryArray;
var
i : Integer;