[修正] Firemonkey SpeedButton 鼠标移开按钮后 IsPressed 为 False 的问题

2017-04-07 21:20:06来源:cnblogs.com作者:龟山Aone人点击

未修正:

修正代码:

请将 FMX.StdCtrls.pas 复制到自己的工程目录下,再修改如下代码:

procedure TCustomButton.RestoreButtonState;begin{+++>}if not FStaysPressed then // 加入此行代码:修正鼠标移开按钮后 IsPressed 会变成 False, Fixed by Aone 2017.04.07  FIsPressed := False;  ApplyTriggers;end;

修正后:

最新文章

123

最新摄影

闪念基因

微信扫一扫

第七城市微信公众平台