Главная страница
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.05 c
9-1093136923
Xerx
2004-08-22 05:08
2004.12.26
Аналог Blitz3D


1-1102688504
klyg
2004-12-10 17:21
2004.12.26
Поясните значение параметров процедуры


10-1072286014
Mozg
2003-12-24 20:13
2004.12.26
Переход с Delphi5 + Visibroker 3 на Delphi 7 + Visibroker4


1-1102780614
Dema-X
2004-12-11 18:56
2004.12.26
иконка Child в MDI applicaтиоn


4-1100107270
frEEstyler
2004-11-10 20:21
2004.12.26
открыть файл с помощью мною созданной программы