瀏覽代碼

Merged revisions 5901 via svnmerge from
svn+ssh://svn.freepascal.org/FPC/svn/fpc/trunk

........
r5901 | michael | 2007-01-11 21:40:12 +0100 (Thu, 11 Jan 2007) | 1 line

* Fixed bug #8033, removed longrec, so sysutils version is used
........

git-svn-id: branches/fixes_2_0@5912 -

michael 19 年之前
父節點
當前提交
151c2f16e0
共有 1 個文件被更改,包括 0 次插入5 次删除
  1. 0 5
      rtl/objpas/classes/compon.inc

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

@@ -15,11 +15,6 @@
 {*                             TComponent                                   *}
 {****************************************************************************}
 
-Type
-  Longrec = Packed Record
-    Hi,lo : word;
-    end;
-
 Function  TComponent.GetComponent(AIndex: Integer): TComponent;
 
 begin