https://devhubby.com/thread/how-to-split-a-phrase-into-words-in-pascal