abc

2018年7月23日 #

delphi combobox屏蔽鼠标滑动

摘要： //第1种方法 procedure TForm1.FormMouseWheel(Sender: TObject; Shift: TShiftState; WheelDelta: Integer; MousePos: TPoint; var Handled: Boolean); begin if Ac 阅读全文

posted @ 2018-07-23 15:36 &大王叫我来巡山& 阅读(431) 评论(0) 推荐(0)