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

Подскажите функцию :)   Найти похожие ветки 

 
dRake ©   (2005-07-26 00:26) [0]

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

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


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

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


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

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


 
Aldaris ©   (2005-07-26 01:07) [3]

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

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

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


 
alex-drob ©   (2005-07-26 01:11) [4]

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;


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

StringReplace


 
dRake ©   (2005-07-26 01:14) [6]

Aldaris
alex-drob

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

Юрий Зотов

спасибо :)


 
Fay ©   (2005-07-26 06:18) [7]

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


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

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


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

StringReplace(string,oldvalue,nuewvalue,[])


 
Legion89 ©   (2005-07-28 15:14) [10]

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



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

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



Память: 0.47 MB
Время: 0.022 c
10-1099388768
sergvc
2004-11-02 12:46
2005.08.14
Не могу зарегистрировать СОМ компонент


1-1122364321
msguns
2005-07-26 11:52
2005.08.14
Убрать иконку из кэпшина формы


14-1122133454
lookin
2005-07-23 19:44
2005.08.14
Во что бы вы оценили эту работу?


1-1122246597
MAVr
2005-07-25 03:09
2005.08.14
Файл *.rtf


11-1105368888
TeNY
2005-01-10 17:54
2005.08.14
А где сайт ?http://kol.mastak.ru/ дает 404!




   Наверх