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

Вниз

Отрезание конца строки, как так сделать?   Найти похожие ветки 

 
Relaxxx   (2004-12-10 05:59) [0]

Как мне сделать вот такую весчь:
Есть строка my_str, как мне узнать являються ли 2 ее последних символа ", " если да, то заменить их точкой "."


 
Андрей ©   (2004-12-10 06:39) [1]

Купи книжечку по Паскалю и почитай ее, ДАРАГОЙ!

А вообще, сегодня у меня хорошее настроение...

i:=length(my_str); // это, типа, длина
// вариант по одному символу
if my_str[i]="," then my_str[i]:="."; // это последний символ
if my_str[i-1]="," then my_str[i-1]:="."; // а это - предпоследний
// а это для случая, когда требуется обязательно две запятых заменять
if copy(my_str,i-1,2)=",," then begin
my_str[i]:=".";
my_str[i-1]:=".";
end;


 
DN ©   (2004-12-10 09:30) [2]

Returns the substring of a specified length that appears at the start of a string.

Unit

StrUtils

Category

string handling routines
Еще вариант:

LeftStr function

See also

function LeftStr(const AText: string; ACount: Integer): string;

Description

LeftStr returns the leading characters of AText up to a length of ACount characters. Thus, for example,

LeftStr("Programmer", 7)

returns the string

"Program"



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

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

Наверх




Память: 0.47 MB
Время: 0.048 c
1-1102644612
IceDog
2004-12-10 05:10
2004.12.26
Вставка текста из программы в документ


3-1101551289
sloug
2004-11-27 13:28
2004.12.26
DbListbox и dbgrid


1-1102673024
B-boy-Dimo-N
2004-12-10 13:03
2004.12.26
Как прервать выполнение рекурсии одним нажатием клавиши ?


14-1101887887
negrila
2004-12-01 10:58
2004.12.26
Алгоритм работы однорукого бандита


1-1102470358
Viktop
2004-12-08 04:45
2004.12.26
Сохранение настроек Delphi