dポイントプレゼントキャンペーン実施中！

おしえて

DelphiのRichEditでカーソル位置を取得したいのですが

解決済

  • 質問者：kihonkana
  • 質問日時：
  • 回答数：1件

http://www.geocities.jp/asumaroyuumaro/program/t …

上記の頁を参考に次のようにしているのですがうまくいきません

pos_cur := RichEdit2.Perform(EM_LINEINDEX, UINT(-1), 0);
何か勘違いしていますか？

質問者からの補足コメント

  • 回答ありがとうございます。

    >カーソル位置の何を取得したいんですか？
    カーソル位置データ（何文字目かでも、何バイト目かでもOKです）です。

    pos_cur := RichEdit2.Perform(EM_LINEINDEX, UINT(-1), 0);
    Label19.Caption := IntToStr(pos_cur);
    確認のため、上記のようにLabelに表示しているのですが、０になります。

    No.1の回答に寄せられた補足コメントです。 補足日時：2015/05/02 05:08
    通報する

  • 今はRichEditコンポーネントの動作確認段階で、FormにRichEdit（テキスト入力済み）、Buttonを置き、マウスでRichEditのカーソルを移動させ、buttonでその時の位置を取得するようにしています。

    また、
    pos_cur := RichEdit2.Perform(EM_LINEINDEX, UINT(-1), 0);
    の前に
    RichEdit2.SetFocus;
    を置いても同じです。

      補足日時：2015/05/02 08:22
    通報する
通報する

この質問への回答は締め切られました。

質問の本文を隠す

A 回答 (1件)

No.1ベストアンサー

  • 回答者： nag0720
  • 回答日時：

RichEdit2.Perform(EM_LINEINDEX, UINT(-1), 0)


これは、提示されたサイトにも書いてあるように、カーソルがある行の先頭文字がテキスト全体の最初から何文字目になるかを返します。

カーソル位置の何を取得したいんですか？
それが分からないと、「何か勘違いしていますか？」と訊かれてもこたえようがありません。
この回答への補足あり
    • good
    • 0
    • 件
通報する
この回答へのお礼

ありがとうございます。
http://afsoft.jp/program/del2010/p11_056.html
にあるCaretPosプロパティを使って
pos_cur := RichEdit2.CaretPos.X;
とすればうまくいくようです。
お手数をおかけして申し訳ありませんでした。

通報する
お礼日時：2015/05/02 11:08

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう！

Q質問する（無料）

このQ&Aを見た人はこんなQ&Aも見ています

関連するカテゴリからQ&Aを探す

ページトップページトップ

Q質問する（無料）

このQ&Aを見た人がよく見るQ&A

デイリーランキングこのカテゴリの人気デイリーQ&Aランキング

マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング

おすすめ情報