> Хорошо, что их "всего лишь" 166, а если бы их было полторы тысячи?

Честно говоря, не вижу большой проблемы.
Делов-то:
type
  TLocoRec = record
    Name: string;
    Code: Integer;
  end;

  TLocoCodeTable = array of TLocoRec;

var

myarray: TLocoCodeTable;

function LoadTableFromCSV(filename: string): TLocoCodeTable;
И вообще, для связок name = value есть StringList. Там уже все реализовано тыщу лет назад.

А csv можно править через Excel/ОО. Так, имхо лучше.
Но от возможности писать
const
  LocoCodeTable: array of TLocoRec (...)
я бы тоже не отказался. ;)