aboutsummaryrefslogtreecommitdiffstats
path: root/Game/Code/Classes/UTexture.pas
diff options
context:
space:
mode:
authortobigun <tobigun@b956fd51-792f-4845-bead-9b4dfca2ff2c>2008-03-31 15:17:09 +0000
committertobigun <tobigun@b956fd51-792f-4845-bead-9b4dfca2ff2c>2008-03-31 15:17:09 +0000
commit5b7e8043571bb959891c06a6dd5c7e9ef87d42e5 (patch)
treedc1bf277c3446c7a07baab53a52ee09f488cba60 /Game/Code/Classes/UTexture.pas
parent13bf0be662f660d9f283b6c01b20dc2137dc835e (diff)
downloadusdx-5b7e8043571bb959891c06a6dd5c7e9ef87d42e5.tar.gz
usdx-5b7e8043571bb959891c06a6dd5c7e9ef87d42e5.tar.xz
usdx-5b7e8043571bb959891c06a6dd5c7e9ef87d42e5.zip
beep() removed
git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@989 b956fd51-792f-4845-bead-9b4dfca2ff2c
Diffstat (limited to 'Game/Code/Classes/UTexture.pas')
-rw-r--r--Game/Code/Classes/UTexture.pas9
1 files changed, 2 insertions, 7 deletions
diff --git a/Game/Code/Classes/UTexture.pas b/Game/Code/Classes/UTexture.pas
index 48628176..1047ebd3 100644
--- a/Game/Code/Classes/UTexture.pas
+++ b/Game/Code/Classes/UTexture.pas
@@ -297,7 +297,6 @@ begin
Log.LogStatus( ' '+inttostr( integer( Result ) ), ' LoadImage' );
except
Log.LogStatus( 'ERROR Could not load from file' , Identifier);
- beep;
Exit;
end;
end
@@ -323,7 +322,6 @@ begin
TexRWops.type_ := 2;
except
Log.LogStatus( 'ERROR Could not assign resource ('+Identifier+')' , Identifier);
- beep;
Exit;
end;
@@ -342,7 +340,6 @@ begin
if dHandle=0 then
begin
Log.LogStatus( 'ERROR Could not find resource' , ' '+ Identifier);
- beep;
Exit;
end;
@@ -352,7 +349,6 @@ begin
TexStream := TResourceStream.Create(HInstance, Identifier, 'TEX');
except
Log.LogStatus( 'ERROR Could not load from resource' , Identifier);
- beep;
Exit;
end;
@@ -368,7 +364,6 @@ begin
TexRWops.type_ := 2;
except
Log.LogStatus( 'ERROR Could not assign resource' , Identifier);
- beep;
Exit;
end;
@@ -559,7 +554,6 @@ begin
if not assigned(TexSurface) then
begin
Log.LogStatus( 'ERROR Could not load texture' , Identifier +' '+ Format +' '+ TextureTypeToStr(Typ) );
- beep;
Exit;
end;
@@ -861,7 +855,8 @@ begin
glTexImage2D(GL_TEXTURE_2D, 0, 3, W, H, 0, GL_RGB, GL_UNSIGNED_BYTE, @Data[0]);
if Mipmapping then begin
Error := gluBuild2DMipmaps(GL_TEXTURE_2D, 3, W, H, GL_RGB, GL_UNSIGNED_BYTE, @Data[0]);
- if Error > 0 then beep;
+ if Error > 0 then
+ Log.LogError('gluBuild2DMipmaps() failed', 'TTextureUnit.CreateTexture');
end;
Result.X := 0;