瀏覽代碼

* killed a ver2_4 exception

git-svn-id: trunk@26410 -
marco 11 年之前
父節點
當前提交
67e64e8be3
共有 1 個文件被更改,包括 0 次插入5 次删除
  1. 0 5
      rtl/objpas/classes/classesh.inc

+ 0 - 5
rtl/objpas/classes/classesh.inc

@@ -215,11 +215,6 @@ Type
     property Current: Pointer read GetCurrent;
     property Current: Pointer read GetCurrent;
   end;
   end;
 
 
-{$ifdef VER2_4}
-type
-  TDirection = (FromBeginning, FromEnd);
-{$endif}
-
   TFPList = class(TObject)
   TFPList = class(TObject)
   private
   private
     FList: PPointerList;
     FList: PPointerList;