通常,当我有一个需要一些时间的任务时,我会使用如下脚本:
procedure Work;
var
cPrevious: TCursor;
begin
cPrevious := Screen.Cursor;
Screen.Cursor := crHourGlass;
try
// the task
finally
Screen.Cursor := cPrevious;
end;
end;
对于 FireMonkey,Screen 没有属性:Cursor。
向用户提供反馈的最佳方式是什么?
<小时/> <小时/>我遵循了评论和答案......使用了不透明度较低的TPanel和TAniIndicator(我还模糊了其他组件):
谢谢!
最佳答案
就像 @mjn 指出的那样,玻璃小时光标不再是您可以使用的唯一等待模式。
例如,在Silverlight/WPF中,您可以使用忙碌指示器控件, http://www.codeproject.com/KB/silverlight/SilverlightBusyIndicator.aspx
所以你可以尝试在 FireMonkey 中做类似的事情。可能已经有类似的控件可供您使用,或者您可以编写自己的控件。
更新:TAniIndicator是要使用的组件
关于delphi - 有了Firemonkey,如何给用户反馈? (沙漏),我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/7427196/