掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
Editでマウス操作にて全選択状態にするには？ (ID：9966)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
var hoge:boolean; procedure TForm1.Edit1Enter(Sender: TObject); begin hoge:=true; end; procedure TForm1.Edit1MouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer); begin Edit1.SelectAll; hoge:=false; end;
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.