А какво имаш предвид под специални сомволи?! Питам, защото не мога да се сетя за функция, която да ги "разваля" тия дето аз си мисля за тях :)
А иначе трябва проста да вадиш (или прибавяш) 64 от ASCII кода на симвила (192 е главно "А" на кирилица под windows, докато 128 е dos-овския му код).
for i := 1 to Length(s) do
if s[ i ] in [#128..#191] then
s[ i ] := Chr(Ord(s[ i ]) + 64); //DOS to Win или "- 64" за Win to DOS и [#192..#255] горе...
Животът не се мери с броя вдишвания, а с моментите, които спират дъха ни!Редактирано от andrew_nikoloff на 30.05.04 16:20.