HowManyToken

function HowManyToken(const Text: String; const Delimiter: Char): Integer;