Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.08.22;
Скачать: CL | DM;

Вниз

Есть в delphi функция удаления пробелов в строке слева и справа?   Найти похожие ветки 

 
vic   (2004-08-03 08:31) [0]

см сабж
такая как ltrim и rtrim в sql?


 
vic   (2004-08-03 08:42) [1]

нашла, извиняюсь...


 
RapTor ©   (2004-08-03 15:11) [2]

А действительно как? Удалить пробелы в начале и в конце, оставив в покое спец символы?
Я обычно через system.delete делаю.


 
Думкин ©   (2004-08-03 15:12) [3]

> [2] RapTor ©   (03.08.04 15:11)

Trim


 
RapTor ©   (2004-08-03 15:14) [4]

Дык и спец тоже полетят...


 
Sergey Kaminski ©   (2004-08-03 15:16) [5]


RapTor ©   (03.08.04 15:14) [4]
> Дык и спец тоже полетят...


см. SysUtils.pas


function Trim(const S: string): string;
var
 I, L: Integer;
begin
 L := Length(S);
 I := 1;
 while (I <= L) and (S[I] <= " ") do Inc(I);
 if I > L then Result := "" else
 begin
   while S[L] <= " " do Dec(L);
   Result := Copy(S, I, L - I + 1);
 end;
end;


 
Anatoly Podgoretsky ©   (2004-08-03 19:17) [6]

Вот эту функцию и взять, заменив <= на =


 
RapTor ©   (2004-08-03 22:47) [7]

Вообщето да. Я в SysUtils не смотрел просто глянул доку и понял что что-то в ней лишнее. В результате изобрел велосипед.


 
RapTor ©   (2004-08-04 17:36) [8]

Забыл добавить. Быстрый велосипед.


 
Sergey Kaminski ©   (2004-08-04 19:34) [9]

Код "быстрого велосипеда" в студию! :)

Обязуюсь протестить присланный код vs Исправленный Trim.

Результаты выложу сюда минут через 40.

Все будет веселее, чем спорить о битых ссылках :(

Только, чур, честно - прислать именно оригинальную процедуру аналога трима. Сейчас не править, высылать, как есть.

Не развод.
:)


 
RapTor ©   (2004-08-04 23:11) [10]

Ну какой он быстрый может быть, через delete. Я просто прикольнулся. Хотя, если ненадо ничего удалять, быстрей.


 
Sergey Kaminski ©   (2004-08-04 23:24) [11]

RapTor ©   (04.08.04 23:11) [10]
Эх.


 
Вася   (2004-08-05 02:28) [12]

Ну какие в попу функции вы пишите! Зачем изобретать велосипед, когда есть три стандартные функции:

Trim(const S: string):string Удаляет из строки S начальные и завершающие пробелы и управляющие символы.
TrimLeft(const S: string):string Удаляет из строки S начальные пробелы и управляющие символы.
TrimRight(const S: string):string Удаляет из строки S завершающие пробелы и управляющие символы.

Почитайте Help!


 
Думкин ©   (2004-08-05 07:01) [13]

>  [12] Вася   (05.08.04 02:28)

А ты прочитай [2] RapTor ©   (03.08.04 15:11) - речь там об ином. Удачи.



Страницы: 1 вся ветка

Текущий архив: 2004.08.22;
Скачать: CL | DM;

Наверх




Память: 0.49 MB
Время: 0.038 c
9-1083642760
lokid7
2004-05-04 07:52
2004.08.22
Расчет положения объекта на карте.


4-1089735002
Nick_Syberia
2004-07-13 20:10
2004.08.22
Как из Delphi управлять модемом


4-1089358067
putrsa
2004-07-09 11:27
2004.08.22
работа с визуальными компонентами чужого приложения


1-1091613759
sachem
2004-08-04 14:02
2004.08.22
Как запретить форме перересовываться?


3-1090459928
Euronymous
2004-07-22 05:32
2004.08.22
Drag n Drop внутри DBGrid...