掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
ポップアップでEditに文字を書く込むには (ID:30251)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
こんにちは ピタゴラスの定理です また教えて頂きたく質問します。 あるEditに特定の分類された言葉を入れたく、 Popupを使うのが１つの案と思われますが クリックした文字を取得するには どの様にコードを書けば宜しいでしょうか 又動的にアイテム追加する方法も御指示下さい。 上記以外によい別案が有りましたら ご指導願います。 尚会社の仕事が忙しくなりそうですので、 レスが遅くなると思いますが宜しくお願いいたします。 例）入力したい文字 小学校−××小学校 −○○小学校 ・ ・ 高等学校−◇◇学校 −◎◎学校 ・ ・ ××××− ××××− procedure TForm1.LabeledEdit4MouseMove(Sender: TObject; Shift: TShiftState;X, Y: Integer); begin PopupMenu1.Popup(LabeledEdit4.ClientOrigin.X+70, LabeledEdit4.ClientOrigin.Y + LabeledEdit4.Height); //ShowMessage(PopupMenu1.Items.Caption); ↑これでは所得出来ませんでした end;
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.