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

Вниз

Как из строки убрать ненужные пробелы в начале и в конце строки?   Найти похожие ветки 

 
Юлия   (2003-08-24 18:38) [0]

Есть функция, которая работает как alltrim в vfp?


 
Anatoly Podgoretsky ©   (2003-08-24 19:06) [1]

Trim


 
default ©   (2003-08-24 19:42) [2]


var
Str: String;
i: Cardinal;
begin
Str := " 12345 ";
while Str[1] = #32 do Delete(Str, 1, 1);
i := Length(Str);
while Str[i] = #32 do begin Delete(Str, i, 1); Dec(i); end;


 
default ©   (2003-08-24 19:46) [3]

или так:

var
Str: String;
i: Cardinal;
begin
Str := " 12345 ";
while Str[1] = #32 do Delete(Str, 1, 1);
i := Length(Str);
while Str[i] = #32 do Delete(Str, Length(Str), 1);


 
default ©   (2003-08-24 19:48) [4]

блин...так надо:

var
Str: String;
begin
Str := " 12345 ";
while Str[1] = #32 do Delete(Str, 1, 1);
while Str[Length(Str)] = #32 do Delete(Str, Length(Str), 1);


 
Johnmen ©   (2003-08-24 19:57) [5]

Удалено модератором
Примечание: OffTopic


 
default ©   (2003-08-24 19:59) [6]

Удалено модератором
Примечание: OffTopic


 
Fenik ©   (2003-08-24 20:02) [7]

Удалено модератором
Примечание: OffTopic


 
Johnmen ©   (2003-08-24 20:08) [8]

Удалено модератором
Примечание: OffTopic


 
Fenik ©   (2003-08-24 20:15) [9]

Удалено модератором
Примечание: OffTopic


 
Юрий Федоров ©   (2003-08-24 21:10) [10]

Юлия, послушай ответ от Anatoly Podgoretsky © (24.08.03 19:06) [1]



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

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

Наверх




Память: 0.48 MB
Время: 0.024 c
1-10808
AndreyDm
2003-08-20 14:09
2003.09.04
Добавить содержимое буфера к Stringlist


4-11020
AHTOHA
2003-07-04 06:35
2003.09.04
Вывести текст из DOSовского окна в Мемо?


1-10765
olecorp
2003-08-24 13:50
2003.09.04
Как послать приложению русские буквы ?


3-10554
yurez
2003-08-15 12:14
2003.09.04
Как редактировать права доступа к таблицам базы данных interbase?


14-10911
имя
2003-08-18 10:48
2003.09.04
Могу предоставить сайт///