Подцепить все модули за один.

[Пепел Феникса]

у меня есть предположение, но оно вроде сработает(если сработает) только для типов(классы в том числе)
это идет так:

unit MainABC;

interface

uses SubABC;

type
 SomeType=SubABC.SomeType;

вроде должно работать, но вот про процедуры не знаю...

[Alex Cones]

Ясно, в общем не мучиться и оставить как есть. Понятно, спасибо.

P.S.

Вы бы еще написали
TApplication = Record.

 Type
  {╔══════════════════════╦═══════════════════════════════════════════════╗}
  {║         Name         ║                       Type                    ║}
  {╟──────────────────────╫───────────────────────────────────────────────╢}
  {║ 01 } THProc       = {║} Procedure(H, M : LongWord; W, L : LongInt); {║}
  {╟──────────────────────╫───────────────────────────────────────────────╢}
  {║ 02 } TApplication = {║} Record                                      {║}
  {╟──── } Handle      : {║} HWND;                                       {║}
  {╟──── } MSG         : {║} TMSG;                                       {║}
  {╟──── } WinClass    : {║} TWndClass;                                  {║}
  {╟──── } CustomH     : {║} THProc;                                     {║}
  {╟─── } End;           {║}                                             {║}
  {╚══════════════════════╩═══════════════════════════════════════════════╝}