diff options
author | jaybinks <jaybinks@b956fd51-792f-4845-bead-9b4dfca2ff2c> | 2007-09-20 11:28:04 +0000 |
---|---|---|
committer | jaybinks <jaybinks@b956fd51-792f-4845-bead-9b4dfca2ff2c> | 2007-09-20 11:28:04 +0000 |
commit | 333ec29a5275fb851f38f7be695930ea1dfe8340 (patch) | |
tree | 531e128dfe40d82b66d3aa24071d18f3653865d5 | |
parent | 7e01085a1981f28e538b06bff5cebf2b88c975af (diff) | |
download | usdx-333ec29a5275fb851f38f7be695930ea1dfe8340.tar.gz usdx-333ec29a5275fb851f38f7be695930ea1dfe8340.tar.xz usdx-333ec29a5275fb851f38f7be695930ea1dfe8340.zip |
remove logging
git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@420 b956fd51-792f-4845-bead-9b4dfca2ff2c
-rw-r--r-- | Game/Code/Classes/UTexture.pas | 15 |
1 files changed, 4 insertions, 11 deletions
diff --git a/Game/Code/Classes/UTexture.pas b/Game/Code/Classes/UTexture.pas index 96c0ec28..389dd0b0 100644 --- a/Game/Code/Classes/UTexture.pas +++ b/Game/Code/Classes/UTexture.pas @@ -381,7 +381,8 @@ var begin
lTextureStream := nil;
- Log.LogStatus( 'From Resource - ' + inttostr( integer( FromRegistry ) ) , Identifier +' '+ Format +' '+ Typ );
+// Log.LogStatus( 'From Resource - ' + inttostr( integer( FromRegistry ) ) , Identifier +' '+ Format +' '+ Typ );
+
// {$IFNDEF FPC}
// TODO : JB_lazarus eeeew this is a nasty one...
// but lazarus implementation scanlines is different :(
@@ -395,14 +396,11 @@ begin if FromRegistry then
begin
try
-
- Log.LogStatus( ' A' , '');
-
// Res := TResourceStream.Create(HInstance, Identifier, Format);
lTextureStream := TResourceStream.Create(HInstance, Identifier, Format);
- Log.LogStatus( ' B' , '');
- // TODO : Where does the format come from
+ // TEmp, untill all code is moved to refactord way..
+ Res := TResourceStream( lTextureStream );
except
Log.LogStatus( 'ERROR Could not load from resource' , Identifier +' '+ Format +' '+ Typ );
beep;
@@ -421,11 +419,6 @@ begin if assigned( lTextureStream ) then
begin
- Log.LogStatus( ' C - '+Format , '');
-
- // TEmp, untill all code is moved to refactord way..
- Res := TResourceStream( lTextureStream );
-
TextureB := TBitmap.Create;
if Format = 'BMP' then
|