掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
マウスで選択範囲の行の空白を削除したい (ID:49126)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
マウスで選択した範囲の行内の空白行を削除したいのですが、 テキスト全体ですと下記でよいのだと思いますが、 Memo1.text:=StringReplace(s,#13#10#13#10,#13#10,[rfReplaceAll]); 選択範囲内の場合は、 For i:= ASelStart to ASelEnd do //選択範囲開始〜範囲終了まで Memo1.Lines[i]:=〜〜〜 ←ここの部分の処理方法が判らず困っています 一行一行確認をする為に、前後に改行があるかどうかが不明と なってしまいますし、この処理だと処理速度が遅くなりそうですね。 それとも、選択部分を一旦、変数に代入して全体置換した方が良いのかと 思いますが、その場合、選択部分の置換後のテキストと元のテキストの 合体のさせ方が判りません。 要約しますと以下の2点お教えていただけますでしょうか？ ①一行一行確認をしながら空白改行を削除する方法 ②選択範囲を一旦別の変数に代入後、一括置換し、元に戻す方法 よろしくお願い致します。
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.