带有进度条的启动画面[关闭]

Question

我的数据库需要相当长的时间来加载（它在网络上），所以我想显示一个带有一些动画（进度条或一些简单动画）的启动屏幕来让用户保持忙碌。因为每个人都在猜测什么时候会表打开，所以我不能使用计时器来运行进度条。所以一些动画 gif 可能是一个更好的选择。但是，如何在表格打开（和主窗体显示）之前隐藏/释放初始屏幕???

Answer 1

Delphi 中的闪屏实现Splash Screen Programatically in Delphi

如何在 Delphi 表单中为 GIF 制作动画How to use Animated Gif in a delphi form

如何显示带有进度条的启动画面How to make a splash screen with a progress bar on Turbo Delphi?

其他任何事情都取决于您想在应用程序中执行的操作。

Answer 2

您可以使用 Ttimer 并在内部更新 TprogressBar 直到加载结束。

对于计时器，使用“on timer”功能将参数间隔设置为500 ms

要在加载结束时完成，使 TprogressBar 不可见并将计时器启用值设置为 false 并最终显示您的主窗体

Answer 3

您是否加载了完整的数据库？然后您可以按加载的表/记录数显示进度。

有很多示例将向您展示如何添加启动画面。您可以隐藏主窗体并将（模态）窗体显示为闪屏。此表单在数据库加载开始之前创建并在完成时销毁。

我推荐一个进度条，以便用户知道他必须等待多长时间。