Erstell doch einfach ne Unit wo du alle deine "Nicht-Klassen" Typen deklarierst.
Code: 
unit [Projectname]_Types;

interface

types
  TSex= (sxMale, sxFemale);

  TPerson= record
    Age: Integer;
    Sex: TSex;
  end;

  //Haufenweise anderer

implementation
end.
Danach bindest du diese in alle benötigten bereiche ein.