Преглед на файлове

- minor changes

git-svn-id: http://zengl.googlecode.com/svn/branches/0.3.x@1963 6573c10b-8653-0410-9706-d32479e959fb
dr.andru преди 12 години
родител
ревизия
50f1b264cc
променени са 1 файла, в които са добавени 7 реда и са изтрити 1 реда
  1. 7 1
      src/zgl_resources.pas

+ 7 - 1
src/zgl_resources.pas

@@ -151,7 +151,7 @@ function  res_GetCompleted : Integer;
 
 var
   resUseThreaded : Boolean;
-  resCompleted   : Integer;
+  resCompleted   : Integer = 100;
 
 implementation
 uses
@@ -827,4 +827,10 @@ begin
   Result := resCompleted;
 end;
 
+var
+  i : Integer;
+initialization
+  for i := 0 to 255 do
+    resQueuePercentage[ i ] := 100;
+
 end.