diff options
author | eddie-0815 <eddie-0815@b956fd51-792f-4845-bead-9b4dfca2ff2c> | 2007-11-04 15:23:42 +0000 |
---|---|---|
committer | eddie-0815 <eddie-0815@b956fd51-792f-4845-bead-9b4dfca2ff2c> | 2007-11-04 15:23:42 +0000 |
commit | 9edc9535e5570807990e39703dca7c05e6758256 (patch) | |
tree | 2d330b6ebb37cc7faf9a5861a81f787a4c05fd98 /Game/Code/MacOSX/Wrapper/MacClasses.pas | |
parent | 19149849a2de8bf79d9f9095e290fd662efa7238 (diff) | |
download | usdx-9edc9535e5570807990e39703dca7c05e6758256.tar.gz usdx-9edc9535e5570807990e39703dca7c05e6758256.tar.xz usdx-9edc9535e5570807990e39703dca7c05e6758256.zip |
Added MacResources.pas. Fixed some resource loading issues on OS X. The main screen is still not loading.
git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@581 b956fd51-792f-4845-bead-9b4dfca2ff2c
Diffstat (limited to '')
-rwxr-xr-x | Game/Code/MacOSX/Wrapper/MacClasses.pas | 57 |
1 files changed, 0 insertions, 57 deletions
diff --git a/Game/Code/MacOSX/Wrapper/MacClasses.pas b/Game/Code/MacOSX/Wrapper/MacClasses.pas deleted file mode 100755 index be41ac55..00000000 --- a/Game/Code/MacOSX/Wrapper/MacClasses.pas +++ /dev/null @@ -1,57 +0,0 @@ -unit MacClasses;
-
-{$I switches.inc}
-
-interface
-
-uses
- Classes, GlueWindows, SysUtils;
-
-type
-
- TMemoryStream = Classes.TMemoryStream;
-
- TResourceStream = class(TFileStream)
- private
- public
- constructor Create(Instance: THandle; const ResName: string; ResType: PChar);
- end;
-
-{$IFDEF MACOS}
- TWndMethod = procedure of object;
-{$ENDIF}
-
- function AllocateHWnd(Method: TWndMethod): HWND;
-
-implementation
-
-uses UPliki;
-
-{ TResourceStream }
-
-constructor TResourceStream.Create(Instance: THandle; const ResName: string; ResType: PChar);
-var
- sFileName : String;
-begin
- if ResType = 'FNT' then
- sFileName := GetResourcesPath + 'Fonts/' + ResName + '.dat'
- else
- sFileName := GetResourcesPath + 'Fonts/' + ResName + '.' + ResType;
-
- if FileExists(sFileName) then
- inherited Create( sFileName, fmOpenReadWrite)
- else
- inherited Create( sFileName, fmCreate);
-end;
-
-function AllocateHWnd(Method: TWndMethod): HWND;
-begin
-{$IFDEF MSWINDOWS}
- Result := Classes.AllocateHWnd(Method);
-{$ENDIF}
-{$IFDEF MACOS}
- Result := 0;
-{$ENDIF}
-end;
-
-end.
|