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

Как из набора символов 296215Е34523 исключить Е   Найти похожие ветки 

← →
Евгений12   (2003-08-13 18:49) [0]

С условием что заместо Е может быть любой буквенный символ, заранее огромное спасибо!


← →
VAleksey ©   (2003-08-13 18:53) [1]

Что значит "набор символов" - string что ли?


← →
Евгений12   (2003-08-13 18:56) [2]

Да


← →
sniknik ©   (2003-08-13 18:57) [3]

S:= StringReplace(S, "E", "", [rfReplaceAll]);


← →
Jeer ©   (2003-08-13 18:58) [4]

s[i] - доступ к символу в строке


← →
Song ©   (2003-08-13 19:16) [5]

Delete(S,Pos("E",S),1);


← →
Моджахед   (2003-08-13 20:05) [6]

Делаешь функцию, для отсеивания только символов-цифр, например, такую:

function IsNumericChar (Ch: Char): Boolean;
type
CharSet = set of char;
const
Numbers: CharSet = ["0".."9"];
begin
Result := Ch in Numbers
end;


а потом проходишь по своей строке s[i] и проверяешь символы, когда нужно, обрезаешь при помощи Delete.


← →
Evgeniy12   (2003-08-13 20:19) [7]

Мне нужно убрать из этой строки все символы не содержащие цифр



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

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



Память: 0.46 MB
Время: 0.013 c
1-81616
hawkins
2003-08-13 08:09
2003.08.25
В TImage вместо текста появляется черная полоса


1-81606
Сергеич
2003-08-15 12:20
2003.08.25
Обработка ошибок


1-81784
3APA3A
2003-08-14 02:24
2003.08.25
Про сервисы...


1-81623
Pavel74
2003-08-12 21:56
2003.08.25
Как можно больше строчек в MessageDlg поставить? :)


1-81722
Nucl
2003-08-08 10:14
2003.08.25
Как показать hint для пунктов меню




   Наверх