1 {
2 *****************************************************************************
3 *                                                                           *
4 *  This file is part of the ZCAD                                            *
5 *                                                                           *
6 *  See the file COPYING.modifiedLGPL.txt, included in this distribution,    *
7 *  for details about the copyright.                                         *
8 *                                                                           *
9 *  This program is distributed in the hope that it will be useful,          *
10 *  but WITHOUT ANY WARRANTY; without even the implied warranty of           *
11 *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.                     *
12 *                                                                           *
13 *****************************************************************************
14 }
15 {**
16 @author(Andrey Zubarev <zamtmn@yandex.ru>)
17 }
18 {**Модуль описания базового генерика обьекта-массива}
19 unit gzctnrvectortypes;
20 {$INCLUDE def.inc}
21 interface
22 uses uzbmemman,{uzbtypesbase,}sysutils,{uzbtypes,}typinfo;
23 type
24 {Export+}
25   itrec=packed record
26               itp:{-}PPointer{/Pointer/};
27               itc:Integer;
28         end;
29   PTArrayIndex=^TArrayIndex;
30   TArrayIndex=Integer;
31 {Export-}
32 implementation
33 begin
34 end.
35