[FlyInDream]

To v1s2222, вы привели уже две процедуры, при этом их никто не выкладывал и при этом спрашиваете их смысл.
Вопрос был, написать функцию, которая получает TStringList и его-же возращает. Надобность её мне не известна.