Форум: "Потрепаться";
Текущий архив: 2003.01.20;
Скачать: [xml.tar.bz2];
Вниз
как обрезать переменную Найти похожие ветки
← →
Mr.Ice (2003-01-03 21:58) [0]Есть переменная (string) и надо отрезать от нее несколько последних символов!!!
Кто нибудь знает как это сделать?
← →
Феликс (2003-01-03 21:59) [1]pos(), copy(), delete()
← →
Mr.Ice (2003-01-03 22:02) [2]а если серьезно
← →
Anatoly Podgoretsky (2003-01-03 22:53) [3]SetLength
← →
Mr.Ice (2003-01-03 22:55) [4]спасибо а можно примерчик
← →
Вадим (2003-01-03 23:04) [5]SetLength(s)
← →
Neox (2003-01-03 23:04) [6]procedure SetLength(var S; NewLength: Integer);
← →
Вадим (2003-01-03 23:04) [7]Ээ, в смысле setlength(s, 3)
← →
Mihey (2003-01-03 23:06) [8]Можно очень просто. Следующий пример возвращает n последних символов у строки Str:
n := 2;
str := "I Love Delphi!";
For i := Length(str) downto (Length(str) - n) do
begin
Rez := str[i] + Rez;
end;
ShowMessage(Rez);
Если ты имел ввиду всё же "отрезает", то используй SetLength. Ведь строка - это массив символов, а потому проходит такой фокус:
SetLength(str, Length(str)-n);
← →
Mr.Ice (2003-01-03 23:10) [9]Mihey большое СПАСИБО теперь все работает :)
← →
drpass (2003-01-03 23:38) [10]А программисты, иногда читающие доки, вместо
For i := Length(str) downto (Length(str) - n) do
begin
Rez := str[i] + Rez;
end;
используют функцию RightStr(str,n)
:)))
← →
blackman (2003-01-04 00:05) [11]Это просто праздник какой-то !
Особенно хорош drpass
Непонятно только, что у него (Mr.Ice) не работало ?
Надо в FAQ занести...
← →
Vad (2003-01-04 02:37) [12]>А программисты, иногда читающие доки, вместо
...
>используют функцию RightStr(str,n)
Еще, неплохо бы, программистам, которые используют функцию
RightStr(str,n) не забывать - в каких модулях она находится...
Страницы: 1 вся ветка
Форум: "Потрепаться";
Текущий архив: 2003.01.20;
Скачать: [xml.tar.bz2];
Память: 0.46 MB
Время: 0.01 c
