TOKEN - это функция
Разделяет строку inputStr на фрагменты
TOKEN( <inputStr> [,<numFragment=1>] [,delimStr=" , ;" [,IsEmptyFrag=False] )
TOKEN( '1, 2' )
Полезные функции
Функции Delphi