unit uutlTypes; {$mode objfpc}{$H+} interface uses Classes, SysUtils; type //////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// generic TutlArray = array of T; //////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// generic TutlPair = packed record first: T1; second: T2; end; implementation end.