Вниз
Скачать: CL | DM;

работа со строкой   Найти похожие ветки 

 
Jann ©   (2004-06-27 10:25) [0]

Уважаемые програмеры подскажите, как в строке типа String удалить определенное количество символов справа и слева. Только если можно с примером пожалуйста!!!


 
YurikGL ©   (2004-06-27 10:30) [1]

Ты же уже спрашивал, по моему.
И ответили

st:=copy(st,какие-то параметры)


 
SergP ©   (2004-06-27 10:34) [2]

delete(stroka,first,kolichectvo);


 
Jann ©   (2004-06-27 10:35) [3]

Друзья извените но данная тема была перемещена судя по всему "модератором" и по той ссылке не перейти туда, чтобы прочитать ответы. Поэтому прошу тех кто отвечал повторить плиз свои ответы. Неужели так тяжко привести примеры???


 
SergP ©   (2004-06-27 10:38) [4]


>  [3] Jann ©   (27.06.04 10:35)


Примеры:

Удаляем в строке st 5 первых символов:
delete(st,1,5);

Удаляем 5 последних символов:
delete(st,length(st)-4,5);

Так понятно?


 
YurikGL ©   (2004-06-27 10:39) [5]

Если в строке N символов и тебе нужно удалить символы с 1 по A и с B до N, где A<B то

st:=copy(st,A+1,B-A+1)


 
YurikGL ©   (2004-06-27 10:43) [6]

Извини, ошибся. Вот весь пример

procedure TFormSborkiSnab.Button3Click(Sender: TObject);
var
st:string;
a,b:integer;
begin
st:="12345";
a:=1;
b:=5;
st:=copy(st,A+1,B-A-1);
showmessage(st);
end;


 
Jann ©   (2004-06-27 10:45) [7]

Ну спосибо други помогли, если я задам Вам позднее еще какие либо вопросы не откажите???


 
YurikGL ©   (2004-06-27 10:45) [8]

Выведет на экран 234

если a=2 b=4 т.е. удаляем с 1 по 2-й и с 4-го по пятый, то на экране будет только 3



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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.02 c
14-1087915090
Volk
2004-06-22 18:38
2004.07.11
Кто это делается?


3-1087281540
AlexXn
2004-06-15 10:39
2004.07.11
Картинки в БД


14-1088052586
Lm
2004-06-24 08:49
2004.07.11
Материнская плата ASUS


1-1088099687
ИМХО
2004-06-24 21:54
2004.07.11
Почему execCommand( Copy ) не копирует в буфер обмена?


3-1087292955
Павел
2004-06-15 13:49
2004.07.11
База данных




   Наверх