SelTextで選択行の開始行と終了行の取得
いつもお世話になります。
Memo1.Seltextで選択行の開始行と終了行の取得をしたいと思っています。
Googleでもいろいろ探したのですが・・・見つけられませんでした。
実現したいのは選択行だけに引用符を入れたいということです。
--------------------------
var
Kaisi:Integer;
Syuryo:INteger;
begin
Kaisi:=*****;
Syuryo:=----;
for i := Kaisi to Syuryo do
Memo1.Lines[ i ] := '>' + Memo1.Lines[ i ];
過去記事ですが、こちらが参考になるかと。
https://www.petitmonte.com/bbs/answers?question_id=8783
ヒマホホマルチ様
いつもアドバイスありがとうございます。
おかげさまで下記で出来ました。
コードを参考にさせていただき
選択範囲に引用符とヤの両方が出来るようにしてみました。
ュュュュュュュュュュュュュュュュュュュュュュュュュュュュュュュュュュュュュュュ
ヲサユアサ
ヲサヲサラョラャヲサラョヘャヲサモョモユャヲサモョヨャヲサモョテャヲサヨョヌャ
ヲサヲサヨョテャヲサヨョニャヲサヨョトャモユャヲサヨョモテサ
ヲサヲサヤニアヲサスヲサィヤニゥ
ヲサヲサヲサヲサモツヲサヲサコヲサヤツサ
ヲサヲサヲサヲサヘアコヲサヤヘサ
ヲサヲサヲサヲサノコヲサヤツサ
ヲサヲサヲサヲサヤノコヲサヤツサ
ヲサヲサヲサヲサヲサヘアヒユヲサヲサヲサヲサヲサヲサィヲサモヲサコヲサヤマサヲサヲサヒヲサコヲサラサヲサモヲサコヲサヤモモヲサゥサ
ヲサヲサヲサヲサヲサヘアヘユヲサヲサヲサヲサィヲサモヲサコヲサヤマサヲサツヲサコヲサヤヘツサヲサモヲサコヲサヤモモサヲサリャヲサルヲサコヲサノヲサゥサ
ヲサヲサヲサヲサヲサノティモコヲサヤマゥサ
ヲサヲサヲサヲサヲサヤノティモコヲサヤマゥサ
ヲサヲサ
ヲサヲサヲサヲサヲサミヲサ宣言ヲサ
ヲサヲサヲサヲサヲサヌモノサ
ヲサヲサ
ヲサヲサヲサヲサヲサミヲサ宣言ヲサ
ヲサヲサヲサヲサチモモヲサコヲサノサ
ヲサヲサヲサヲサチモナヲサコヲサノサ
ヲサヲサヲサヲサヤモコヲサモサッッ引用文字 か ヤスペース
ヲサヲササ
ヲサヲサッッサ
ヲサヲサニアコヲサヤニアサ
、メヲサェョ
ヲサヤニアョノティモコヲサヤマゥサ
コノサ
ヲサヲサヲサヲサヲサニヲサコスヲサチモモヲサヲサヲサチモナヲサ
ヲサヲサヲサヲサヲサラヲサヘアヲサ
ヲサヲサヲサヲサヲサフロヲサヲサンヲサコスヲサヤモヲサォヲサフロヲサヲサンサ
ヲサヲサヲサヲサヲサヤモコスァヲサァサッッ初期化
サ
ヲサヤニアョヘアヒユィヲサモヲサコヲサヤマサヲサヲサヒヲサコヲサラサヲサモヲサコヲサヤモモヲサゥサ
ヲサヲサヌモノサ
サ
ヲサヤニアョヘアヘユィヲサモヲサコヲサヤマサヲサツヲサコヲサヤヘツサヲサモヲサコヲサヤモモサヲサリャヲサルヲサコヲサノヲサゥサ
ヲサヲサヌモノサ
サ
ヲサヤニアョヌモノサ
ヲサヲサチモモヲサヲサヲサヲサヲサコスヲサヘアョミィヲサナペフノホナニメマヘテネチメャヲサラミチメチヘィヲサヘアョモモゥャヲサフミチメチヘィヲサーヲサゥヲサゥサ
ヲサヲサチモナヲサヲサヲサヲサヲサヲサヲサコスヲサヘアョミィヲサナペフノホナニメマヘテネチメャヲサラミチメチヘィヲサヘアョモモヲサォヲサヘアョモフヲサゥャヲサフミチメチヘィヲサーヲサゥヲサゥサ
ヲサヲサニアョテヲサコスヲサノヤモィヲサチモモヲサゥヲサォヲサァ〜ァヲサォヲサノヤモィヲサチモナヲサゥサ
サ
ヲサヤニアョヤノティモコヲサヤマゥサ
コノサ
ヲサヲサヲサヲサヲサヤモコスァヲサヲサァサ
ヲサヲサヲサヲサヲサノティモゥサ
サ
ョ
| ツイート |  |