引用 mohri on 2015/09/02 11:16 Wed
たびたびすいません。
TEditorで 10 Seattle サンプル
hedit252U\Samples\unicode_demo\Project1.dpr
これがエラーも無いのですが
実行できないみたいなのです。

begin
Application.Initialize;
ここいらにブレークポイント置いてもダメでして
うまく動作させる方法ありますでしょうか？

なぬ！ちょっと試してみますね。

[変更点 (2015/09/08)]

• 10 Seattle 用のパッケージを追加。

DEKO様

　いつもお世話になっております。Delphiの愛用者です。TEditorをぜひ
新しいプログラムで使いたいと思い、本格的にいじり始まったのですが、
以下の点で少し気になる点がありました。ご多忙なところ、大変恐縮な
のですが、ご確認をお願いできますでしょうか。なにとぞよろしくお願い
いたします。

１　タブ文字に続く文字列の描画（URLの図も参照）
　　ワードラップが有効の状態で、タブ文字＋任意の文字を打ち込み続けると、
　１段目の文字が少なく表示される。

　　https://www.fastpic.jp/viewer.php?file=8886500217.png

　　※たとえば、WrapByteを20にして、タブ文字１文字＋「1」を何度も入力
　　　すると、改行を入れていないのに、なぜか１段目には、「1」が５文字しか
　　　入力されない。

２　ColToCharの返り値が、実態に合わない数値を返す

　　TEditorのCaretMovedイベントに、以下のようなコードを書くと、WrapByte
　の半分より後ろのColにキャレットを移動したとき、値が変化しなくなる。

　※たとえば、WrapByteを20にして、「あ」を１０文字並べ、キャレットを８文字
　　目の後ろに持ってきても、ColToCharは１０を返す。

procedure TForm1.Editor1CaretMoved(Sender: TObject);
var
  C: Integer;
begin
  C := Editor1.ColToChar(Editor1.Row, Editor1.Col);
  StatusBar1.Panels[0].Text := 'Editor1.ColToChar(Row, Col)の値：' + IntToStr(C);
end;

時間経過で画像が削除されてしまったようですので、

>もう１点、気になるところがありましたので、参考までに書かせていただきます。
>ワードラップをOn、WrapByteを２０にして、以下のURLのような文字列を設定
>します。ここで、キャレットを「あ」の直前の位置において、バックスペースキー
>を押すと、キャレットは１文字分後退しますが、文字は消えないという現象が発生
>します。

の文字列を提示させていただきます。全角で２０文字です。

↓

１２３４５６７８９０あ２３４５６７８９０

ワードラップのため、「あ」の直前で折り返されます。「あ」の直前にキャレットを
おいて、バックスペースを押すと、キャレットは移動するが文字が消えないという
現象が発生します。

ご回答ありがとうございます。気を長くして、その日を楽しみにお待ち
しております。

今、久しぶりに触ってみたのですが、サロゲートペアの文字を何度も打ち
込むと、改行コードのマークよりも後ろに文字が表示されました。まだ
サロゲートペアの文字は完全対応ではないのかもしれませんが、参考まで
に報告させていただきます。

※ちなみに打ち込んだ文字は、「