for i:=1 to N do if S[i]= / then S[i]:= ;

← →
dracula © (2004-08-01 21:22) [0]

for i:=1 to N do if S[i]="???" then S[i]:="\";
(замена одного символа на другой)
как в фрагмент где знаки вопроса вставить ввод(enter) в текстовом файле он помечается как два твёрдых знака. Но тут это непроходит или может я делаю чего нето?

← →
GuAV © (2004-08-01 21:26) [1]

> он помечается как два твёрдых знака.

нет, он помечается как #13#10 (или в Дельфи sLineBreak)
и все равно не вставишь, там нужен char а не string.

← →
Ну ну (2004-08-01 22:21) [2]

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

:))

← →
dracula © (2004-08-01 22:45) [3]

>он помечается как #13#10

я имею ввиду в блокноте, и там он как два твёрдых знака

← →
dracula © (2004-08-01 22:52) [4]

for cntr:=1 to name do if namen[cntr]="???" then namen[cntr]:=" ";

а пример можно на этой строке, как мне это применить?
function StringReplace(const S, OldPattern, NewPattern: string; Flags: TReplaceFlags): string;

← →
dracula © (2004-08-01 23:31) [5]

sLineBreak = #13#10
мне надо вот это
<title>
xxxxxxxxxxxxxxxxxxxxxxxxx
</title>
в одну строку прописать

← →
Ну ну (2004-08-01 23:39) [6]

var s: string;
Edit1.Text := s;
s := "В чащах юга жил бы цитрус? Да, но фальшивый экземпляр.";
s := StringReplace(Edit1.Text,"но фальшивый","образцовый",[rfReplaceAll, rfIgnoreCase]);
Edit1.Text := s;

← →
Ну ну (2004-08-01 23:40) [7]

сори

var s: string;

s := "В чащах юга жил бы цитрус? Да, но фальшивый экземпляр.";
Edit1.Text := s;
s := StringReplace(Edit1.Text,"но фальшивый","образцовый",[rfReplaceAll, rfIgnoreCase]);
Edit1.Text := s;

for i:=1 to N do if S[i]= / then S[i]:= ; Найти похожие ветки