Повторяющийся символ в строке Опции

[root]

Необходимо удалить из введенной строки повторяющиеся 2 раза подряд служебные символы, т.е. если введено "abcd//efg", то в итоге должно быть "abcdefg"

[trminator]

А какие символы считать служебными? Есть их полный список?
А то напрашивается тупое решение:

Код

while pos('//', mystr) <> 0 do
 delete(mystr, pos('//', mystr), 2)

И так для всех "служебных символов". Для простоты можно оформить удаление двух подряд идущих заданных символов в виде процедуры (типа del2('/') )