Показать сообщение отдельно
Старый 17.03.2009, 14:51   #12  
rruskih is offline
rruskih
Участник
Аватар для rruskih
 
12 / 10 (1) +
Регистрация: 12.03.2007
проще уж написать:


DelChar(LocText : Text[30]) Return : Text[30]
Chr := 32;
Return :=DELCHR(LocText,'=',FORMAT(Chr));
Chr := 255;
Return :=DELCHR(LocText,'=',FORMAT(Chr));