Главная страница
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.023 c
14-10930
MonStar
2003-08-16 17:17
2003.09.04
Помогите с архивацией!!!!!!!!!!!!!!


1-10743
uhhax
2003-08-20 02:04
2003.09.04
TCheckListBox и TMemo


1-10821
Mazer
2003-08-21 19:01
2003.09.04
Перенос процедур главного модуля в несколько других...


7-11010
Maxim Pshevlotsky
2003-06-22 04:14
2003.09.04
Информация в панели Internet Explorer


9-10539
Sword-Fish
2002-10-19 01:23
2003.09.04
Создание 3D игр на GLScene