改行を置き換えたいんですが・・・

解決

dangerous 2005-03-24 10:01:53 No: 13917 IP: [192.*.*.*]

if St = 'あなた' then St := 'you' else ...
のように文を置き換えるものを作っているのですが、
改行を「//と改行」に置き換える↓にはどうすれば良いでしょうか？
------
あなた
１
------
を
------
you//
１
------
としたいのです。
どなたかご教授願います。

編集削除

メラトニン 2005-03-24 13:35:24 No: 13918 IP: [192.*.*.*]

if St = '//' then St := '//'+#13#10 else ...
です。
#$D#$AでもOKです。

編集削除

メラトニン 2005-03-24 13:36:12 No: 13919 IP: [192.*.*.*]

誤爆
if St = #13#10 then St := '//'+#13#10 else ...

編集削除

にしの 2005-03-24 19:15:03 No: 13920 IP: [192.*.*.*]

改行＝行の区切りと考えれば、
Memo1.Lines.Text := StringReplace(Memo1.Lines.Text, #13#10, '//'#13#10, [rfReplaceAll]);
のようにStringReplaceだけでいけるかと思います。

編集削除

dangerous 2005-03-25 04:46:21 No: 13921 IP: [192.*.*.*]

ありがとうございました。
おかげさまで解決しました。
改行は#13#10というふうに扱われているのですね。
すっきりしました。

編集削除