Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Подскажите функцию :)


dRake ©   (2005-07-26 00:26:00) 

Есть ли стандартная функция поиска с заменой? А то писать неохота :)
Что-то вроде:

SearchAndReplace('Тут %zamena замена', '%zamena', 'произошла');
Результат: Тут произошла замена.


Legion89   (2005-07-28 15:14:00) [1]

Есть такой компонент ActionList(вкладка Standart). В нём можно выбрать стандартные действия(New Standart Action). Там сможешь и поиск с заменой найти. А потом вешаешь это действие на кнопку, или куда там надо(св-во Action).


Mamed   (2005-07-26 08:12:00) [2]

StringReplace(string,oldvalue,nuewvalue,[])


Viktop   (2005-07-26 08:05:00) [3]

http://www.delphikingdom.com/asp/viewitem.asp?catalogid=1059&mode=print


Fay   (2005-07-26 06:18:00) [4]

2 dRake ©   (26.07.05 1:14) [6]
Попробуй поувлекаться дайвингом


dRake   (2005-07-26 01:14:00) [5]

Aldaris
alex-drob

Ребят я ж написал что кодить неохота, а не то что я не знаю как ее написать :)

Юрий Зотов

спасибо :)


Юрий Зотов   (2005-07-26 01:12:00) [6]

StringReplace


alex-drob   (2005-07-26 01:11:00) [7]

function SearchAndReplace(a,b,c:string):string;
var
   f:boolean;
   p:integer;
begin
 f:=true;
 while f do
 begin
   p:=pos(b,a);
   if p>0 then
   begin
     delete(a,p,length(b));
     insert(c,a,p);
   end
   else
   f:=false
 end;
 Result:=a
end;


Aldaris   (2005-07-26 01:07:00) [8]

Думаю ты более мене опытный, если нет попроси уточнить.

Могу предложить:
допустим слово из 3-х букв, берем первые 3 буквы делаем проверку;
затем берем еще три буквы (начиная уже не с первого символа а со 2-го включительно, далее с 3-го и таким образом сравнивая с тем что ищем, находим).

Если так непонятно напишу подробнее.


dRake   (2005-07-26 00:53:00) [9]

ищу слово в тексте


Aldaris   (2005-07-26 00:35:00) [10]

Я считаю вопрос некоректный, что именно ты ищешь? (файлы на винте, слово в тексте) Прошу уточнить для того чтоб это можно было обдумать.


Наверх

Титульная страница Поиск, карта сайта Написать письмо