Форум: "Потрепаться";
Текущий архив: 2005.03.06;
Скачать: [xml.tar.bz2];
ВнизКакая функция в Делфи, убирает пробелы из строки? Найти похожие ветки
← →
Ilya__ (2005-02-16 12:27) [0]Подскажите, пожалуйста!
Какая функция в Делфи, убирает пробелы из строки?
← →
P.N.P. © (2005-02-16 12:30) [1]StringReplace
← →
Johnmen © (2005-02-16 12:32) [2]>Какая функция в Делфи, убирает пробелы из строки?
Нет такой.
← →
WondeRu © (2005-02-16 12:32) [3]procedure RemoveInvalid(what, where: string): string;
// what - удаляемая подстрока, where - обрабатываемая строка
var
tstr: string;
begin
tstr:=where;
while pos(what, tstr)>0 do
tstr:=copy(tstr,1,pos(what,tstr)-1) +
copy(tstr,pos(what,tstr)+length(tstr),length(tstr));
Result:=tstr;
end;
Применение:
NewStr:=RemoveInvalid("<брак>","Этот <брак> в моей строке, и я хочу
удалить из нее этот <брак>");
Другое решение:
Используйте стандартную функцию Pascal DELETE...
Пользуясь тем же примером, вы можете сделать так....
Target:="<брак>";
While POS(Target,string)>0 do
begin
P := POS(Target,string);
DELETE(string,P,Length(Target));
end;
← →
Alex_Petr © (2005-02-16 12:44) [4]AnsiReplaceStr
← →
ms © (2005-02-16 12:48) [5]TRIM
← →
Ilya__ (2005-02-16 12:53) [6]Спасибо!
Страницы: 1 вся ветка
Форум: "Потрепаться";
Текущий архив: 2005.03.06;
Скачать: [xml.tar.bz2];
Память: 0.46 MB
Время: 0.032 c