10/03/17 20:31:10
コンボボックスのOnMouseLeaveがなんだか変で困っています。
コンボボックス上でマウスを動かすたびにすさまじい
回数OnMouseLeaveイベントが発生します。
エディット等ではなりません。
フォームにコンボボックスとメモだけ貼り付けて、
コンボボックス上でマウスを動かすと、
メモの行数がどんどこ増えていきます。
procedure TForm1.ComboBox1MouseLeave(Sender: TObject);
begin
Memo1.Lines.Add(IntToStr(Memo1.Lines.Count));
end;
環境はDelphi2010です。
なにかうまい対処法はないでしょうか…?