掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
マウスで選択範囲の行の空白を削除したい (ID:49127)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
for I := ASelEnd downto ASelStart do begin if Memo1.Lines[I] = '' then begin Memo1.Lines.Delete(I); end; end; 処理速度が気になる場合は全体を Memo1.Lines.BeginUpdate; try ... finally Memo1.Lines.EndUpdate; end; で囲めばOK。 ということではなく？
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.