aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorjaybinks <jaybinks@b956fd51-792f-4845-bead-9b4dfca2ff2c>2007-09-20 11:28:04 +0000
committerjaybinks <jaybinks@b956fd51-792f-4845-bead-9b4dfca2ff2c>2007-09-20 11:28:04 +0000
commit333ec29a5275fb851f38f7be695930ea1dfe8340 (patch)
tree531e128dfe40d82b66d3aa24071d18f3653865d5
parent7e01085a1981f28e538b06bff5cebf2b88c975af (diff)
downloadusdx-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
Diffstat (limited to '')
-rw-r--r--Game/Code/Classes/UTexture.pas15
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