Текущий архив: 2005.09.25;
Скачать: CL | DM;
Вниз
Поиск в строке Найти похожие ветки
← →
Jax (2005-09-01 14:01) [0]Мастера!
Подскажите, долбаюсь второй день!
Цель: выдрать из Edit1.Text определённый набор символов, заменить его на другой набор символов и всё это вывести в Memo.
Пробую через Copy().. получаются не все варианты
Нужно чтоб находило набор символов вне зависимости от пробелов или спец. знаков. У меня получается сделать только варианты "xaaa", "aaax" если искомая фраза есть "aaa".
Пробую так:
begin
st:="abc";
for i:= 0 to Length(edit1.text) do
begin
s:=Copy(Edit1.text,i,Length(st)+i);
if s=st then memo.lines.add("");
s:="";
end;
end;
Что не так? :(
← →
begin...end © (2005-09-01 14:05) [1]Переформулируйте вопрос.
← →
Юрий Зотов © (2005-09-01 14:09) [2]Поиск подстроки - Pos.
Поиск и замена подстрок - StringReplace.
Чтобы не зависело от пробелов и каких-то еще символов - пройти по символам строки в цикле и исключить из нее ненужные символы (Delete), а уж потом делать поиски и/или замены.
Страницы: 1 вся ветка
Текущий архив: 2005.09.25;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.049 c
