Я тоже за удаление подчёркивания, если что, в пользу CamelCase. Просто гораздо удобнее набирать с клавиатуры.
Особенно вымораживают товарищи, которые рандомно смешивают то и другое в одном идентификаторе.
Очень часто вижу, что подчёркивание используют вместо того, чтобы объединить группу переменных в record:
## Код:
```
Global_LastResult_TS          : T_TransferSysX_LastResult;
  Global_LastResult_CP          : T_SAE_Operation_Buffer_CP;
  Global_LastResult_FR          : T_Refrigerator_Operation_CmdReply;

  Global_Physical_Boundaries_AS : T_RobotX_AxesMovementBoundaries_AS;
  Global_Custom_Boundaries_AS   : T_RobotX_AxesMovementBoundaries_AS;
  Global_Physical_Boundaries_GR : T_RobotX_AxesMovementBoundaries_GR;
  Global_Custom_Boundaries_GR   : T_RobotX_AxesMovementBoundaries_GR;
  Global_Physical_Boundaries_TS : T_TransferSysX_AxesMovementBoundaries;
  Global_Custom_Boundaries_TS   : T_TransferSysX_AxesMovementBoundaries;
  Global_Physical_Boundaries_CP : T_ConveyancePusher_AxesMovementBoundaries;
  Global_Custom_Boundaries_CP   : T_ConveyancePusher_AxesMovementBoundaries;
  Global_Physical_Boundaries_FR : T_Refrigerator_Operation_CmdReply;
  Global_Custom_Boundaries_FR   : T_Refrigerator_Operation_CmdReply;

  Global_SoftwareVersions_AS    : T_RobotX_SoftwareVersions_AS;
  Global_SoftwareVersions_GR    : T_RobotX_SoftwareVersions_GR;
  Global_SoftwareVersions_TS    : T_TransferSysX_SoftwareVersions;
  Global_SoftwareVersions_CP    : T_ConveyancePusher_SoftwareVersions;
  Global_SoftwareVersions_FR    : T_Refrigerator_Operation_CmdReply;

  // up-to-date flags for all kind of data syncronized between app and machine/database
  Global_bUpdated_DB_CONFIGDATA  : Boolean;
  Global_iUpdated_BOUNDARIES     : T_RobotX_Int32;
  Global_bUpdated_SW_VERSIONS_AS : T_RobotX_Boolean;
  Global_bUpdated_SW_VERSIONS_GR : T_RobotX_Boolean;
  Global_iUpdated_BOUNDARIES_FR  : Int32;
  Global_bUpdated_SW_VERSIONS_FR : Boolean;

  // robot related globals managed by enumerated arrays of the former primitive type
  Global_ConnectState_RobotX              : T_RobotX_ConnectionState;
  Global_ConnectState_BarCode             : T_LoadBayX_Int32;  // Barcode scan station (certain kind of 1D/2D-code reader)
  Global_ConnectState_Beamer_LoadingArea  : T_LoadBayX_Int32;
  Global_ConnectState_Leuze_LoadingArea   : T_LoadBayX_Int32;
  Global_ConnectState_TCPAlive            : array of Int32;
  Global_ConnectState_TransferSystem      : T_TransferSysX_Int32;
  Global_ConnectState_ConveyancePusher    : Int32;
  Global_ConnectState_Refrigerator        : Int32;
  Global_ConnectState_Separator           : array[T_Enum_Separator] of Int32;
  Global_ConnectState_Database_Conn0      : Int32;    // database connection 0 (main thread)
  Global_ConnectState_Database_Conn2      : Int32;    // database connection 1 (SAE auslagerung thread)

  //  Loading
  Global_PackLoading_ColorPack : TColor;
  Global_PackLoading_ColorBelt : TColor;
  Global_PackLoading_ColorArrow: TColor;
  Global_PackLoading_ColorFrame: TColor;

  Global_DispAndLabel_CustEntryActive      : Boolean;
  Global_DispAndLabel_OrderActive          : Boolean;
  Global_DispAndLabel_ReloadActive         : Boolean;
  Global_DispAndLabel_PackActive           : Boolean;
  Global_DispAndLabel_PacksTotal           : Int32;
  Global_DispAndLabel_NeededLength         : Single;
  Global_DispAndLabel_OrderBufferLength    : Single;
  Global_DispAndLabel_PBA                  : Int32;
```
Это просто отвратительная замена структурному представлению данных.