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

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

замена символов [D6, WinXP]

TAN ©   (2003-01-29 12:06:00) 

как в строке заменить все точки на символ _

---

REA   (2003-01-29 12:26:00) [1]

Unit

SysUtils

Category

string handling routines

Delphi syntax:

function StringReplace(const S, OldPattern, NewPattern: string; Flags: TReplaceFlags): string;

---

alxx   (2003-01-29 12:25:00) [2]

For i:=1 to Length(S) do If S[i]="." Then S[i]:="_";

---

DVM   (2003-01-29 12:23:00) [3]

Найди длину текста. Перебирай циклом все символы по одному от первого до длины строки. Заведи еще одну строку. Сравнивай каждый символ с точкой. Если точка, то в новую строку плюсуй с конца символ "_" , если не точка, то сам этот символ.

На паскаль сам переведешь.

---

Наверх