Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.04.08;
Скачать: [xml.tar.bz2];




Вниз

StringReplace 


LiNkS   (2002-03-27 16:06) [0]

Кто-нибудь может написать полный пример работы этой функции, а то я как ни делаю - все ошибка выдается... :(



Alx2   (2002-03-27 16:15) [1]


procedure TForm1.Button2Click(Sender: TObject);
Var S : String;
begin
S := "Однажды, в студеную зимнюю пору, я из лесу вышел.";
S := StringReplace(S,","," боком,",[rfReplaceAll]);
S := StringReplace(S,"."," раком.",[rfReplaceAll]);
end;


Потом смотрим S - все работает.




Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.04.08;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.71 MB
Время: 0.018 c
1-22675           VictorT               2002-03-27 18:58  2002.04.08  
Диалог для указания папки


7-22856           BWG                   2002-01-14 19:01  2002.04.08  
FAR manager


14-22790          PlaZZma               2002-02-26 00:10  2002.04.08  
Где найти описание Wise InstallMaster или InstallShield на русском?


1-22740           snoup                 2002-03-26 23:47  2002.04.08  
Почему не работает вот такая фигня: if timeover = 10 then label1.color:=clred;??????


1-22613           LiNkS                 2002-03-27 16:06  2002.04.08  
StringReplace