Native Platform Progress Dialogs For Delphi XE5 Firemonkey On Android And IOS

One of the comments on our Multithreaded dialog post pointed out another set of progress and activity dialog components for Delphi XE5 Firemonkey. These components are from Yaroslav Brovin and it looks like they wrap native Android and IOS functionality. So when you use this progress dialog on Android you’re actually using the native Java progress and activity dialog. On IOS you’re actually using a native UIView for your progress and activity dialogs. The names of the two components are TfgProgressDialog and TfgActivityDialog. I like this solution a lot because it is cross platform which means it handles both Android and IOS natively with Delphi XE5 Firemonkey. The components include a full demo on how to use them and I’ve included some of that code below:
procedure TForm6.Button1Click(Sender: TObject);
begin
fgProgressDialog.Show;
try
fgProgressDialog.Message := 'Preparing downloading content';
fgProgressDialog.Kind := TfgProgressDialogKind.Undeterminated;
// do work
fgProgressDialog.Kind := TfgProgressDialogKind.Determinated;
// do work
fgProgressDialog.Message := 'Union units...';
fgProgressDialog.Progress := 10;
// do work
fgProgressDialog.Message := 'Sorting units in package...';
fgProgressDialog.Progress := 20;
// do work
fgProgressDialog.Message := 'Removed comments...';
fgProgressDialog.Progress := 60;
// do work
fgProgressDialog.Message := 'Finishig';
fgProgressDialog.Progress := 90;
// do work
fgProgressDialog.Progress := 100;
// do work
finally
fgProgressDialog.Hide;
end;
end;
There isn’t really a blog post that I know of that goes with these components but instead there is a Youtube video. A link to the components is in the Youtube comments and I have mirrored them below as well in case the originals go down.

Check out the YouTube video on how to use the native progress and activity dialog components.

Mirror: Delphi XE5 Firemonkey Native Progress Dialog Components

Update: The packages have a complex directory structure but you might have trouble with. I made a new archive with the package directory structure flattened out. Hopefully this makes it easier to use. Download Delphi XE5 Firemonkey Native Platform Dialogs