Changeset 22 for base.php

Timestamp:

Oct 22, 2008, 11:44:32 AM (16 years ago)

Author:

george

Message:

• Upraveno: Optimalizace načítání obslužných tříd typů "na požádání".
• Upraveno: Načítání znakových převodních tabulek "na požádání".

File:

• base.php (modified) (3 diffs)

base.php

@@ -477 +477 @@
 function GetTypeDefinition($Id)
 {
-  global $Database, $Types;
+  global $Database, $Types, $TypeDefinitionList;
 
   if(!array_key_exists($Id, $Types))
@@ -499 +499 @@
         $DbRow['BaseType'] = $ParentType['Name'];
       }
+      if(!array_key_exists($DbRow['BaseType'], $TypeDefinitionList))
+      {
+        $ClassName = 'Type'.$DbRow['BaseType'];
+        $TypeDefinitionList[$DbRow['BaseType']] = new $ClassName;
+      }
+      $DbRow['Class'] = &$TypeDefinitionList[$DbRow['BaseType']];
       $Types[$DbRow['ItemId']] = $DbRow;
     } else $Types[$DbRow['ItemId']] = NULL;
@@ -514 +520 @@
 function ExecuteTypeEvent($Type, $Event, $Parameters)
 {
-  global $TypeDefinitionList;
-
   $TypeDefinition = GetTypeDefinition($Type);
-  $TypeObject = $TypeDefinitionList[$TypeDefinition['BaseType']];
+  $TypeObject = $TypeDefinition['Class'];
   if(is_callable(array($TypeObject, $Event))) return($TypeObject->$Event($Parameters));
     else return($TypeDefinition['BaseType'].'->'.$Event.'('.$Type.')');