名前 題名 ▼ Mr.XRAYさん > > 正規表現で \n という文字列を検索する際,\n と指定しても無効です. > > 単に \n という文字列を置換するだけであれば,StringReplace 関数で > いいんですけどね. > > procedure TForm1.FormCreate(Sender: TObject); > begin > Memo1.Lines.Text := 'テスト用\n\nのテキ\nスト'; > end; > > procedure TForm1.Button1Click(Sender: TObject); > var > LDestText : string; > LReplaceStr : string; > begin > LReplaceStr := sLineBreak; > LDestText := StringReplace(Memo1.Lines.Text, '\n', LReplaceStr, [rfReplaceAll]); > Memo1.Lines.Text := LDestText; > end; GIF,JPEG,PNG画像ファイル及びLZH,ZIPファイルをアップロードできます.600 x 1200 ピクセルを超える画像は縮小表示されます(画像クリックで拡大表示). (上限122000(120k)バイト) 削除キー Link